Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 13:54:06
Multiplikation
16.04.2024 12:41:11
Vielleicht Onur ? Leider werden nicht alle Monate
16.04.2024 12:08:33
Zelle/Spalte bestimmten Wert in Kopfzeile zuordnen
16.04.2024 12:01:17
Dynamische Liste generiert aus mehreren Vorgagen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1216to1220
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
1216to1220
1216to1220
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bereich verkleinern / vergrössern mit VBA

Bereich verkleinern / vergrössern mit VBA
Peter
Guten Abend
Wie kann ich den rngZielAlt verändern, indem ich beispielweise die erste oder letzte Zeile "abschneide" oder das gleiche mit Spalten mache?
Set rngBereich = wsZiel.UsedRange
Angenommen, rngBereich ist A1:Z570
verkleinern:
1. wie entsteht daraus A2:Z570 ?
2. wie entsteht daraus A1:Z569 ?
3. wie entsteht daraus B1:Z570 ?
4. wie entsteht daraus A1:Y570 ?
Ich nehme an, dass ich das Vergrössern davon ableiten kann.
Danke für eine Antwort .
Gruss, Peter

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Bereich verkleinern / vergrössern mit VBA
14.06.2011 18:52:25
ransi
Hallo Peter
Versuch mal sowas:
Public Sub test()
    Dim rngBereich As Range
    Set rngBereich = Range("A1:Z570")
    'A2:Z570
    MsgBox Intersect(rngBereich, rngBereich.Offset(1, 0)).Address
    'A1:Z569
    MsgBox rngBereich.Resize(rngBereich.Rows.Count - 1, rngBereich.Columns.Count).Address
    'B1:Z570
    MsgBox Intersect(rngBereich, rngBereich.Offset(0, 1)).Address
    'A1:Y570
    MsgBox rngBereich.Resize(rngBereich.Rows.Count, rngBereich.Columns.Count - 1).Address
End Sub


ransi
Anzeige
AW: Bereich verkleinern / vergrössern mit VBA
15.06.2011 11:20:10
Peter
Hallo Ransi
Vielen Dank.
Das hat mir sehr weitergeholfen.
Gruss, Peter

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige