Range("A1:B" & Zei,"D1:D" & Zei) ungl. A1:B5,D1:D5
Reinhard
wie muß/kann ich
MsgBox Range("A1:B" & Zei, "D1:D" & Zei).Address
umbauen, sodaß als Ergebnis nicht
$A$1:$D$5
sondern
$A$1:$B$5,$D$1:$D$5
herauskommt?
Muß ich da Union benutzen?
Sub nn()
Dim Zei
Zei = 5
MsgBox Range("A:B, D:D").Address 'Ergebnis: $A:$B,$D:$D
MsgBox Range("A1:B" & Zei, "D1:D" & Zei).Address 'Ergebnis: $A$1:$D$5
'MsgBox Range(""A1:B" & Zei, "D1:D" & Zei").Address
'MsgBox Range(""A1:B" & Zei", ""D1:D &zei").address
End Sub
Danke ^ Gruß
Reinhard