Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

aiuto per macro

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

aiuto per macro

Postdi stbdiserena » 25/06/09 10:53

mio figlio ipovedente , i compiti li esegue al computer con word,
il formato più adatto al suo problema è lo sfondo nero con carattere bianco.
Però non sempre è così, può capitare di trovare pagine con font di diversi colori.
Ora il problema è il carattere di colore nero.

In word si può creare una macro che selezioni solo il testo con colore nero, per poi cambiarlo col colore bianco?
grazie per l'aiuto
stbdiserena
Newbie
 
Post: 5
Iscritto il: 14/12/07 08:08

Sponsor
 

Re: aiuto per macro

Postdi mercatogalante » 25/06/09 11:34

stbdiserena ha scritto:mio figlio ipovedente , i compiti li esegue al computer con word,
il formato più adatto al suo problema è lo sfondo nero con carattere bianco.
Però non sempre è così, può capitare di trovare pagine con font di diversi colori.
Ora il problema è il carattere di colore nero.

In word si può creare una macro che selezioni solo il testo con colore nero, per poi cambiarlo col colore bianco?
grazie per l'aiuto


Che office è 2003 o 2007?
La Calma è la virtù dei forti!
http://www.retestudio.it - http://www.poweruser.it
mercatogalante
Utente Senior
 
Post: 131
Iscritto il: 11/06/09 13:01
Località: Padova

Re: aiuto per macro

Postdi stbdiserena » 25/06/09 11:40

word 2007
stbdiserena
Newbie
 
Post: 5
Iscritto il: 14/12/07 08:08

Re: aiuto per macro

Postdi ricky53 » 25/06/09 13:01

Ciao,
non ho il 2007 ma il 2003, dovrebbe andare bene lo stesso

ecco la macro

Codice: Seleziona tutto
Sub Testo_Bianco_su_Fondo_Nero()
' seleziona tutto il testo
    Selection.WholeStory

' imposta il colore del testo a "bianco"
    Selection.Font.Color = wdColorWhite

' imposta lo sfondo a "nero"
    Selection.Range.HighlightColorIndex = wdBlack
End Sub
Dice il vecchio saggio provare e riprovare è l'unica strada per imparare

Più chiara è la vostra spiegazione
Più immediata sarà la nostra soluzione


. . . . . . . . . .
S.O. W7; Office 2003-10-13-16
Avatar utente
ricky53
Utente Senior
 
Post: 4223
Iscritto il: 11/04/09 19:29
Località: Italia

Re: aiuto per macro

Postdi stbdiserena » 26/06/09 10:25

ok la macro funziona, però non mi sono spiegato bene
Esempio: ho un documento con carattere di vari colori,
io voglio lasciare intatti tutti gli altri colori e cambiare solo il carattere in nero.
Cioè, vorrei selezionare prima solo il carattere di colore nero (non tutto il testo) e cambiarlo col bianco, si può fare?
stbdiserena
Newbie
 
Post: 5
Iscritto il: 14/12/07 08:08

Re: aiuto per macro

Postdi ricky53 » 26/06/09 16:01

Ciao
prova a sostituire

' seleziona tutto il testo
Selection.WholeStory

con

Selection.TypeParagraph
Selection.MoveLeft Unit:=wdCharacter, Count:=55, Extend:=wdExtend
' devi agire sul "55"

con Word non sono un "Mago" ...

Ciao da Ricky53
Dice il vecchio saggio provare e riprovare è l'unica strada per imparare

Più chiara è la vostra spiegazione
Più immediata sarà la nostra soluzione


. . . . . . . . . .
S.O. W7; Office 2003-10-13-16
Avatar utente
ricky53
Utente Senior
 
Post: 4223
Iscritto il: 11/04/09 19:29
Località: Italia


Torna a Applicazioni Office Windows


Topic correlati a "aiuto per macro":

Aiuto urgente!!!
Autore: templare77
Forum: Software Windows
Risposte: 0

Chi c’è in linea

Visitano il forum: Nessuno e 19 ospiti