Hallo.
Und gleich eine zweite Frage drauf
Ich blende von Grund auf alle Excel Tabellen aus, da ich die Eingaben über ein FormUserfeld durchführe.
Mit folgenden Befehl unter diese Arbeitsmappe:
Private Sub Workbook_Open()
Me.Application.Worksheets(1).Visible = True
Me.Application.Worksheets(2).Visible = True
Me.Application.Worksheets(3).Visible = True
Me.Application.Worksheets(4).Visible = True
Application.Visible = False
Login.Show
End Sub
Nur das Problem dabei, ich habe solange ich mit diesem Programm arbeite keine Möglichkeiten, ein anderes Excel Programm zu öffnen, bzw. zu bedienen .
Es wird mir auch automatisch alle offenen Excel Programme geschlossen.
Was muss ich machen, das diese Einstellung (Mann soll die Excel Tabelle nicht sehen) nur auf dieses Dokument wirkt.
VBA muss aber jederzeit auf die Tabellen zugreifen (lesen uund schreiben) kkönnen.
Danke
Hallo.
Und gleich eine zweite Frage drauf
Ich blende von Grund auf alle Excel Tabellen aus, da ich die
Eingaben über ein FormUserfeld durchführe.
Mit folgenden Befehl unter diese Arbeitsmappe:
Private Sub Workbook_Open()
Me.Application.Worksheets(1).Visible = True
Me.Application.Worksheets(2).Visible = True
Me.Application.Worksheets(3).Visible = True
Me.Application.Worksheets(4).Visible = True
Application.Visible = False
Login.Show
End Sub
Hallo Anton,
warum blendest Du alle Tabellen aus?
Mit
Sub auto_open()
Worksheets(„Tabelle1“).Visible = xlVeryHidden
Worksheets(„Tabelle2“).Visible = xlVeryHidden
End Sub
könntest Du bis auf eine (die könnte ja leer sein) alle Tabellen ausblenden.
Nur das Problem dabei, ich habe solange ich mit diesem
Programm arbeite keine Möglichkeiten, ein anderes Excel
Programm zu öffnen, bzw. zu bedienen .
Es wird mir auch automatisch alle offenen Excel Programme
geschlossen.
mit dieser Variante sollte das kein Problem sein
Was muss ich machen, das diese Einstellung (Mann soll die
Excel Tabelle nicht sehen) nur auf dieses Dokument wirkt.
VBA muss aber jederzeit auf die Tabellen zugreifen (lesen uund
schreiben) kkönnen.
Danke
auch das sollte dann funktionieren.
Gruß
Wolfgang
Hallo Wolfgang.
danke zuerst für deine Antwort.
Nur leider funktioniert das so nicht.
Ich greife nämlich mit den einzellnen Userforms jeweils auf die Exeltabell zu.
Und wenn ich sie so ausblende:
Worksheets(„Tabelle1“).Visible = xlVeryHidden
dann dürfte Excel die Tabelle selbst nicht mehr finden, da ich immer einen Fehler bekomme (Laufzeitfehler 1004 Die Select-Methode des Worksheet-Objekt konnte nicht ausgeführt werden).
Hast du eine Idee wieso, und wie man es noch anderst ausblenden kann?
Danke
Hallo Anton,
vielleicht könnte man bevor Du die UserForms ausführst die entsprechende Tabelle kurz einblenden und danach wieder ausblenden.
Was anderes fällt mir auch nicht ein.
Gruß
Wolfgang