Discussion :

[7ider5]

Bonjour,

Pour éviter d'imbriquer trop de conditions je fais ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
If Tableau(i, 1) < IIf(i = 1, Before(1), Tableau(i - 1, 1)) Then
...

Sauf que si i=1 VBA évalue quand même la deuxième partie du IIf() et me plante :

L'indice n'appartient pas à la sélection

Comment puis-je contourner cette erreur?

Merci par avance,

P.

[7ider5]

Je pensais remplir la première ligne de Tableau avec des zéros sauf que je le charge et le décharge de cette façon :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Tableau = [C3:H1442].Value
 
... traitement
 
[C3:H1442].Value = Tableau

Du coup il faudrait que je puisse joindre et scinder le tableau 2d et là...

[7ider5]

Pardon pour le post trop rapide j'ai trouvé un exutoire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
If Tableau(i, 1) < IIf(i = 1, Before(1), Tableau(IIf(i=1,2,i) - 1, 1)) Then
...

C'est pas beau mais ça marche