Я пытаюсь создать макрос в 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 

Спасибо! С уважением, Ричард Лима

1 ответ1

0

Что вы имеете в виду, что вы боретесь?

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

Вы почти ничего не сделали, просто используйте & для объединения.

Если вы боретесь с печатью, посмотрите этот вопрос для примера.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .