Ok,
nella stessa cartella dove hai i fogli da modificare
aggiungi un foglio che nominerai "Impostazioni"
In A2 metterai il valore da cercare (vecchio)
In B2 il valore che andrà a sostituire (nuovo)
Volendo in A1 metterai un promemoria "Valorevecchio" e
In B1 "ValoreNuovo"
Incolla questa macro in un modulo del Vba
- Codice: Seleziona tutto
Sub ModificaValoriFogli()
Righe = 108
For F = 1 To ActiveWorkbook.Worksheets.Count
If Sheets(F).Name <> "Impostazioni" Then
'Righe = Sheets(F).Cells(Rows.Count, 4).End(xlUp).Row '<<<< Togliere commento se le righe variano di foglio in foglio
For S = 8 To Righe
If Sheets(F).Range("D" & S).Value = Sheets("Impostazioni").Range("A2").Value Then Sheets(F).Range("D" & S).Value = Sheets("Impostazioni").Range("B2").Value
Next S
End If
Next F
End Sub
Avvia la macro
Fai sapere se ok
Ciao