Kopieren Sie mehrere Bereiche mit VBA

Ich versuche, mehrere Bereiche mit Excel VBA zu kopieren. Ich verstehe, dass zum Auswählen mehrerer Bereiche eine Syntax verwendet wird, die der folgenden ähnelt:

Range("A1:B4000, F1:F4000").Select

Das funktioniert gut inauswählen den entsprechenden Bereich. Folgendes jedoch:

Range("A1:B4000, F1:F4000").Copy

... kopiert nur die A1: B4000-Reihe. Dies ist das erste Problem, mit dem ich konfrontiert bin.

Zweitens möchte ich die Daten dynamisch in die unterste Zeile kopieren, die nicht unbedingt Zeile 4000 ist. Wenn Sie einen einzelnen Bereich auswählen, lautet die Syntax wie folgt:

Range("A1", Range("B1").End(xlDown)).Copy

Der obige Code kopiert erfolgreich alles von A1 in dem unteren Bereich der B-Spalte. Ich kann im Internet kein Material finden, das erklärt, wie dies für Mehrfachauswahl möglich ist.

Ich versuche im Wesentlichen, A1: B (unten) und F1: F (unten) zu kopieren, aber die beiden oben genannten Probleme halten mich auf. Ich nehme an, dass dies ein Syntaxproblem ist.

Antworten auf die Frage(2)

Ihre Antwort auf die Frage