Puoi facilmente sostituire tutte le dieresi usando una macro
Di solito non è un problema così grande come lo era alcuni anni fa, ma le dieresi possono ancora causare problemi durante lo scambio di dati. La figura seguente mostra una tabella con testi che contengono dieresi:
Se hai bisogno di scambiare informazioni con altri sistemi o inviare dati ad altri paesi, può quindi essere utile sostituire tutte le dieresi in una tabella. Sostituisci la ä con una ae, la ö con una oe, ecc.
Naturalmente, puoi farlo chiamando ripetutamente la funzione EDIT - REPLACE. Ma questo è un sacco di lavoro. Se si desidera sostituire tutte e tre le dieresi ä, ö e ü in maiuscolo e minuscolo, nonché la ß, è necessario eseguire sette operazioni di sostituzione di seguito.
È più facile con una macro. Ecco il codice del programma appropriato:
Sub ReplaceUmlaut ()
Cella fioca come intervallo
Con Application.WorksheetFunction
Per ogni cella in selezione
Cell.Value = .Substitute (.Substitute (.Substitute (.Substitute (_
.Substitute (.Substitute (.Substitute (Cell.Value, "ä", "ae"), _
"ö", "oe"), "ü", "ue"), "Ö", "Oe"), "Ü", "Ue"), "ß", "ss"), _
"Ä", "Ae")
Cella successiva
Termina con
Fine sottotitolo
La macro annida le chiamate di sostituzione appropriate tramite la funzione sostituti l'uno nell'altro. Questo è il nome della funzione inglese della funzione di tabella REPLACE.
Per utilizzare la macro, seleziona prima le celle in cui desideri sostituire le dieresi e quindi chiama la macro. La figura seguente mostra l'aspetto della tabella con le dieresi dopo l'avvio della macro:
