Scambia caratteri nelle celle di Excel - Macro VBA

Sommario

Come sostituire tutti i caratteri in una tabella con altri caratteri

Lo sai che? I dati ricevuti dai partner commerciali o dopo l'importazione dei dati contengono caratteri non corretti. Può capitare che appaia un punto decimale ovunque sia necessario un punto decimale. Oppure può capitare che compaiano delle barre tra le singole cifre.

È possibile utilizzare il comando REPLACE per trovare questi caratteri e sostituirli con altri caratteri. Ma ci vuole un grande sforzo se vuoi fare questo processo più spesso. Risparmia tempo eseguendo l'attività utilizzando una macro. Puoi richiamare questa macro di nuovo rapidamente e facilmente nella stessa situazione in futuro.

Per includere la macro in una cartella di lavoro vuota, aprire una nuova cartella di lavoro in tutte le versioni di Excel utilizzando la combinazione di tasti CTRL N. Quindi premere la combinazione di tasti ALT F11 per visualizzare l'editor VBA. Lì selezionare il comando INSERISCI - MODULO. Quindi inserisci la seguente macro:

Scambia caratteri secondari ()
In caso di errore Riprendi Avanti
Cella fioca come intervallo
Dim Cerca come stringa
Sostituisci attenuato con come stringa
Cerca = "."
Sostituisci con = ","
Per ogni cella in ActiveSheet.UsedRange
Cell.Value = Application.Substitute (Cell.Value, FindFor, ReplaceBy)
Cella successiva
In caso di errore Vai a 0
Fine sottotitolo

La macro sostituisce la virgola decimale con una virgola decimale in tutte le celle utilizzate nel foglio di lavoro attivo. Per richiamare la macro, attivare il foglio di lavoro desiderato, premere la combinazione di tasti ALT F8 e selezionare la macro SCAMBIO CARATTERI.

Per controllare quale contenuto viene cercato e sostituito, regolare le due variabili SUCHENNACH e REPLACE BY nella macro.

Aiuterete lo sviluppo del sito, condividere la pagina con i tuoi amici

wave wave wave wave wave