Discussion :

[stmastma]

Bonjour,
Voici mon problème, j'ai une variable qui prend une valeur en nombre.
Ex : 2009

Code :

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

1
2
3
 
dim annee_traitement as integer
total_dossiers = application.worksheetfunction.countA(worksheets(annee_traitement).range("A2:A65")

Message d'erreur :
L'indice n'appartient pas à la sélection

Si je remplace annee_traitement par le nom de la feuille aucun probleme.

[laetitia]

bonsoir stmastma le forum tu cherche a faire quoi exactement ???
2 exemples pas de variables une colonne ou une plage dans le 2 exemple je prends toute la feuille pour excel 2007 adapter

Code :

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

1
2
3
4
Sub es()
MsgBox Application.WorksheetFunction.CountA(Range("$A:$A"))
MsgBox Application.WorksheetFunction.CountA([a1:iv65536])
End Sub

autre exemple pour recuperer le nb..

Code :

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

1
2
3
4
5
Sub es()
Dim x As Byte
x = Application.WorksheetFunction.CountA([a1:b120])
MsgBox x
End Sub

ou encore

Code :

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

1
2
3
4
5
Sub es()
Dim x As Variant
x = Application.WorksheetFunction.CountA([a1:iv65536])
MsgBox x
End Sub

fait une recherche sur les variables sujet interessant

byte inferieur a257
integer inferieur a 32000
long
double
string
variant la facilite ect..

ps j'ai arrondi les valeurs plus en tête!!!

[stmastma]

demain je mets le code exact merci de ton aide.

[stmastma]

modif effectuée

[mercatog]

Code :

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

1
2
3
dim annee_traitement as integer
total_dossiers = application.worksheetfunction.countA(worksheets("" & annee_traitement & "").range("A2:A65"))
'ou bien: total_dossiers = application.worksheetfunction.countA(worksheets(cstr(annee_traitement)).range("A2:A65"))

sinon,
i integer: worksheets(i) correspond à la feuille dont l'index est i
x string: worksheets(x) correspond à la feuille dont le nom est x

[stmastma]

Code :

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

1
2
3
dim annee_traitement as integer
total_dossiers = application.worksheetfunction.countA(worksheets("" & annee_traitement & "").range("A2:A65"))
'ou bien: total_dossiers = application.worksheetfunction.countA(worksheets(cstr(annee_traitement)).range("A2:A65"))

sinon,
i integer: worksheets(i) correspond à la feuille dont l'index est i
x string: worksheets(x) correspond à la feuille dont le nom est x

génial ! j'avais essayé d'autres types de variables mais pas celle là !!!!

merci