Makro funktioniert nach Spaltenerweiterung nicht
02.02.2016 08:04:57
joshka
Private Sub CommandButton1_Click()
Dim neueZeile As Long
For i = 2 To 49 Step 1
neueZeile = Sheets("Gesamtauswertung").Cells(Rows.Count, i).End(xlUp).Row + 1
If neueZeile dieses Makro hat wunderbar funktioniert, nun wurde aber das Blatt um einige Spalten erweitert und er kopiert nun statt in Zeile B in Zeile AO.
woran liegt das ?
beste grüße