.value copier en conservant la mef

[oceyann1]

Bonjour,

pour faire simple et éviter de trop polluer mon post.

j’ai un onglet “TABLES” dans lequel j’ai une colonne “I” contenant des valeurs au format texte commençant toutes par “0”. Ex : 0759970951

Je souhaite copier cette valeur dans un autre onglet “APHP FILTRE” colonne A en conservant la mef.

Ma macro =>Sheets(« UG FILTRE »).Range(« A » & lignerecopie).Value = Sheets(« TABLES »).Range(« I » & i).Value

Sauf que dans la colonne de destination il me supprime systématiquement le zéro “0”

Une idée ?

Merci++++

[Daniel77]

Bonjour,

Essaie :

Sheets(« TABLES »).Range(« I » & i).Copy Sheets(« UG FILTRE »).Range(« A » & lignerecopie)

Daniel

[Cow18]

Sheets("UG FILTRE").Range("A" & lignerecopie).Value = "'" & Sheets("TABLES").Range("I" & i).Value

[taz067]

@oceyann1

j’ai un onglet “TABLES” dans lequel j’ai une colonne “I” contenant des valeurs au format texte commençant toutes par “0”. Ex : 0759970951

Pourquoi ne pas simplement utilisé le format téléphone pour cette colonne