Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
948to952
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
948to952
948to952
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Angrenzende Zellen in Makro markieren

Angrenzende Zellen in Makro markieren
11.02.2008 13:45:08
Spitzkicker
Hallo,
ich möchte in einem Makro (u.a. mit AutoFilterung) an einen makierten Bereich weitere 3 Zeilen nach unten und 1 Spalte nach rechts markieren. Da aber jedesmal andere Zellen betroffen sind (je nach Filterung), kann ich deshalb im Makro keine bestimmten Zellen markieren.
Gruß Spitzkicker

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

Betreff
Datum
Anwender
Anzeige
AW: Angrenzende Zellen in Makro markieren
11.02.2008 13:52:00
Renee
Hi Spitzkicker (fiese Eltern, was ?)
Hilft vielleicht ActiveCell.Offset(3,1) ?
GreetZ Renée

AW: Angrenzende Zellen in Makro markieren
11.02.2008 14:05:43
Chris
Servus,
das wäre z.B. eine Möglichkeit:

Sub t()
Dim arr As Variant, index As Variant
Dim i As Integer
Dim spalteAnfang As Long, spalteEnde As Long
Dim zeileAnfang As Long, zeileEnde As Long
arr = Selection.Address
index = Split(arr, ":")
spalteEnde = Range(index(1)).Column
zeileEnde = Range(index(1)).Row
Range(index(0), Cells(zeileEnde + 3, spalteEnde + 1)).Select
End Sub


Gruß
Chris

Anzeige

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige