EXCEL 在线读取TXT文件
发布网友
发布时间：2022-04-19 11:02
我来回答
共2个回答
热心网友
时间：2023-06-26 04:01
将代码改成这个：
Private Sub CommandButton1_Click()
Range("A3:Q8000").Clear
Dim XmlHttp As Object, tmp As String
Set XmlHttp = CreateObject("MSXML2.XMLHTTP")
With XmlHttp
.Open "GET", "http://www.17500.cn/getData/3d.TXT", False
.send
tmp = .responsetext
End With
Dim arr, s, brr(), t As String
arr = Split(tmp, Chr(10))
ReDim brr(0 To UBound(arr))
For i = 0 To UBound(arr)
If Len(arr(i)) > 0 Then
s = Split(arr(i), " ")
For j = 0 To 4
t = t & s(j) & ","
Next
t = Left(t, Len(t) - 1)
brr(i) = t
t = ""
End If
Next
Cells(2, 1) = "开奖期号"
Cells(2, 2) = "开奖日期"
Cells(2, 3) = "开"
Cells(2, 4) = "奖"
Cells(2, 5) = "号"
For i = 0 To UBound(brr)
Cells(i + 3, 1).Resize(1, 5) = Split(brr(i), ",")
Next
End Sub
热心网友
时间：2023-06-26 04:02
我也是买彩票的，你这个要求比较老火，他网站的数据源是http://www.17500.cn/getData/3d.TXT 这是他网站已经设定好的，是无法修改的，你EXCEL表是要读取他网站这个数据的http://www.17500.cn/getData/3d.TXT， 所以是不能实现的。 你也可以自己另外做个表，提取上面那EXCEKL上你想要的数据也是可以的
怎样用excel打开txt文件
首先，打开excel，选择数据选项卡，自文本选项。在弹出的资源管理器界面选择存放好的txt文件后，点击打开按钮。此时弹出文本导入向导，由于我的数字是以空格为分隔字符的，所以我选择分隔符号，当然，如果你的文本是固定宽度，你可以选择第二个。然后点击下一步按钮。勾选空格，检验预览数据是否和自己预想的...
如何把doc文件转换成PDF格式？
"1.当然可以，首先要确定自己有一个pdf文档，而且确定目的是需要将pdf文档转换为word格式，然后我们将现有文档通过迅捷pdf转换器软件打开。2.通过选择PDF转换页面功能其中的PDF文件转WORD项目拖入文件。3.接着在迅捷pdf转换器下方按自己的需要是否更改文件名，然而在保存类型中选择*.doc选项。4.全部设置完成点击开始转换，确定自己设置好路径、更改文件名和保存类型即可。5.转换完成之后的word文档同样可以通过迅捷pdf转换器重新转换成一开始的pdf文档。"1.当然可以，首先要确定自己有一个pdf文档，而且确定目的是需要将pdf文档转换为word格式，然后我们将现有文档通过迅捷pdf转换器软件打开。2.通过选择PDF转换页面功能其中的PDF文件转WORD项目拖入文件。3.接着在迅捷pdf转换器下方按自己的需要是...
怎么将文本数据导入到excel表格中怎么将文本数据导入到excel表格...
1、打开需要转换为Excel文档的txt文本文件。2、然后新建或者是打开一个Excel文件，然后来到了Excel表格中。3、点击上面的数据菜单选项，然后在打开的选项卡页面中点击自文本选项。4、然后在弹出的窗口中找需要转换为Excel文档的txt文件，点击导入。5、然后在弹出的页面中选择为分隔符号 ，点击下一步 ，然后...
怎样把TXT导入EXCEL表格?
1、打开需要操作的EXCEL表格，从TXT导入数据到EXCEL中，并选中相关单元格，点击数据选项卡中的“分列”。2、在分列向导1使用默认设置，点击下一步。3、在向导2中，勾选其他，并在后面文本框输入TXT文档的分隔符，点击确定即可。4、返回EXCEL表格，发现TXT中的数据在EXCEL中以分隔符为标记分列操作完成。
把TXT导入EXCEL中,如何让TXT中的数据在EXCEL中以分隔符为标记分列。_百...
1、首先在电脑上建立一个TXT文件，并以“，”作为内容的分隔符。2、然后打开EXCEL文件，在数据选项页面的获取外部数据区域点击“自文本”选项。3、然后在出现的窗口中，选中目标TXT文件，点击“导入”选项。4、然后在出现的窗口中，选中“分隔符号”选项，点击“下一步”按钮。5、然后在“分隔符”选项...
wps怎样导入txt文件
首先在电脑上打开wps表格并新建一个空白文档，在上方菜单栏里可以看到【数据】菜单，如下图所示。点击上方菜单栏里的【数据】菜单，在下方找到【导入数据】功能选项，如下图所示。点击【导入数据】功能选项，弹出选择数据源对话框，导入txt格式数据可选择直接打开数据文件选项，如下图所示。接下来点击【选择...
用EXCEL自动提取TXT格式文件中指定数据的方法
如果理解错误的话，txt文件是类似如下：aa bb cc ee ff gg 可以操作如下，把每行各值之间的空格在记事本里面替换为","（半角逗号），注意保持行不变。之后在数据---导入文本数据，选择"," 为间隔符，就可以导入了。
如何用EXCEL VBA读入固定格式的TXT文档
= False .TextFileTabDelimiter = True .TextFileSemicolonDelimiter = False .TextFileCommaDelimiter = True .TextFileSpaceDelimiter = False .TextFileColumnDataTypes = Array(1, 1, 1, 1).TextFileTrailingMinusNumbers = True .Refresh BackgroundQuery:=False End With ...
怎么在EXCEL插入txt文件
第一步：确定好要插的txt文件在哪个位置，方便待会查找。找到菜单单栏数据——来自文本——出来如下选择文本位置对话框——选择——打开 第二步：文本导入向导步骤1——选中分隔符号 第三步：文本导入向导步骤2——选择“...
如何用Excel VBA读取某一文件夹下批量TXT文本内的某行某列?
如何用Excel VBA读取某一文件夹下批量TXT文本内的某行某列？ 可以使用如下的代码，复制如下代码到VBA模块中运行即可。如下代码代表4行4列，如果其余行或列数则可更改相应的数字。具体步骤如下：打开office excel；Alt+F11打开VBA编辑器；复制如下代码到模块中；F5运行该模块；按照提示进行如下步骤即可。
如何在Excel使用宏导入txt格式文本
第一步，将txt文档合并为一个大的txt文档。打开记事本，输入for %%i in (*.txt) do type %%i>>0.txt（可将该命令复制粘贴过去）然后将文件保存到500多个txt文件所在的文件夹，文件的后缀名为.bat文件。比如保存为all.bat 在文件夹中双击运行all.bat批处理文件，将文件夹中所有txt文档合并为一个...
