Discussion :

[LinoVentura]

Bonjour à tous,

Je cherche à traiter automatiquement un fichier txt importé dans excel. J'ai réussi à faire pas mal de chose mais je butte sur problème : certaines données "textes" contenues dans le txt sont prises en compte comme des formules dans excel. En clair, je me retrouve avec une erreur #NOM? dans certaines cellules. Et ce même si lors de l'importation du txt je sélectionne le format texte.

J'ai tenté de supprimer automatiquement le "=" introduisant la formule qui n'en est pas une.
J'ai tenté aussi d'ajouter une apostrophe " ' " en tête de cellule pour forcer le format texte.

Dans les deux cas sans succès.

Voilà le code que j'ai testé pour l'apostrophe...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Dim r As Range
 
    For Each r In Selection
        r.NumberFormat = Text
        If r.Value <> "" Then
           r.Value = ("'" & r.Value)
        End If
    Next

Je suis novice en vba... merci d'avance de votre indulgence et de vos réponses...

[78chris]

Bonjour

Le fichier ne doit pas voir une extension CSV. Le cas échéant la remplacer par txt.

A l'étape 3 de l'importation préciser, colonne par colonne, celles qui doivent être importées en texte et non en standard.

Utiliser l'enregistreur pour récupérer le code adéquat.

[LinoVentura]

Merci Chris, cela fonctionne. je n'avais pas compris qu'il fallait sélectionner colonne par colonne le format d'importation...
Merci !

Juste une petite précision : comment sélectionner une plage de colonnes (et non une par une) pour leur attribuer le format texte ?

[78chris]

RE,

Il ne semble pas que cela soit possible, d'où l'intérêt de l'enregistrer en VBA si l'import est récurrent...