Vai al contenuto

Evidenziatore Word 2013


  • Non puoi aprire una nuova discussione
  • Effettua l'accesso per rispondere
Questa discussione ha avuto 1 risposte

#1
SabaKu

SabaKu
  • "It's the FNG, sir."

  • StellettaStellettaStellettaStellettaStellettaStellettaStellettaStellettaStellettaStellettaStelletta
  • Gruppo: Utente Pro
  • Messaggi: : 25637

Esiste un comando veloce o la possibilità di creare una macro che permetta di:

 

1. Selezionare un colore di evidenziazione

2. Evidenziare il testo precedentemente selezionato

3. Uscire dalla "modalità" evidenziazione

 

Non sarebbe un problema usare il comando base di Word 2013 se non fosse che a volte ho bisogno di evidenziare velocemente più parti di testo di colori di evidenziazione diversi.

 

Ho trovato shortcut che mi permettono di evidenziare velocemente, ma sempre e solo del colore selezionato. A me servirebbe poter cambiare colore ed evidenziare con un solo tasto.

 

In sostanza vorrei 3 macro diverse da assegnare a 3 tasti rapidi della tastiera Logitech in mio possesso che mi permettano di evidenziare di 3 colori diversi in maniera rapida senza dover sempre stare a cliccare il cambio colore nel menu a tendina o nel menu che compare nei pressi del cursore.



#2
SabaKu

SabaKu
  • "It's the FNG, sir."

  • StellettaStellettaStellettaStellettaStellettaStellettaStellettaStellettaStellettaStellettaStelletta
  • Gruppo: Utente Pro
  • Messaggi: : 25637

Risolto. Scrivo per chi mai avrà lo stesso problema.

 

4 macro distinte assegnate a CTRL+SHIFT+Q fino a CTRL+SHIFT+E

Sub evidenziatore_verde()
'
' evidenziatore_verde Macro
'
'
    Options.DefaultHighlightColorIndex = wdBrightGreen
    Selection.Range.HighlightColorIndex = wdBrightGreen
End Sub
Sub evidenziatore_giallo()
'
' evidenziatore_giallo Macro
'
'
    Options.DefaultHighlightColorIndex = wdYellow
    Selection.Range.HighlightColorIndex = wdYellow
End Sub
Sub evidenziatore_azzurro()
'
' evidenziatore_azzurro Macro
'
'
    Options.DefaultHighlightColorIndex = wdTurquoise
    Selection.Range.HighlightColorIndex = wdTurquoise
End Sub
Sub evidenziatore_rosso()
'
' evidenziatore_rosso Macro
'
'
    Options.DefaultHighlightColorIndex = wdRed
    Selection.Range.HighlightColorIndex = wdRed
End Sub

Modificata da SabaKu, 01 September 2019 - 09:49 AM.





Leggono questa discussione 0 utenti

0 utenti, 0 ospiti, 0 utenti anonimi

Logo