Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Funktion kopieren bis Ende Tabelle | Herbers Excel-Forum


Betrifft: Funktion kopieren bis Ende Tabelle von: jo_cindy
Geschrieben am: 02.02.2010 12:12:59

Hallo Leute, hab da mal eine Verständnisfrage:

With Range(Cells(2, 1), Cells(Rows.Count, 1).End(xlUp)).Offset(, 23)

Was bedeutet dieser Befehl im Einzelnen?

Er bewirkt doch, dass die Formeln in der Spalte wo der Befehl gesetzt wird, solange kopiert werden, bis in Spalte 1 keine Werte mehr stehen, richtig?

Woran erkennt man, in welcher Spalte diese Funtion abläuft? Ist das die Spalte 2 - Cells(2.... ?

  

Betrifft: AW: Funktion kopieren bis Ende Tabelle von: Peter Feustel
Geschrieben am: 02.02.2010 12:32:34

Hallo jo_cindy,

nimm einmal diesen Befehl und sieh Dir das Ergebnis an:
MsgBox Range(Cells(2, 1), Cells(Rows.Count, 1).End(xlUp)).Offset(, 23).Address

Da wird nichts kopiert, da wird die letzte belegte Zelle in Spalte 1 ermittelt und dann per Offset um 23 Spalten nach rechts gegangen.

Gruß Peter


  

Betrifft: AW: Funktion kopieren bis Ende Tabelle von: jo_cindy
Geschrieben am: 02.02.2010 12:38:38

Hi Peter,

vielen Dank! Dann brauch ich mich nicht zu wundern, dass es nicht funktioniert. Hab mir eine eigene "Sammlung" von Befehlen angelegt, offensichtlich keine gute ;-)

Dann werde ich mal auf die Suche im Forum gehen, wie die richtige Formel dafür zu schreiben ist.


Beiträge aus den Excel-Beispielen zum Thema "Funktion kopieren bis Ende Tabelle"