Bonsoir,

J'ai un souci ; je travaille sur excel 2003.

Je suis dans un fichier excel "macro.xls" où il y a un bouton.
Ce bouton lance la macro suivante qui fonctionne de façon étrange :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Set oXL = New Excel.Application
Set oBook = oXL.Workbooks.Open("d:\Documents and Settings\KRIMO\test.xls")    
Set oSheet = oXL.ActiveWorkbook.Sheets("Table")
'   Set oSheet = oBook.Worksheets("Table")      
'    oXL.Visible = False
'    oSheet.Activate
'   oSheet.Select
 
    Range("E17") = Application.WorksheetFunction.CountA(oSheet.Range("C:C")) 
    Range("E22") = Application.WorksheetFunction.CountIf(Range("C:C"), "Site")
La fonction CountA fait le travaille correctement de recherche dans le fichier ouvert "test.xls".
Par contre la fonction CountIF travaille sur le fichier à partir duquel j'appelle la macro via le bouton macro.xls. ET c'est pas le but

J'aurai voulu que countIF joue sur le fichier "test.xls" feuille "Table" comme countA !
D'où provient le problème svp


J'ai essayé plein de bricolage mais sans succès (mis en commentaires code ci-dessus)


Merci d'avance et bon week-end