Boucle if Multilignes

Version imprimable

Bonjour,

J'ai une boucle if qui est un peu longue et je souhaite la mettre sur plusieurs lignes :

Code:

1
2
3
4
 
If (ChefDeServiceWorkbook.Sheets("Chef de Service").Range("A" & Indice) = "" Or ChefDeServiceWorkbook.Sheets("Chef de Service").Range("B" & Indice) = "" Or ChefDeServiceWorkbook.Sheets("Chef de Service").Range("C" & Indice) = "" Or ChefDeServiceWorkbook.Sheets("Chef de Service").Range("R" & Indice) = "") Then
        ServiceEstValide = False
    End If

De plus J'ai une erreur d'exécution au niveau de mon instruction if

Bonjour
Il faut séparer tes morceaux de ligne par " _" comme suit

Code:

1
2
3
4
5
6
7
 
If (ChefDeServiceWorkbook.Sheets("Chef de Service").Range("A" & Indice) = "" _
    Or ChefDeServiceWorkbook.Sheets("Chef de Service").Range("B" & Indice) = "" _
    Or ChefDeServiceWorkbook.Sheets("Chef de Service").Range("C" & Indice) = "" _
    Or ChefDeServiceWorkbook.Sheets("Chef de Service").Range("R" & Indice) = "") Then
        ServiceEstValide = False
    End If

Slts

27/07/2007, 09h54
viscere

Merci beaucoup!
28/07/2007, 10h18
AlainTech

Tu peux cliquer sur le bouton Résolu (en bas de discussion) si la solution te convient?

Merci.
28/07/2007, 14h57
zazaraignée

Déjà qu'une instruction If, c'est pas une boucle... :roll: