Bonjour à tous,
J'ai un code qui exporte la colonne P dans un fichier texte ( toto.txt ) qui se crée. Il fonctionne parfaitement mais, il y a toujours un mais ^^ , il ne fait pas exactement ce que je souhaite.
Il exporte la cellule ( ce qu'il y a dans la barre formule) alors que je souhaiterai exporter le contenu dans la cellule part exemple : au lieu de ="tata" je voudrais tata
voici le fameux code :
J'ai un code qui exporte la colonne P dans un fichier texte ( toto.txt ) qui se crée. Il fonctionne parfaitement mais, il y a toujours un mais ^^ , il ne fait pas exactement ce que je souhaite.
Il exporte la cellule ( ce qu'il y a dans la barre formule) alors que je souhaiterai exporter le contenu dans la cellule part exemple : au lieu de ="tata" je voudrais tata
voici le fameux code :
Code:
Sub Export()
Call Importer.variable
Application.ScreenUpdating = False
Sheets("Plan donnée").Activate
Columns("P:P").Select
Selection.Copy
Workbooks.Add
Columns("A:A").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ChDir "C:\"
ActiveWorkbook.SaveAs Filename:="C:\toto.txt", _
FileFormat:=xlUnicodeText, CreateBackup:=False
ActiveWorkbook.Close SaveChanges:=False
Application.ScreenUpdating = True
End Sub