Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JB
Bonjour,
Open "x.txt" For Output As #1 Set champ = [A1].CurrentRegion For lig = 1 To champ.Rows.Count ligne = "" For col = 1 To champ.Columns.Count ligne = ligne & champ.Cells(lig, col) & ";" Next col Print #1, Left(ligne, Len(ligne) - 1) Next lig Close #1
Bonjour, Par VBA, je souhaite enregistrer un fichier texte. Pas de soucis pour ç a.
Je souhaite contrôler exactement tous les caractères enregistrés.
Malheureusement, en plus de ma chaine de caractères, il m'enregistre au ssi les guillemets avant et après la chaine, ce que je ne souhaite pas.
Comment faire ?
D'avance merci,
--
Amicalement, Leo
Bonjour,
Open "x.txt" For Output As #1
Set champ = [A1].CurrentRegion
For lig = 1 To champ.Rows.Count
ligne = ""
For col = 1 To champ.Columns.Count
ligne = ligne & champ.Cells(lig, col) & ";"
Next col
Print #1, Left(ligne, Len(ligne) - 1)
Next lig
Close #1
Open "x.txt" For Output As #1 Set champ = [A1].CurrentRegion For lig = 1 To champ.Rows.Count ligne = "" For col = 1 To champ.Columns.Count ligne = ligne & champ.Cells(lig, col) & ";" Next col Print #1, Left(ligne, Len(ligne) - 1) Next lig Close #1
Bonjour, Par VBA, je souhaite enregistrer un fichier texte. Pas de soucis pour ç a.
Je souhaite contrôler exactement tous les caractères enregistrés.
Malheureusement, en plus de ma chaine de caractères, il m'enregistre au ssi les guillemets avant et après la chaine, ce que je ne souhaite pas.
Comment faire ?
D'avance merci,
--
Amicalement, Leo
Leonello
Merci beaucoup, c'est exactement ce que je cherchais.
--
Amicalement, Leo
"JB" a écrit dans le message de news:
Bonjour,
Open "x.txt" For Output As #1 Set champ = [A1].CurrentRegion For lig = 1 To champ.Rows.Count ligne = "" For col = 1 To champ.Columns.Count ligne = ligne & champ.Cells(lig, col) & ";" Next col Print #1, Left(ligne, Len(ligne) - 1) Next lig Close #1
Bonjour, Par VBA, je souhaite enregistrer un fichier texte. Pas de soucis pour ça.
Je souhaite contrôler exactement tous les caractères enregistrés.
Malheureusement, en plus de ma chaine de caractères, il m'enregistre aussi les guillemets avant et après la chaine, ce que je ne souhaite pas.
Comment faire ?
D'avance merci,
--
Amicalement, Leo
Merci beaucoup, c'est exactement ce que je cherchais.
--
Amicalement,
Leo
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1185554147.934159.213250@r34g2000hsd.googlegroups.com...
Bonjour,
Open "x.txt" For Output As #1
Set champ = [A1].CurrentRegion
For lig = 1 To champ.Rows.Count
ligne = ""
For col = 1 To champ.Columns.Count
ligne = ligne & champ.Cells(lig, col) & ";"
Next col
Print #1, Left(ligne, Len(ligne) - 1)
Next lig
Close #1
Merci beaucoup, c'est exactement ce que je cherchais.
--
Amicalement, Leo
"JB" a écrit dans le message de news:
Bonjour,
Open "x.txt" For Output As #1 Set champ = [A1].CurrentRegion For lig = 1 To champ.Rows.Count ligne = "" For col = 1 To champ.Columns.Count ligne = ligne & champ.Cells(lig, col) & ";" Next col Print #1, Left(ligne, Len(ligne) - 1) Next lig Close #1