cancella testo da celle

[apocrimata75]

Codice: Seleziona tutto

Sub falso_canc()
'
' falso_canc Macro
'
    Range("A4:AX2000").Select
    Selection.Replace What:="falso", Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
    Range("A4:AX2000").Select
    Selection.Replace What:="1x21x2", Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

Range("A3").End(xlDown).Offset(1, 0).Select
End Sub


data la macro sopra riportata, la funzione dovrebbe essere, tra l'altro, quella di cancellare la parola "falso" in tutte le celle da A4 ad AX2000.

Purtroppo ciò non avviene ma non capisco il motivo, qualcuno può aiutarmi?

[Zer0Kelvin]

La macro funziona bene, per capire cosa succede bisognerebbe vedere il file.

[apocrimata75]

no, la macro non funziona, la parola "falso" rimane.

[Anthony47]

Secondo me tu stai cercando di sostituire dei Falso restituiti da formule; per verificare l' arcano servira' un file di test, come gia' chiesto da Z0K.

Ciao

[apocrimata75]

si esatto sono dei falso restituiti da formule, copiate come "incolla valori" in un altro foglio. Stasera posso inviare il file.

[Anthony47]

Il file probabilmente non serve; pero' dovresti dire che cosa vuoi fare quando la cella contiene Falso: vuoi cancellare la formula che contiene, oppure...?

Ciao

[scossa]

.....
data la macro sopra riportata, la funzione dovrebbe essere, tra l'altro, quella di cancellare la parola "falso" in tutte le celle da A4 ad AX2000.

Purtroppo ciò non avviene ma non capisco il motivo, qualcuno può aiutarmi?
..........

si esatto sono dei falso restituiti da formule, copiate come "incolla valori" in un altro foglio. Stasera posso inviare il file.

sostituisci:

Codice: Seleziona tutto

What:="falso"

con:

Codice: Seleziona tutto

What:="False"

[apocrimata75]

Grazie mille scossa, funziona perfettamente!