☰

宏用于使用单元格和文本的值创建文本文件

tag-icon • tag-icon microsoft-excel vba macros
宏用于使用单元格和文本的值创建文本文件

我正在尝试在 Excel 中创建一个宏，该宏创建一个文本文件，其中一些参数位于 Excel 单元格中。

输出例如如下：

这孩子‘单元格 (1,1)’老的。

他的名字是‘单元格 (1,2)’。

我已经成功创建了文件，但我无法在文本中间添加变量。请按照我编写的代码进行操作：

Sub Generate_KML()

Dim strPath                            As String
Dim iFileNumber                        As Long
Dim strHeader                          As String
Dim strData                            As String

strPath = Application.GetSaveAsFilename(FileFilter:= _
"KML File (*.kml), *.kml", Title:="Save Location")

iFileNumber = FreeFile()
strHeader = ActiveCell.Offset(1, 1)
strData = "Test 2"

Open strPath For Output As #iFileNumber
Print #iFileNumber, strHeader
Print #iFileNumber, strData

Close #iFileNumber
End Sub

谢谢！问候，Richard Lima

答案1

你觉得你很挣扎是什么意思？

strdata = "The kid is " & cells(1,1).value & "His name is " cells(1,2).value

您基本上已经掌握了它，只需使用它&来连接即可。

如果你在打印方面遇到困难，看到这个问题举些例子。

相关内容