En VBA formule : Si "texte" Then lorsque dans le texte existe "&q

Résolu/Fermé
varin - 27 mars 2014 à 14:33
 varin - 27 mars 2014 à 16:20
Bonjour,

Je réalise une macro avec des conditionnelles If.
Chaque conditionnelle vérifie si un texte précis est présent.

Mon probléme est le suivant dans les textes présents recherchés, un texte contient des guillemets.


Exemples :

If Cells(Numéro_Ligne_De_Titre, 0) = "Facteur 1" Then
Cette ligne ne me pose pas de problème,

Par contre
If Cells(Numéro_Ligne_De_Titre, 0) = "Complément de l'onglet "Paramètre"" Then
Cette ligne me pose problème car Paramètre est entre guillemets.

Auriez vous une solution.

Merci d'avance
A voir également:

4 réponses

f894009 Messages postés 17197 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 juillet 2024 1 708
27 mars 2014 à 14:45
Bonjour,

Chr(34) est le code ASCII de la double cote

If Cells(Numéro_Ligne_De_Titre, 0) = "Complément de l'onglet " & Chr(34) & "Paramètre" & Chr(34) Then

par contre le zero ira pas cells(1,1) = A1
Bonjour,

Merci pour l'aide.

J'ai modifié la macro en conséquence et elle bug avec Erreur d'exécution '1004' : Erreur définie par l'application ou par l'objet.
f894009 Messages postés 17197 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 juillet 2024 1 708
27 mars 2014 à 15:53
Re,

montrez ce que vous avez ecrit !!!!!!
Génial !

Tout fonctionne, cela m'a beaucoup aidé.

Mon erreur venait de mon adressage de cellule avec les deux variables ligne et colonne.

Merci encore et bonne journée.