| Cancella carattere di
Didak |
Ciao a tutti,
voglio cancellare un
carattere dopo averlo cercato in una stringa intutte le celle col
metodo find.
Col seguente codice(vedi in fondo) riesco ad
individuare la cella che contine tale carattere, ma non so come
cancellare solo il carattere stesso e non tutto il contenuto della
cella.
Spero di essere stato chiaro, saluti di nuovo a
tutti e mille grazie in anticipo
Ecco il mio codice:
With ActiveSheet.Cells Set c = .Find("$",
LookIn:=xlValues) If Not c Is Nothing Then firstAddress =
c.Address Do c.Value = "" Set c = .FindNext(c) Loop
While Not c Is Nothing And c.Address <> firstAddress End
If End With |
|
| di Mauro |
Basta che sostituisci il metodo .find con il metodo
.replace.... esempio: NomeCarI = InputBox("Trova: ",
"Trova") NomeCarF = InputBox("Sostituisci con:", "Sostituisci")
Cells.Replace What:=NomeCarI, Replacement:=NomeCarF |
|