Kleine Sektflaschen Hochzeit
© sdecoret - Adobe Stock Um alle verwendeten Zellen einer Tabelle per Makro zu markieren oder zählen zu lassen, benötigen Sie das Makro "UsedRange". Wir zeigen Ihnen anhand von zwei Beispielen, wie Sie dieses richtig einsetzen. Wenn Sie per Makro Zellen in Ihren Tabellen verarbeiten möchten, sollten Sie sich auf die Zellen beschränken, die auch wirklich Inhalte aufweisen. Zellbereich per VBA benennen - computerwissen.de. Das ist einfacher und viel schneller, als alle Zellen in allen Spalten und Zeilen zu durchsuchen. Excel bietet Ihnen zu diesem Zweck die Eigenschaft UsedRange an. Sie verweist auf alle benutzten Zellen einer Tabelle und liefert ein Range -Objekt. Mit UsedRange die genutzten Excel-Zellen markieren Das folgende Makro zeigt, wie Sie die Eigenschaft in der Praxis einsetzen: Sub MarkiereAlleGenutzteZellen() End Sub Die folgende Abbildung zeigt, wie es aussehen kann, wenn das Makro in einer Tabelle eingesetzt wird. Alle verwendeten Zellen werden markiert: Das Makro markiert immer die Zellen in der aktiven Tabelle. Falls Sie eine andere Tabelle verwenden möchten, ersetzen Sie das Objekt ActiveSheet durch die Referenz auf die entsprechende Tabelle.
Es geht mir um die analoge Verfahrensweise wie Shift, Ende Pfeil rechts und Ende Pfeil herunter, mit der man einen Bereich markieren kann. vielen Dank Range(cells(1, 6), cells(1, 8)(xldown)) Re: Bereich Markieren mit VBA von: Nepumuk Geschrieben am: 12. 2003 - 13:31:36 Hallo Petra, so geht's: Gruß Nepumuk Geschrieben am: 12. 2003 - 13:34:15 Hallo Udo, und was passiert, wenn in der Spalte H eine leere Zelle ist? Gruß Nepumuk von: xxx Geschrieben am: 12. 2003 - 13:40:38 Hallo, prinzipiell hast du Recht. Petra hat aber geschrieben, dass immer F bis H gefüllt sind. Du bist jedoch mit xlUp auf der sicheren Seite. Den sichtbaren Bereich ermitteln. Gruß aus'm Pott Udo von: Willie Geschrieben am: 12. 2003 - 17:30:19 wenn die Spalten unterschiedlich befüllt sind kannst du es auch so machen! Sub Makro1() wert1 = 1 For i = 6 To 8 wert = Cells(65536, i)(xlUp) If wert > wert1 Then wert1 = wert End If Next Range(Cells(1, 1), Cells(wert1, i - 1)) End Sub Gruß von: Petra Geschrieben am: 13. 2003 - 12:05:19 Danke, ich habe jetzt folgende Lösung genommen: Range("h1", Range("j65536")(xlUp)) Das hat auch funktioniert.
2007, 17:19 # 4 Threadstarter Hi Leute, erstmals danke für eure Antworten. Bin noch nicht zum Ausprobieren gekommen. Melde mich dann wieder. 08. 2007, 18:00 # 5 Variabler Bereich markieren Zitat: von JobCoach Hi, da ich sicher etwas falsch mache hänge ich die Datei an. Um die Daten von Anmeldungen nach PaS zu übertragen müssen die Datensätze erst markiert werden. Vba excel bereich auswählen files. Geht das nicht auch automatisch. Kann man den Code Sub Uebergeben nicht erweitern? Danke im Voraus für euer Bemühen. Manfred 08. 2007, 19:11 # 6 Moin, Manfred, für den Zweck in der UserForm benutzt man gemeinhin Optionsschaltflächen... Es ist schlichtweg falsch, dass die Daten markiert werden müssen - wer behauptet so etwas? Sub Übertrag() Dim lngLastRow As Long Dim lngToCopy As Long lngLastRow = Worksheets("Anmeldungen")(, 1)(xlUp) With Sheets("PaS") lngToCopy = (, 1)(xlUp) - 3 Worksheets("Anmeldungen")("A" & lngLastRow + 1)(lngToCopy, 3) = _ ((4, 1), ((, 1)(xlUp), 3)) Bitte auf die Punkte achten... 08. 2007, 19:38 # 7 Variabler bereich markieren Hi Jinx, klappt wunderbar so mit deinem Code.
Wenn die Variablen wie folgt lauten: var1 = 7 var2 = 5 brauche ich genau folgende Zellen: A1, A3-A7 E1, E3-E7 Also A1, A3 - A+Var1 Var2+1, Var2+3 - Var2+Var1 A2 und in dem Fall E2 drfen nicht markiert werden. wre ja Range("A1:J10") Verfasst am: 21. VBA - Variable Bereiche markieren - MS-Office-Forum. Jul 2007, 19:30 Rufname: Du mchtest mehrere Bereiche per VBA selectieren? Das geht so: Union(Range("A1:B2"), Range("C3:D4")) oder so: Union(Range(Cells(1, 1)), Range(Cells(2, 3), Cells(4, 5))
Geschrieben am: 14. 2015 18:31:44 ich bin dann raus. Da in jedem Beitrag eine andere Aufgabe steht. Ich hatte vorgeschlagen die Werte kopieren in eine Zelle, da kam Nein Es soll nur in Zwischenspeicher, jetzt solle es wieder in eine Zelle. Ich mache diese hin und her nicht mit. Geschrieben am: 14. 2015 18:54:15 Das ist mir halt erst aufgefallen als ich die Daten eingefügt habe... Excel-Beispiele zum Thema "VBA Bereich auswählen" Leerzeichen aus einem Bereich löschen Befindet sich die aktive Zelle in einem bestimmten Bereich? Vba excel bereich auswählen image. Mehrbereichsauswahl auf eine Seite drucken. Spalten einer Mehrbereichsauswahl ausblenden.
Was muss ich noch einfügen, das der übertragene Bereich dann geleert wird? 08. 2007, 19:43 # 8 Moin, nfred, die Anweisung heißt ClearContents - etwa so (obwohl sich da aauch noch eine weitere With-Anweisung einfügen lässt): ((4, 1), ((, 1)(xlUp), 3)). ClearContents 08. 2007, 20:13 # 9 klappt bestens. Danke.