Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 17:49:39
Bedingte Formatierung
25.04.2024 16:50:59
2 Zellen in 2 Blättern mit unterschiedlichen Bereichen vergl
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1088to1092
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1088to1092
1088to1092
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bereich dynamisch festlegen in spalten

Bereich dynamisch festlegen in spalten
Christian
Hallo allerseits,
folgender code markiert den benutzten bereich einer tabelle:
varBereich = Sheets("Tabelle 1").UsedRange.Address
Range(varBereich).Select
Kann ich diese Funktion auch nur auf bestimmte Spalten anwenden (z.b. J bis X)?
Also den benutzte bereich in den Spalten J bis X markieren?
Wenn ja wie?
Vielen dank im Voraus
gruss
christian

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Bereich dynamisch festlegen in spalten
22.07.2009 12:27:12
Helmut
Hallo Christian,
z.B. mit der Application.Intersect-Methode
Gruß
Helmut
AW: Bereich dynamisch festlegen in spalten
22.07.2009 12:44:39
Christian
Hallo Helmut,
vielen Dank für deine Antwort, leider sagt mir das überhaupt nichts...
ich dachte man könnte irgenwie die spalten mit in den code aufnehmen?!
hätte ich doch lieber "`VBA-Nein" auswählen sollen?!?
gruss
christian
AW: Bereich dynamisch festlegen in spalten
22.07.2009 12:59:44
Helmut 

Sub test()
Dim varbereich As Range
Set varbereich = Application.Intersect(Sheets("Tabelle1").UsedRange, Sheets("Tabelle1").Range(" _
C:C"))
varbereich.Select
End Sub

AW: Bereich dynamisch festlegen in spalten
22.07.2009 13:39:30
Christian
Hallo,
vielen dank für den code, habe es jetz ein wenig angepasst:
Sub bereichtest2()
Dim varbereich As Range
Set varbereich = Application.Intersect(Sheets("Tabelle 1").UsedRange, Sheets("Tabelle 1").Range( _
"J:X"))
varbereich.Select
End Sub
So ist es fast perfekt, es wird nur in den spalten J-X markiert, allerdings richtet sich der anfang und das ende des bereichs jetzt nach den eintragungen die in spalte A-I stehen, ich möchte aber dass nur der benutzte bereich in den spalten J-X markiert wird...
Vielen dank für evtl. Anregungen!
gruss
christian
Anzeige
AW: Bereich dynamisch festlegen in spalten
22.07.2009 14:49:25
Helmut 

Sub tt()
Dim i As Long
Dim Firstrow As Long
Dim Lastrow As Long
Lastrow = 0
Firstrow = Rows.Count
For i = 10 To 24
If IIf(IsEmpty(Cells(Rows.Count, i)), Cells(Rows.Count, i).End(xlUp).Row, Rows.Count) >  _
Lastrow Then
Lastrow = IIf(IsEmpty(Cells(Rows.Count, i)), Cells(Rows.Count, i).End(xlUp).Row, Rows. _
Count)
End If
If IIf(IsEmpty(Cells(1, i)), Cells(1, i).End(xlDown).Row, 1)

AW: Bereich dynamisch festlegen in spalten
22.07.2009 15:17:38
Christian
Perfekt!
Danke Helmut!
war dann doch etwas komplizierter als ich anfangs dachte... :)
AW: Bereich dynamisch festlegen in spalten
22.07.2009 12:49:30
robert
hi,
so etwa ?
gruß
robert
Dim Bereich As Range
Set Bereich = Range("J1:X2000")
Anzeige

29 Forumthreads zu ähnlichen Themen

PageSetup.PrintArea festlegen
Peter

Guten Tag
Wie kann ich in einer Tabelle, die nicht zwingend aktiv ist, den Druckbereich festlegen?
Sowohl bei
With Sheets("ABC")
.PageSetup.PrintArea = .UsedRange
With .PageSetup
.LeftMargin = Application.InchesToPoints(1.10236220472441)
.RightMargin = Application.In...
24.01.2011 17:25:05
Thread-ID: 1197082
3 Beiträge
Anzeige
Orientierung Druckbereich automatisch anpassen
Gira

Liebes Forum,
dank euch konnte mein gestriges Problem perfekt gelöst werden - vielen Dank noch mal hierfür.
Nun habe ich noch eine weitere Frage:
Mein Tabellenblatt ist dank des gestrigen Makros so aufgebaut, dass abhängig von div. Parametern mal mehr, mal weniger Spalten eingeblend...
25.04.2014 09:39:54
Thread-ID: 1358529
4 Beiträge
2 print areas für ein sheet festlegen
Friederike

Hallo,ich habe ein großes Excel Sheet mit mehreren Tabellen.Ich möchte jedoch nur 2 davon ausdrucken. Diese befinden sich an unterschiedlichen Stellen im File. Ich möchte nicht jedes mal eine der beiden Tabellen markieren und dann den selektierten Bereich ausdrucken. Ich hab es schon mit der AN...
29.07.2002 12:41:06
Thread-ID: 141942
4 Beiträge
Anzeige
Druckbereich nach Jahr automatisch anpassen
marcel

Hallo,
ich habe folgendes beispielhaftes Tabellenblatt.
Ich würde gerne einen Button haben, durch den nur ein bestimmter Bereich der Tabelle gedruckt wird.
Es soll die Spalte mit der Beschriftung, die Spalte mit den Werten für das aktuelle Jahr, die zwei vorherigen Jahre und die dre...
15.04.2015 12:21:29
Thread-ID: 1420906
3 Beiträge
Druckbereich dynamisch festlegen
Paul

Hallo,
ich habe Schwierigkeiten den Druckbereich meiner Tabelle dynamisch festzulegen. Ich habe eine Möglichkeit gefunden dies über den Namensmanager zu tun, allerdings kann ich den Druckbereich dann einmal dynamisch anpassen, danach bezieht der Name sich wieder auf den Bereich und nicht au...
19.04.2015 10:05:47
Thread-ID: 1421656
2 Beiträge
Dynamischer Druckbereich mit VBA
Mats

Hi Leute,
nach langem suchen im Netz habe ich zwar viele Lösungsansätze für das oben beschriebene Problem gefunden aber keiner funktioniert für mich (bzw. schaffe ich es nicht ihn anzupassen).
Ich will einen dynamischen Druckbereich mit VBA. Als Formel hab ich den Druckbereich bereits i...
03.04.2016 00:09:37
Thread-ID: 1485600
4 Beiträge
Druckbereich dynamisch festlegen
Danny

Moin die Damen und Herren,
Ich habe in einer Tabelle einige Bereiche die immer mitgedruckt werden sollen und einige die nur mitgedruckt werden sollen, wenn sich in der Spalte A ein X davor befindet.
Mein Problem ist, dass die besagten Bereiche mal eine Zeile, mal 2 oder auch mal 4 habe...
13.10.2016 08:52:55
Thread-ID: 1519407
2 Beiträge
Druckbereich dynamisch festlegen
Werner

Hallo,
ich habe ein kleines Problem und komme nicht weiter.
In einer 3 spaltigen Liste übernehme ich über eine Formel Daten, wenn vorhanden, von einem anderen Tabellenblatt. Dadurch ist die Liste zwar bis zum Ende mit Formeln und Formaten gefüllt aber nicht mit Daten.
Ich möchte nun...
17.04.2019 09:43:26
Thread-ID: 1687648
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
6
3
3
8
2
1
3
1
4
4
1
2
2
2
1
7
2
2
6
1
4
2
1
4