Gestern, 01:06
Gestern, 09:00
Gestern, 09:34
Gestern, 12:15
Indem Du mit der rechten Hand die Maus festhältst und mit der linken Hand Strg+f drückst ... 
Man kann Befehle mit etwas Aufwand per Normal.dotm in das Rechtsklick/Kontextmenü einbauen. Dort ein neues Modul mit diesem Code (Strg+c, Strg+v)
Da mir mir der Aufwand allerdings zu hoch ist und mein linker kleiner Finger + Zeigefinger Strg+f bequem erreichen, lasse ich das.
Grüße
Man kann Befehle mit etwas Aufwand per Normal.dotm in das Rechtsklick/Kontextmenü einbauen. Dort ein neues Modul mit diesem Code (Strg+c, Strg+v)
Code:
Sub NavigationKontextmenü()
Dim cb As CommandBar
Dim ctl As CommandBarControl
' Standard-Kontextmenü für Text abrufen
Set cb = CommandBars("Text")
' Prüfen, ob der Menüpunkt bereits existiert
On Error Resume Next
Set ctl = cb.Controls("Navigation umschalten")
On Error GoTo 0
If ctl Is Nothing Then
' Falls nicht vorhanden, neuen Menüpunkt hinzufügen
Set ctl = cb.Controls.Add(msoControlButton)
ctl.Caption = "Navigation umschalten"
ctl.OnAction = "NavigationUmschalten"
End If
End Sub
Sub NavigationUmschalten()
' Beispiel: Navigationsbereich ein-/ausschalten
Application.CommandBars("Navigation").Visible = Not Application.CommandBars("Navigation").Visible
End SubDa mir mir der Aufwand allerdings zu hoch ist und mein linker kleiner Finger + Zeigefinger Strg+f bequem erreichen, lasse ich das.
Grüße
Gestern, 13:00