Typen unverträglich

Forumthread: Typen unverträglich
5 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Typen unverträglich

Typen unverträglich

25.06.2004 00:45:10

Franz

Guten Abend Forum,
hänge (wahrscheinlich) an einer Kleinigkeit, komme aber grade nicht drauf:
Folgendes geht:
Rows("1:300").EntireRow.Hidden = False
Das Ganze variabel gemacht bringt "Typen unverträglich":
Dim lstRw As Long
If Range("A65536") = "" Then lstRw = Range("A65536").End(xlUp).Row _
Else lstRw = 65536
Rows("1:lstRw").EntireRow.Hidden = False
Was mache ich hier falsch, bitte?
Vielen Dank im Voraus und Grüße
Franz

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Typen unverträglich

K.Rola
AW: Typen unverträglich

25.06.2004 00:51:57

chris
übrigens...

K.Rola
Danke...

25.06.2004 01:01:11

Franz
Dummer Denkfehler

25.06.2004 00:57:06

Franz

AW: Typen unverträglich

K.Rola

Hallo,
Rows("1:" & lstRw).EntireRow.Hidden = False
sollte gehen.
Gruß K.Rola

AW: Typen unverträglich

25.06.2004 00:51:57

chris

Hallo Franz, weiß zwar nicht was du damit bezwecken willst aber versuchs mal so !


Sub neu()
Dim lstRw As Long
Rows("1:300").EntireRow.Hidden = False
If Range("A65536") = "" Then lstRw = Range("A65536").End(xlUp).Row _
Else lstRw = 65536
Rows("1:" & lstRw).EntireRow.Hidden = False
End Sub

übrigens...

K.Rola

...wenn du ganze Zeilen ansprichst, gehts auch etwas kürzer:
Rows("1:" & Variable).Hidden = True
statt:
Rows("1:" & Variable).EntireRow.Hidden = True
Gruß K.Rola

Danke...

25.06.2004 01:01:11

Franz

Hallo K.Rola,
... für die Formulierungshilfe! Auch wenn's mir hier nix bringt.
Grüße
Franz

Dummer Denkfehler

25.06.2004 00:57:06

Franz

Hallo K.Rola,
ja, gibt keinen Fehler, bringt aber nix, siehe unten
Hallo Chris,
deine Frage hat mir die Augen geöffnet: "... was du damit erreichen willst" : es kann nix geben, weil ich ausgeblendete Zeilen einblenden wollte. Und wenn sie ausgeblendet sind, kann ich sie ja nicht zählen.
Tut mir leid, ziehe meine Frage zurück.
Danke und Grüße
Franz

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