Condividi tramite

Word macro che cancella le righe a condizione che

Anonimo
2025-04-29T11:59:06+00:00

In un file Word vorrei creare una macro che cancelli tutte le parole evidenziate con un certo colore, per esempio verde, in alternativa che cancelli tutte le righe che cominciano con un certo carattere

Microsoft 365 e Office | Word | Per la casa | MacOS

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento

4 risposte

Ordina per: Più utili
  1. Anonimo
    2025-05-05T17:36:44+00:00

    La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

    Ciao

    Non abbiamo avuto tue notizie, quindi presumiamo che il tuo problema sia già stato risolto. Non monitoreremo questo thread in futuro, quindi, se hai bisogno di ulteriore assistenza, crea un nuovo thread per discutere di questi problemi facendo clic su questo link: Crea una nuova domanda (microsoft.com)

    Grazie per la comprensione.

    Migliori saluti

    JK

    Comunità Microsoft

    Moderatore

    La risposta è stata utile?

    0 commenti Nessun commento
  2. Anonimo
    2025-05-02T18:13:55+00:00

    La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

    Ciao

    Grazie per la tua pronta risposta, mi dispiace farti sapere che ci è vietato contattare direttamente via e-mail per fornire passaggi per la risoluzione dei problemi, tuttavia fammi provare a ricreare il comando VBS:

    Sub RimuoviParoleEvidenziate()

    Dim rng As Range 
    
    Attenua evidenziaColora più a lungo 
    
    ' Imposta il colore di evidenziazione che desideri eliminare (ad esempio, wdYellow = 7) 
    
    highlightColor = wdYellow ' Cambia questo con il colore di evidenziazione desiderato 
    
    ' Scorri tutte le parole del documento 
    
    Per ogni rng in ActiveDocument.Words 
    
        Se rng. HighlightColorIndex = evidenziaColorColora poi 
    
            RNG. Testo = "" 
    
        Fine Se 
    
    Prossimo rng 
    

    Fine Sub

    Migliori saluti

    JK

    Comunità Microsoft

    Moderatore

    La risposta è stata utile?

    0 commenti Nessun commento
  3. Anonimo
    2025-04-29T18:52:22+00:00

    Ciao grazie, la traduzione automatica ha rovinato il codice che mi hai scritto. Potresti inviarmelo cin modo che il sistema non traduca? grazie.

    La risposta è stata utile?

    0 commenti Nessun commento
  4. Anonimo
    2025-04-29T18:04:51+00:00

    La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

    Ciao Andrea,

    Buongiorno

    Benvenuto nella community Microsoft, siamo qui per aiutarti

    Grazie per aver portato questo alla nostra attenzione, capisco che hai bisogno di assistenza con una macro che elimina la parola evidenziata, ecco cosa puoi provare a fare:

    1. Apri Microsoft Word.
    2. Premi Alt + F11 per aprire l'editor VBA.
    3. Nella finestra VBA, vai su Inserisci modulo >.
    4. Copia e incolla il seguente codice:

    VBASub DeleteHighlightedWords() Dim rng As Range Attenua evidenziaColorColora come WdColorIndex highlightColor = wdYellow ' Cambia questo con il colore di evidenziazione desideratoPer ogni rng in ActiveDocument.Words Se rng. HighlightColorIndex = evidenziaColorColora poi RNG. Cancellare Fine Se Prossimo rngFine Sub

    Come usarlo

    1. Modificare wdYellow con l'indice di colore corrispondente al colore di evidenziazione che si desidera impostare come target (wdRed, wdBlue, ecc.).
    2. Eseguire la macro premendo F5 o andando su Macro (Alt + F8), selezionando EliminaParole evidenziate e facendo clic su Esegui.

    Spero che questo aiuti

    Migliori saluti

    JK

    Comunità Microsoft

    Moderatore

    La risposta è stata utile?

    0 commenti Nessun commento