Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic code vba (remplacer un caractere)

code vba (remplacer un caractere)

1 réponse
Avatar
cedlannoy
bonjour,
j'ecris ce code pour retirer un caractere dans un fichier texte depuis un
bouton sous access,
voici l'exemple pour remplacer £ par $ , mais si le caractere a renplacer
est le " comment faire?
je ne peux pas mettre """

Open "c:\email_sacom_lignes.txt" For Input As #1
While Not EOF(1)
Line Input #1, ligne1
If fichier = "" Then
fichier = ligne1
Else
fichier = fichier & vbCrLf & ligne1
End If
Wend
Close #1
fichier = Replace(fichier, "£", "$")
Open "c:\email_sacom_lignes.txt" For Output As #1
Print #1, fichier
Close #1


merci
Signaler un problème avec ce contenu

1 réponse

Supprimer
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
Avatar
EddiGordo
"cedlannoy" avait soumis l'idée :
bonjour,
j'ecris ce code pour retirer un caractere dans un fichier texte depuis un
bouton sous access,
voici l'exemple pour remplacer £ par $ , mais si le caractere a renplacer
est le " comment faire?
je ne peux pas mettre """

Open "c:email_sacom_lignes.txt" For Input As #1
While Not EOF(1)
Line Input #1, ligne1
If fichier = "" Then
fichier = ligne1
Else
fichier = fichier & vbCrLf & ligne1
End If
Wend
Close #1
fichier = Replace(fichier, "£", "$")
Open "c:email_sacom_lignes.txt" For Output As #1
Print #1, fichier
Close #1


merci


Bonjour

Utilise le code ascii du guillemet : Replace(Fichier, Chr(34),
CeQueTuVeux)


--
Enjoy !