Sans faire le test avec un Si (car je peux avoir bcp de valeurs à exclure), comment puis-je faire pour lui dire de ne pas faire le traitement quand row prend les valeurs 42, 45, 48, 49 par exemple ?
cs_labout
Messages postés1356Date d'inscriptionsamedi 8 décembre 2001StatutMembreDernière intervention23 octobre 20068 20 déc. 2004 à 13:39
labout
Je metrais les valeur dans un tableau 1 valeur par élément
puis je parcourerais le tableau pour voir si la valeur est dedans
Dim aTab(10) as string
atab(0)="23"
atab(0)="24"
atab(0)="28"
For row = 23 To 50
if testeRow(atab,row) =false then
XlApp.ActiveSheet.Cells(row, col) = rcsAuditEval.Fields(field)
endif
field = field + 1
Next
function TestRow(tableau,row) as boolean
dim i as integer
TestRow=false
for i=0 to ubound(tableau)
if tableau(i)=row then
testrow=true
exit for
endif
next
cs_labout
Messages postés1356Date d'inscriptionsamedi 8 décembre 2001StatutMembreDernière intervention23 octobre 20068 20 déc. 2004 à 20:49
labout
Oui mais ce n'est pas du VB.net pointilleux sur ce point là
pour les atab(0))"23"
if s'agit bien sur d'une erreur le suivant est atab(1) etc..
du à un copier coller !
@+