Supprimer le formatage automatique des cellules en date

Question

Bonjour, 

Je souhaite que excel ne transforme pas automatiquement ce que j'écris en date (par exemple "1-2" => "02-janv").
J'ai essayé de former le format des cellules en texte mais cela ne fonctionne pas. 

Voici un bout de mon code :

Set B = wk_new.Worksheets("OUT-Matr_1 MODACCEPT")

For I = 2 To B.Range("C1").End(xlDown).Row + 1
   B.Cells(I, 3).NumberFormat = "@" 'forcer en format texte
Next
Set C = B.Range(B.Range("C2"), B.Range("C2").End(xlDown))
C.Cells.Replace What:="Z1", Replacement:="1"
C.Cells.Replace What:="Z2", Replacement:="2"
C.Cells.Replace What:="Z3", Replacement:="3"
C.Cells.Replace What:="sin(S)", Replacement:="61"
C.Copy B.Range("C2")

Dans mes colonnes, j'ai par exemeple "Z1-Z2" et je veux obtenir "1-2" mais au lieu de ça, j'ai "02-janv"

Merci pour vos réponses.

BB

jepasderemy · Answer

Utilise une variable tampon

Dim variable_tampon As String

et pour chaque valeur, tu la met en mémoire dans cette variable, puis travaille avec les chaînes de caractères pour remplacer les "z", puis tu écris cette variables dans la cellule.

Supprimer le formatage automatique des cellules en date

1 réponse

Votre réponse

Discussions similaires