Remplacer chaine dans fichier texte [Résolu]
xavierdu81
- Messages postés
- 5
- Date d'inscription
- samedi 14 octobre 2006
- Dernière intervention
- 16 septembre 2008
- Messages postés
- 7401
- Date d'inscription
- mercredi 23 avril 2003
- Dernière intervention
- 6 avril 2012
A voir également:
- Vb replace
- Rechercher/Remplacer chaine dans fichier txt ✓ - Forum - Visual Basic 6
- Recherche de chaine dans fichier texte - Forum - Visual Basic
- Remplacer caracteres dans fichier texte - Forum - Visual Basic
- Modifier un fichier texte en remplacant une chaine par une autre ✓ - Forum - Java
- Visual Basic : Comment remplacer un caractere par un autre dans une chaine de caractere ? - Guide
4 réponses
Meilleure réponse
- Messages postés
- 5
- Date d'inscription
- samedi 14 octobre 2006
- Dernière intervention
- 16 septembre 2008
Je viens de trouver une fonction justement sur code source et ça marche :
Public Function mafonctionReplace(expr As String, car1 As String, car2 As String)
I = InStr(expr, car1)
Do While I > 0
expr = Left(expr, I - 1) & car2 & Right(expr, Len(expr) - I - Len(car1) + 1)
I = InStr(expr, car1)
Loop
mafonctionReplace = expr
End Function
Ça me va parfaitement pour mon cas ! merci quand même
Public Function mafonctionReplace(expr As String, car1 As String, car2 As String)
I = InStr(expr, car1)
Do While I > 0
expr = Left(expr, I - 1) & car2 & Right(expr, Len(expr) - I - Len(car1) + 1)
I = InStr(expr, car1)
Loop
mafonctionReplace = expr
End Function
Ça me va parfaitement pour mon cas ! merci quand même
Avec quelques mots c'est encore mieux Ajouter un commentaire
a aidé 93 internautes ce mois-ci
- Messages postés
- 7401
- Date d'inscription
- mercredi 23 avril 2003
- Dernière intervention
- 6 avril 2012
Salut,
C'est étonnant qu'il ne reconnaisse pas Replace.
Peu tu nous dire
1 - Quand tu tapes Replace puis ( est ce que VBA te montre les paramètres attendus? Si oui alors Replace est reconnu et devrait fonctionner
2 - Essaie peu être de remplacer Replace Par Strings.Replace
3 - Le code utilisé pour utiliser Replace
@+: Ju£i€n
Pensez: Réponse acceptée
C'est étonnant qu'il ne reconnaisse pas Replace.
Peu tu nous dire
1 - Quand tu tapes Replace puis ( est ce que VBA te montre les paramètres attendus? Si oui alors Replace est reconnu et devrait fonctionner
2 - Essaie peu être de remplacer Replace Par Strings.Replace
3 - Le code utilisé pour utiliser Replace
@+: Ju£i€n
Pensez: Réponse acceptée
- Messages postés
- 5
- Date d'inscription
- samedi 14 octobre 2006
- Dernière intervention
- 16 septembre 2008
Ben apparement non, lorsque je tape Replace il ne reconnait pas cette fonction. petit détail, j'utilise access 97 peut etre qu'elle n'existe pas dans cette ancienne version ! ?
Mon code :
Open "C:\export.xml" for Output as #1
Do until EOF(1)
Replace(1, "é", "é")
Loop
je n'ai aucune idée comment coder ca ! pour qu'il remplace dans un fichier texte !
Mon code :
Open "C:\export.xml" for Output as #1
Do until EOF(1)
Replace(1, "é", "é")
Loop
je n'ai aucune idée comment coder ca ! pour qu'il remplace dans un fichier texte !
- Messages postés
- 7401
- Date d'inscription
- mercredi 23 avril 2003
- Dernière intervention
- 6 avril 2012
Salut,
Y a pas de quoi je n'ai pas été d'une grande aide au final
En revanche si tu estimes que ton problème est résolu, appuies sur le bouton réponse acceptée du ou des posts qui t'ont aider à avancer (même si ici au final c'est l'un des tiens)
@+: Ju£i€n
Pensez: Réponse acceptée
Y a pas de quoi je n'ai pas été d'une grande aide au final
En revanche si tu estimes que ton problème est résolu, appuies sur le bouton réponse acceptée du ou des posts qui t'ont aider à avancer (même si ici au final c'est l'un des tiens)
@+: Ju£i€n
Pensez: Réponse acceptée
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.