Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Zellen einfügen deaktivieren Einblenden aktiv
#1
Guten Abend.

Ich bin aufgrund meiner Verzweiflung zu euch gelangt.

Folgendes Problem schafft mir schlaflose Nächte.

Ich habe eine Arbeitsmappe mit drei Tabellenblättern. Beim Öffnen der Arbeitsmappe möchte ich, dass nur im Kontextmenü von Tabelle2 die Auswahlfelder "Zeilen/Spalten einfügen/löschen" disabled sein sollen. Dabei ist es für mich allerdings wichtig, dass die Funktionen "Einblenden/Ausblenden" nicht disabled sind. Es soll weiterhin möglich sein.

Beim Schließen der Arbeitsmappe soll die Deaktivierung wieder rückgängig gemacht werden.

Ich würde mich wirklich sehr freuen, wenn es jemanden gibt der mein Problem mit angeht.

Vieleb Dank vorab!

MfG
Antworten Top
#2
Es handelt sich um VBA. Kann mir eventuell jemand helfen?
Antworten Top
#3
moin

das würde wohl nach diesem Prinzip funktionieren

ins Codefenster von Tabelle2 diese beiden Makros

Code:
Private Sub Worksheet_Activate()
Application.CommandBars("Cell").Controls("Zellen löschen...").Enabled = False
End Sub

Private Sub Worksheet_Deactivate()
Application.CommandBars("Cell").Controls("Zellen löschen...").Enabled = True
End Sub

und zusätzlich unter DieseArbeitsmappe

Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Cell").Controls("Zellen löschen...").Enabled = True
End Sub

achte auf die richtige Schreibweise der Befehle
auch die Pünktchen gehören dazu

MfG Tom
Antworten Top
#4
Hallo,

dann stelle uns doch am Besten mal Dein bisheriges Machwerk vor.
Bitte kein Bild, da läßt sich nämlich nichts testen.
VBA besteht aus Codezeilen, und natürlich wollen wir auch die kennen
lernen. :05: Das Alles zusammen hilft sehr beim Helfen.
________________________________________________________________________
wer aufgibt, ohne es versucht zu haben, gibt einfach nur auf!

Grüße aus Norderstedt, Peter
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste