Contenu récent par goulabf9

Re : Export dans un fichier texte en conservant le format Résolu avec un code peu élégant qui exporte, importe puis reexeporte le texte: Private Sub Export_Citrix_Click() Dim derniereligne As Integer, i As Integer Dim j As Integer Sheets("Export Citrix").Select derniereligne =...

Re : Export dans un fichier texte en conservant le format Je précise que j'ai essayé la commande suivante valeur = Replace(ActiveSheet.Cells(i, 5).Value, ",", ".") ca permet bien d'écrire un point á la place de la virgule mais en revanche, ca ne maintient pas les deux décimales. Fabien

Bonjour, J'ai une macro excel qui écrit dans un fichier texte. Voici le bout qui écrit: For i = 1 To derniereligne Print #1, Format(ActiveSheet.Cells(i, 1).Value, "dd/mm/yyyy"); ";"; _ ActiveSheet.Cells(i, 2).Value; ";"; _ ActiveSheet.Cells(i, 3).Value; ";"...