Problème surement tout simple

[milou71240]

Bonjour

Quand je rentre cette instruction
Dim se As String
se = "Simple effet"
Dim ssp As String
ssp = "Sortie sans pression"
Dim esp As String
esp = "Entrée sans pression"
Dim tar As String
tar = "Taraudage"
Dim fil As String
fil = "Filetage"

If Sheets("bd").Cells(13, 15) = se And Sheets("bd").Cells(16, 15) = esp And Sheets("bd").Cells(19, 15) = tar Then
Sheets("bd").Cells(25, 15) = 1

Je ne comprend pas pourquoi cela ne marche pas alors que je rentre la même instruction sans le dernier And j'obtiens un résultat

Donc je voulais savoir si le nombre de and était limité

Merci d'avance

 

[ROGER2327]

Re : Problème surement tout simple

Bonjour milou71240

Je viens d'essayer. Pas de problème. Voir le classeur joint. (Clic sur le bouton Test.)​

 

[soenda]

Re : Problème surement tout simple

Bonjour Milou71240

Je ne comprend pas pourquoi cela ne marche pas alors que je rentre la même instruction sans le dernier And j'obtiens un résultat

A mon avis : Cells(19, 15) <> tar

Car il y a probablement un espace dans la dite cellule, ex:

tar = "Taraudage"
Cells(19, 15) = " Taraudage"

On a bien : "Taraudage" = " Taraudage" ==> FAUX

A plus

PS: bonjour Roger, que je n'avais pas vu 🙂