Laufzeitfehler 448

Bild

Betrifft: Laufzeitfehler 448 von: Thomas
Geschrieben am: 12.02.2005 17:05:55

Hallo Leute
Hab´ein dickes Problem!
Vor einigen Wochen habe ich mir ein mächtig gutes Buch über VBA zugelegt,
allerdings wird darin die Version 2002 behandelt.
Klappt trotzdem sehr gut und komme auch vorwärts, bis zu dieser Stelle:

Sub MonateAusblenden()
Dim neuSuchen As Range
Set neuSuchen = Rows(1).Find(What:="01.05.2002", _
After:=Range("A1"), _
LookIn:=xlFormulas, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False, _
SearchFormat:=False)
Range("C1", neuSuchen.Offset(0, -1)).EntireColumn.Hidden = True
End Sub


"Laufzeitfehler 448, Benanntes Argument nicht gefunden" ist das Ergebnis.
Hat das was mit den unterschiedlichen Excel Versionen zu tun oder wo liegt
der Hund begraben?
Vielen Dank schon mal für Hilfe
Gruß Thomas
Bild


Betrifft: AW: Laufzeitfehler 448 von: DieterB
Geschrieben am: 12.02.2005 17:08:22

Hallo Thomas,

wird diese Zeile:

Range("C1", neuSuchen.Offset(0, -1)).EntireColumn.Hidden = True

gelb markiert?

Gruß

DieterB


Bild


Betrifft: AW: Laufzeitfehler 448 von: Thomas
Geschrieben am: 12.02.2005 17:11:39

Hallo Dieter
Nein, bis dahin kommt es garnicht.
Stattdessen wird der ganze Block markiert!

Gruß Thomas


Bild


Betrifft: AW: Laufzeitfehler 448 von: Ulf
Geschrieben am: 12.02.2005 17:09:03

Sub MonateAusblenden()
Dim neuSuchen As Range
Set neuSuchen = Rows(1).Find(What:="01.05.2002", _
After:=Range("A1"), _
LookIn:=xlFormulas, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext)
Range("C1", neuSuchen.Offset(0, -1)).EntireColumn.Hidden = True
End Sub


SearchFormat gabs in E 2000 noch nicht.

Ulf


Bild


Betrifft: AW: Laufzeitfehler 448 von: Thomas Wenzke
Geschrieben am: 12.02.2005 17:13:27

Hallo Ulf
Diese Info ist schon mal was Wert
Muß mir also was anderse einfallen lassen

Danke

Thomas


Bild


Betrifft: AW: Laufzeitfehler 448 von: Ulf
Geschrieben am: 12.02.2005 17:14:42

Ich hab den Code doch geändert, nicht bemerkt?

Ulf


Bild


Betrifft: AW: Laufzeitfehler 448 von: Thomas
Geschrieben am: 12.02.2005 17:17:31

Ups, sorry

Hab´s übersehen

Werd´s gleich mal probieren

Gruß Thomas


Bild


Betrifft: AW: Laufzeitfehler 448 von: alex
Geschrieben am: 12.02.2005 17:21:09

Hallo ihr jetzt wollte ich den Code mal testen und es kommt immer der fehler
Laufzeitfehler 91
Objekt oder With-blockvariable nicht festgelegt.
Was heißt das ?


Bild


Betrifft: AW: Laufzeitfehler 448 von: Ulf
Geschrieben am: 12.02.2005 17:23:35

Das bedeutet, dass nichts gefunden wurde.

Ulf


Bild


Betrifft: AW: Laufzeitfehler 448 von: alex
Geschrieben am: 12.02.2005 17:24:36

und was wird gesucht ?
Also ich bin och im anfangsstatium mit VBA und wollte mich hier mal durch die codes kämpfen.
Kannst du mir diesen code erklären ?? Würde mir sehr helfen !? Danke


Bild


Betrifft: AW: Laufzeitfehler 448 von: Ulf
Geschrieben am: 12.02.2005 17:29:59

Das Datum 1.5.2002 wird gesucht.

Ulf


Bild


Betrifft: AW: Laufzeitfehler 448 von: alex
Geschrieben am: 12.02.2005 17:31:30

Das habe ich eingetragen in ganz viele zellen aber die meldung kommt trotzdem ?
Bin ich zu blöde ? :(


Bild


Betrifft: AW: Laufzeitfehler 448 von: Ulf
Geschrieben am: 12.02.2005 17:40:01

Es wird nur in Zeile 1 gesucht.

Ulf


Bild


Betrifft: AW: Laufzeitfehler 448 von: Thomas
Geschrieben am: 12.02.2005 17:24:41

An alle Beteiligten:

Ich komme zu dem selben Ergebnis.

Thomas


Bild


Betrifft: AW: Laufzeitfehler 448 von: Thomas
Geschrieben am: 12.02.2005 17:24:44

An alle Beteiligten:

Ich komme zu dem selben Ergebnis.

Thomas


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Laufzeitfehler 448"