我想用各种字母和一些变量
创建一个长字符串所有变量都是字符串。
pfad = t1 & tn & t2 & tn & t3 & kunde & t4 & datum & t5 & zeileStr
创建pfad之后,id就像拥有这个String或者换句话说这个句子在特定的Cell中。应该通过2个变量(行和列)选择此单元格。 我的代码在这里:
While z < 9
BZ = zeile + 5
Range(AZ & BZ) = pfad <<<<<<<<<< this is marked yellow, when im going to debug mode
z = z + 1
zeile = zeile + 1
zeileStr = CStr(zeile)
pfad = t1 & tn & t2 & tn & t3 & kunde & t4 & datum & t5 & zeileStr
Wend
答案 0 :(得分:0)
这可能是您正在寻找的任务。
Dim As Integer 'Long, preferable
Dim AZ As String
Dim pfad As String
Sheets("SheetName").Cells(BZ, AZ).Value = pfad
在你定义了pfad而不是之前,你会想要放置那一行。
Do While z < 9
BZ = zeile + 5
z = z + 1
zeile = zeile + 1
zeileStr = CStr(zeile)
pfad = t1 & tn & t2 & tn & t3 & kunde & t4 & datum & t5 & zeileStr
Sheets("SheetName").Cells(BZ, AZ).Value = pfad
Loop
注意: Wend现在更多地用于向后兼容。使用Do While... Loop
答案 1 :(得分:0)
Dim AZ As Long
Dim BZ As Long
Dim pfad As String
Dim zeile As Integer
Dim zeileStr As String
Dim z As Integer
tn = Range("B3")
kunde = Range("B4")
zeile = 2
AZ = 1
BZ = 0
zeileStr = CStr(zeile)
定义所有变量或它们的值是一个单元格。
当我使用Range()命令时,AZ是一个String。