Makro von Makrorecorder funktioniert nicht?

Bild

Betrifft: Makro von Makrorecorder funktioniert nicht?
von: Sascha
Geschrieben am: 22.04.2005 08:38:59
Hallo,
habe mit dem Macrorecorder ein Macro aufgezeichnet, aber das funktioniert nicht. Bekomme in der zweiten Zeile folgende Fehlermeldung:
Laufzeitfehler 1004
Die select-Methode des Range-Objects konnte nicht ausgeführt werden.
Kann mir jemand helfen?
Ich möchte eigendlich nur eine paar Zeilen ausblenden und dan einen Teil meiner Tabelle Drucken.
Danke im voraus
Sascha
Das Macro:
Sheets("Produktion").Select
Rows("7:14").Select
Selection.EntireRow.Hidden = True
Range("B2:O29").Select
Range("O29").Activate
ActiveSheet.PageSetup.PrintArea = "$B$2:$O$29"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
ActiveWindow.SmallScroll ToRight:=15
ActiveWindow.SmallScroll Down:=16
Range("B2:AF51").Select
Range("AB51").Activate
ActiveSheet.PageSetup.PrintArea = "$B$2:$AF$51"
Cells.Select
Selection.EntireRow.Hidden = False
Range("B2:D2").Select
Sheets("Druck").Select
Range("A1").Select

Bild

Betrifft: AW: Makro von Makrorecorder funktioniert nicht?
von: Pascal
Geschrieben am: 22.04.2005 09:02:38
Hi,
ist vielleicht eine der Zeilen 7-14 bereits ausgeblendet?
Ansonsten einfach anstatt rows("w:14").select
for i=7 to 14
rows(i).hidden=true 'blendet die Zielen aus
next i
einfügen.
Gruß Pascal
Bild

Betrifft: Zellen immer noch eingeblendet
von: Sas
Geschrieben am: 22.04.2005 09:11:19
Hallo,
eine Fehlermeldung bekomme ich nicht mehr aber die Zeilen sind auch nicht ausgeblendet.
Hast Du noch eine andere Idee?
Danke
Gruß Sascha
Bild

Betrifft: AW: Makro von Makrorecorder funktioniert nicht?
von: Volker
Geschrieben am: 22.04.2005 09:46:37
Hallo Sascha,
obwohl Deine Aufzeichnung bei mir 1 zu 1 funzt, laß mal das Selektieren weg:
Sheets(1).Rows("7:14").EntireRow.Hidden = True
oder, wenn die Seite unbedingt angezeigt werden muß:
Sheets(1).Activate
ActiveSheet.Rows("7:14").EntireRow.Hidden = True
Ist allerdings schon komisch. Ich bin schon mal dran verzweifelt, dass so was OHNE vorheriges Selektieren nicht geht, aber mit selektieren eigentlich immer.
Gruß
Volker
Bild

Betrifft: AW: Makro von Makrorecorder funktioniert nicht?
von: Galenzo
Geschrieben am: 22.04.2005 09:39:09
Sheets("Produktion").Rows("7:14").EntireRow.Hidden = True
Viel Erfolg!
Bild

Betrifft: Problem muss woanders liegen.
von: Pascal
Geschrieben am: 22.04.2005 09:51:42
Hi,
ich habe alle Makros ausprobiert und sie funktionieren eigentlich alle - inkl. Deinem alten. Das Problem muss also woanders liegen.
Ich liste mal auf, was mir einfällt, was ich aber nicht getestet habe.
- Blattschutz?
- Grafiken in den Zeilen
- Filter in den Zeilen
- Zusammengefasste Zellen
Vielleicht trifft ja etwas auf Deine Tabelle zu, ansonsten einfach mal das Blatt hochladen.
Grüße,
Pascal
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Makro von Makrorecorder funktioniert nicht?"