Makro, aby utworzyć plik tekstowy z wartościami z komórek i tekstu

Próbuję utworzyć makro w programie Excel, który tworzy plik tekstowy, którego niektóre parametry znajdują się w komórkach programu Excel.

Dane wyjściowe będą na przykład:

Dzieciak ma „komórkę (1,1)” .

Nazywa się „komórka (1,2)” .

Udało mi się już utworzyć plik, ale próbuję dodać zmienną w środku tekstu. Postępuj zgodnie z kodem, który napisałem:

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 

Dziękuję Ci! Pozdrawiam, Richard Lima

Co masz na myśli?

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

Prawie go masz, po prostu użyj &do konkatenacji.

Jeśli masz problem z drukiem, zobacz to pytanie, aby uzyskać przykłady.