Domanda

In una VBA-Macro in MS Word 2007 Voglio cambiare il testo evidenzia il colore in giallo per il testo che verrà digitato dopo la posizione del cursore.

Se voglio cambiare il colore del testo attualmente selezionato, posso farlo con Selection.Range.HighlightColorIndex = wdYellow

Ma questo sembra funzionare solo se il testo esiste già ed è selezionato. Posso anche impostare il colore evidenziato in giallo per il testo che verrà inserito nella posizione del cursore?

(e. G. Se clicco sul pulsante "Bold Font", tutto il testo futuro sarà audace, Ma questo non sembra funzionare con la funzione Highlight, o c'è un modo per farlo?)

È stato utile?

Soluzione

.

Tutto il testo futuro sarà audace

No, non lo farà.Facendo clic su bold si contrassegna il punto corrente nel testo come grassetto, e se si esegue la digitazione da quel punto, il testo sarà audace perché viene digitato da un luogo in grassetto, non perché il pulsante si preme.Se fai clic su bold, spostare il Caret in qualche altro posto e digita, non sarà audace.

Il modo corretto è inserire il testo e applicare la formattazione al suo intervallo.

Dim r As Range
Set r = Selection.Range

r.Collapse wdCollapseStart
r.InsertAfter "Text to insert"
r.HighlightColorIndex = wdYellow
.

Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow
scroll top