Compter dans plusieurs classeurs

[fdux33]

Bonjour à tous,

Au collège où je travaille, chaque élève est identifié par un numéro (ex: 1, 2, 3, etc...)
Grâce à votre forum, j'ai créé un classeur qui, après identification du numéro, enregistre les passages au self.
A la fin de chaque service, le classeur est enregistré dans un dossier "Cantine" sous le nom"Cantine-21-01-12" (par exemple).
Maintenant, je cherche (mais sans succès pour l'instant) à créer (en VBA) une fonction (par ex = janvier(cellule) qui compte le nombre de passages au self de cellule pour le mois de janvier.

Voici un début de travaux

Function janvier(.......)
Application.Volatile
Dim i, j As Integer
Dim Direction As String


Application.ScreenUpdating = False
Direction = Dir("C:\Documents and Settings\Francois\Bureau\Cantine*.xls")

For i = 1 To 31, j=10 to 60
.FormulaArray = "='" & "C:\Documents and Settings\Francois\Bureau\Cantine" & "\"Cantine-"&"i"&"-01"&"20"&"j"
.Value = .Value

Application.ScreenUpdating = True
End function

Il me manque beaucoup de choses


Cordialement.

Ci-joint deux fichiers exemples de passage et un fichier bilan dans lequel je cherche à incorporer la fonction.

 

[phlaurent55]

Re : Compter dans plusieurs classeurs

Bonjour fdux33, et bienvenue sur le forum

j'ai l'impression que tu cherches à te compliquer l’existence

Personnellement, si je devais gérer tout cela, je le ferais sur un seul fichier
qui contiendrais une feuille par mois
une colonne par jour dans les feuilles des différents mois
et une feuille récapitulative pour l'année complète

pourquoi compliquer les choses quand on peut faire (très) simple

à+
Philippe

 

[fdux33]

Re : Compter dans plusieurs classeurs

Merci beaucoup de ta réponse phlaurent55,

Mais le classeur que j'ai créé (rempli de formules de recherche et d'une fonction afficheImage merci à Boisgonthier) affiche le nom, prénom, régime de l'élève et sa photo automatiquement après le passage sous la douchette.
Donc tout ceci prends de la place.
Je ne pouvais donc pas utiliser une colonne par jour.

Cordialement.

 

[phlaurent55]

Re : Compter dans plusieurs classeurs

Re,

voir fichier joint

à+
Philippe

Édit:
je n'avais pas vu ta réponse avant de poster
il serait peut-être possible d'adapter les solutions de Jacques Boisgontier à ce classeur

 

[fdux33]

Re : Compter dans plusieurs classeurs

Merci phlaurent55,

Classeur très intéressant.
J'y planche.
Reste pour moi à créer la feuille "Janvier" qui va doit aller chercher via VBA les passages des élèves dans les classeurs "Cantine ..-01-12", les compter et les mettre dans la feuille "Janvier".