Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
848to852
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
848to852
848to852
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Makro automat start - Blatt ausblenden

Makro automat start - Blatt ausblenden
01.03.2007 15:10:20
Florian
Hallo Zusammen,
ich verzweifle schon einige Zeit an diesem Makro! Sinn soll sein:
- automatischer Start bei Öffen des Files
- das Blatt, welches bearbeitet wird sollte ausgeblendet sein!
Warum findet er das Makro nicht????
Das folgende Makro ist unter "Diese Arbeitsmappe"

Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:00:5"), "CommandButton1_Click()"
Sheets("Blatt4").Visible = False
'Sheets("Blatt1").Visible = False
Sheets("Blatt2").Visible = False
Sheets("Blatt3").Select
End Sub

Private Sub CommandButton1_Click()
Worksheets("Blatt1").Unprotect
ActiveWindow.SmallScroll Down:=-12
Cells.Replace What:="/50", Replacement:="", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False
Cells.Replace What:="Exyz", Replacement:="xyz", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Cells.Replace What:="Exyz", Replacement:="xyz", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
ActiveWindow.SmallScroll Down:=-27
Range("A2").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
ActiveWindow.SmallScroll Down:=-27
Sheets("Blatt3").Select
Worksheets("Blatt1").Protect
End Sub

Herzlichen Dank,
FLorian

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro automat start - Blatt ausblenden
01.03.2007 17:49:41
stormy_weathers
Hallo Florian,
ich glaube das liegt daran, dass die Tabelle ausgeblendet ist. Select in ausgeblendeten Tabellen, meine ich hier schon gelesen zu haben, funktioniert nicht.
Gruß
stormy

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige