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"