habe ein kleines VBA Dilemma, Ich arbeite an einem großem Makro, welches im speziellen Daten aus Tabellensheets, in ein anderes kopiert. Nun zu meinem Problem. Ich kann mit der Range Methode keine Spalten angeben, da diese Variabel sind. In etwa so:
'Alte Version, letzteZeile sucht letzte Zeile in test1
Dim test1, test2 As Worksheets
test1 = Sheets("Tabelle1")
test2 = Sheets("Tabelle2")
test1.Range("B:B" & letzteZeile).Copy Destination:=test2.Range("B2")
'neue Version:
Dim test1, test2 As Worksheets
test1 = Sheets("Tabelle1")
test2 = Sheets("Tabelle2")
Dim spalte As String
spalte = Eingabefenster.TextBox1.Value
test1.Range(spalte & letzteZeile).Copy Destination:=test2.Range("B2")
So, habe im Eingabefenster, welches als Pop-Up fungiert, eine TextBox, welche mit die Spaltenbelegung regelt. Kann mir jemand sagen, wie die Zuweisung im Range dazu heißt, wenn ich die komplette Spalte kopieren will?
Gruß Sepp
PS: Eine Zusatzvariable mit Range(..).EntireColumn.Select geht nicht