Ricerca e sostituzione valore

Hai un problema con Excel?

Nuova discussione

Ricerca e sostituzione valore
di Nic82 data: 14/05/2010
Cia a tutti, dovevo ricercare una parte di una stringa in un range e sostituire il valore di tutte le celle che la contenevano (nb: non dovevo sostituire la parte di stringa ricercata con un altra stringa, bensì proprio tutto il valore della cella).

ho usato le due macro qui sotto ed hanno funzionato, solo che mi ha dato messaggio di errore quando è finita la sostituzione dei valori, cioè quando tutte le celle che contenevano nella loro stringa la parola "ciao" sono state sostituite con il valore "mamma".

mi sapete dire un modo per evitare questa cosa?

inoltre ci sarà sicuramente una macro più elegante che fa questa operazione in un sol colpo invece di doverne usare due...per farlo si potrebbe usare il metodo findnext???

qualcuno mi può fare un'esempio di come avrei potuto usare il findnext in questa macro senza per forza dover ricorrere a due macro separate????

grazie e...aiutooooooooo

di Nic82 data: 14/05/2010
Scusate ecco sotto le macro...ciao

Sub sostituzione()
For Each c In Range([B2], [B2].End(xlDown))
Sostituzione1
Next
End Sub

Sub Sostituzione1()
With Range([B2], [B2].End(xlDown))
.Find("ciao").Select
Selection.Value = "mamma"
End With
End Sub

Vuoi Approfondire?