Erreur d'execution 1004

Résolu
gorfeatice Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
gorfeatice Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous,

J'aurais besoin d'un petit coup de main concernant la macro suivante :

Sub Stock_cbdd()

mycbd = [S3]
Mypartial = [S5]

Dim wkb As Workbook
Set wkb = Workbooks.Open("C:\stocks.xlsx")

Stock = Application.WorksheetFunction.SumIfs(wkb.Worksheets("wms_browse").Range("G2:G2056"), _
wkb.Worksheets("wms_browse").Range("D2:D2056"), mycbd, wkb.Worksheets("wms_browse").Range("N2:N2056"), "=" & Mypartial)

[T3] = Stock

End Sub


MESSAGE ERREUR :

Erreur d'execution 1004.
C:\stocks.xlsx introuvable. Verifiez l'orthographe du nom du classeur et la validité de l'emplacement.

J'ai verifié que c'etait bien un xslx, l'emplacement..je ne vois pas du tout :(

Merci à vous par avance !

1 réponse

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour,

Dim wkb As Workbook
wkb = Workbooks.Open Filename:= "C:\stocks.xlsx"

0
gorfeatice Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
Merci beaucoup Michel d'avoir pris le temps de me répondre.! Ca fonctionne.
0