So, quick and dirty…
Das in die default.ivb -> (ALT+F11 -> Anwendungsprojekt -> Module -> Modul1 -> rein kopieren -> Speichern -> Schliessen)
Code:
Public Sub Ausblenden()
On Error Resume Next
ThisApplication.ActiveDocument.SelectSet(1).Visible = Not ThisApplication.ActiveDocument.SelectSet(1).Visible
End Sub
Danach in Extras/Anpassen (ALT+X+A -> Befehle -> Makros -> „Ausblenden“ -> Verknüpfung -> und dann nimmst halt was frei ist z.B. STR+ALT+X)
Teil anwählen + Tastenkombination = unsichtbar. Wenn unsichtbar, dann wird es sichtbar. Das Ganze am besten mit 3D Mäusle verknüpfen...
HTH
------------------
Grüße daywa1k3r
FX64 Software Solutions
Mold&More Software Solutions
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP