Anzeige
Archiv - Navigation
668to672
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
668to672
668to672
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellbereich ausblenden

Zellbereich ausblenden
19.09.2005 17:49:31
Basti
Hallo zusammen,
ich muss meine Frage hier nocheinmal stellen da ich leider gestern keine Antwort erhalten habe.
Ich möchte einen ganz bestimmten Zellbereich ausblenden
dazu möchte ich die Zelle finden in der "generelle Probleme" steht und die letzte beschriebene Zelle in Spalte d. Der Bereich zwischen diesen Zellen soll ausgeblendet werden.
Dazu versuchte ich wenig glücklos:

Sub hidden()
Dim a, b As Long
a = Range("B:B").Find("generelle Probleme").Row
b = Range("d500").End(xlUp).Row
Range(Cells(a, 1), Cells(b, 1)).Select
Selection.Rows.hidden = True
End Sub

Jetzt probier ich schon geraume Zeit rum und krieg es nicht zustande.
Hat jemand noch ne gute Idee
Gruß Basti

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellbereich ausblenden
19.09.2005 17:54:43
Hajo_Zi
Hallo Basti,
Du kannst Nur Zeilen und Spalten ausblenden keine einzelenen Zellen.
In VBA kann zu 99% auf select verzichtet werden.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


AW: Zellbereich ausblenden
19.09.2005 17:54:57
Leo
Hi,
Option Explicit

Sub ausblenden()
Dim a As Long, b As Long
a = Columns(2).Find("generelle Probleme").Row
b = [d500].End(xlUp).Row
Range(Cells(a, 1), Cells(b, 1)).EntireRow.hidden = True
End Sub

mfg Leo
Anzeige
AW: Zellbereich ausblenden
19.09.2005 17:57:26
Hajo_Zi
Hallo Leo,
mir scheint das hast Du nicht getestet. Bis Version 2003 geht so was nicht.
Gruß Hajo

"Wer Rechtschreibfehler findet, darf sie behalten!"
AW: Zellbereich ausblenden
19.09.2005 18:02:15
Leo
Hi,
klar geht das.
mfg Leo
Funktioniert eindeutig :-)
19.09.2005 18:03:34
Basti
Es geht sogar wunderbar,
Vielen Dank Gruß Basti
AW: Zellbereich ausblenden
19.09.2005 18:06:20
Basti
Wie kann ich denn dieses Zeichen [ eingeben (jetzt hab ich es kopiert)
AW: Zellbereich ausblenden
19.09.2005 18:13:07
Leo
Hi,
entweder Alt_Gr + 8 bzw. 9 oder strg + alt + 8 bzw. 9
Du kannst aber auch herkömmlich Range("D500") verwenden.
mfg Leo
Anzeige
AW: Zellbereich ausblenden
19.09.2005 19:38:59
Basti
Alles klar, vielen Dank
Gruß Basti
AW: Zellbereich ausblenden
19.09.2005 18:26:42
Hajo_Zi
Hallo Leo,
mich hat die schreibweise mit Range und Cells verwirrt ich hätte wahrscheinlich
Rows(a & ":" & b).EntireRow.Hidden = True
geschrieben.
Gruß Hajo

"Wer Rechtschreibfehler findet, darf sie behalten!"

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige