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

Résolu
varin -  
 varin -
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

Réponse 1 / 4
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
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
0
Réponse 2 / 4
varin
 
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.
0
Réponse 3 / 4
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

montrez ce que vous avez ecrit !!!!!!
0
Réponse 4 / 4
varin
 
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.
0

Discussions similaires

Décalage de formule
nathan01983 -
via55 -

12 réponses
"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses