Datenbereich erkennen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: Datenbereich erkennen
von: junny
Geschrieben am: 04.12.2003 07:41:01

Hai Leute,
ich möchte aus verschiedenen Tabellen einen Bereich kopieren.
Ich habe einen festen Anfangsbereich, Spalten immer C-M ab der 4. Zeile.
Wie muss der code lauten, damit der Bereich nach unten vergrößert wird (sprich Felder sind bspw. bis Zeile 10 ausgefüllt, dann sollte der selektierte Bereich C4:M10 lauten)

Hoffe das einigermaßen verständlich erklärt zu haben,
gruss volker

Bild


Betrifft: AW: Datenbereich erkennen
von: Gunter
Geschrieben am: 04.12.2003 07:52:37

Hallo Volker,

erstelle folgenden Makro:


Sub Bereich()
Range(ActiveCell, ActiveCell.Offset(10, 6)).Select
End Sub


Dann gehe auf die Zelle C4 und starte das Makro. Damit wird Dein Bereich markiert.
Ich hoffe das löst Dein Problem.
Gruß Gunter


Bild


Betrifft: AW: Datenbereich erkennen
von: Willie
Geschrieben am: 04.12.2003 07:53:25

Hallo Volker hier ein Lösungsansatz!
Gruß Willie


Sub Zeile()
Dim Y As Integer
Y = Cells(Rows.Count, 3).End(xlUp).Offset(0, 1).Row
Range(Cells(4, 3), (Cells(Y, 13))).Select
MsgBox Y
End Sub



Bild


Betrifft: AW: Datenbereich erkennen
von: Willie
Geschrieben am: 04.12.2003 07:53:31

Hallo Volker hier ein Lösungsansatz!
Gruß Willie


Sub Zeile()
Dim Y As Integer
Y = Cells(Rows.Count, 3).End(xlUp).Offset(0, 1).Row
Range(Cells(4, 3), (Cells(Y, 13))).Select
MsgBox Y
End Sub



Bild


Betrifft: DANKE Jungs ich teste, Gruss volker
von: junny
Geschrieben am: 04.12.2003 08:12:18

o.T.


Bild

Beiträge aus den Excel-Beispielen zum Thema " Datenbereich erkennen"