Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
744to748
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
744to748
744to748
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Makro mit Zellbezug

Makro mit Zellbezug
21.03.2006 21:01:54
Sebastian
Hi zusammen,
hoffe es kann mir nochmal jemand weiterhelfen. Ich habe vorher unter freundlicher Mithilfe dieses Makro erstellt:
Dim rng As Range
For Each rng In Range(Cells(150, 1), Cells(295, 1).End(xlUp))
If LCase(rng) = "811" Then
rng.EntireRow.Hidden = True
Else
rng.EntireRow.Hidden = False
End If
Next rng
Jetzt will ich das Makro irgendwie so abändern, dass ich in der zweiten Zeile irgendwie einen Bezug auf eine Zeile in meinem ExcelSheet hinkrieg. So irgendie in etwa. In der Zelle steht "811".
Dim rng As Range
For Each rng In Range(Cells(150, 1), Cells(295, 1).End(xlUp))
If LCase(rng) = Worksheets("Names").Range("C11").Value Then
rng.EntireRow.Hidden = True
Else
rng.EntireRow.Hidden = False
End If
Next rng
Leider funzt das so wie ich mir das denke nicht so ganz. Das Makro läuft zwar durch, doch leider werden die Zeilen nicht ausgeblendet. Hoffe es kann mir jemnand weiterhelfen. Danke
Gruß Sebastian

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro mit Zellbezug
21.03.2006 21:39:02
Uduuh
Hallo,
wenn ich das richtig sehe willst du nur Zeile 150-295 ausblenden?
For Each rng In Range(Cells(150, 1), Cells(295, 1))
If LCase(rng) = LCase(Worksheets("Names").Range("C11")) Then
rng.EntireRow.Hidden = True
Else
rng.EntireRow.Hidden = False
End If
Next rng
Gruß aus’m Pott
Udo

AW: Makro mit Zellbezug
21.03.2006 21:53:03
Sebastian
Hi Udo funktioniert einwandfrei.
AW: Makro mit Zellbezug
21.03.2006 21:39:07
Gerd
Hi,
bei Zahlen macht LCase keinen Sinn, da es kein UCase gibt. Warum werden Zahlen als text behandelt?
mfg Gerd
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige