BlackAlnet 发表于 2022-7-6 12:59:50

VBA问题

我怎么能取这个名字。txt文件,在多重选择中?
 
我已经做到了:
 

Dim lngCount As Long ' Open the file dialog
With Application.FileDialog(msoFileDialogOpen)'.AllowMultiSelect = True
   .Show ' Display paths of each file selected
For lngCount = 1 To .SelectedItems.Count 'MsgBox .SelectedItems(lngCount)
Next lngCount

 
之后,在上使用数据提取。txt,并处理信息,但我需要每个的名称。txt文件
的名称。txt文件,我必须再次获取这些文件,代码如下:
 

Dim txtname As String
   txtname = Application.GetOpenFilename("text files (*.txt), *.txt,")

 
我不想一个接一个。txt文件中,我只想取第一个选择,并将名称记录在一个新变量中
 
这是一个vba的excel,但是一个补充我的lisp。。。
 
如果有任何帮助,我将不胜感激!!

ollie 发表于 2022-7-6 14:43:19

你说的第一选择是什么意思?我假设你的意思是从下拉框或类似的表单对象。
 
如果是这种情况,您可以通过遍历列表来确定框中项目的顺序。将所选项目列表与表单对象的内容进行比较。
 
如果只使用第一个txt文件,是否需要多选?
页: [1]
查看完整版本: VBA问题