Bonjour à tous,
Voila je dois ouvrir un classeur pour y extraire des informations et les mettre dans mon fichier courant. Voici mon code:
la fonction StrFile ouvre une boite de dialogue pour selectionner un classeur Excel 2002, et marche, puisque la msgbox me donne le bon chemin d'acces...
Au cas ou , "Faux" est ma valeur de retour au cas ou quelqu'un clique sur annuler dans la boite de dialogue...
cependant j'ai toujours une erreur à wb = Workbook.Open(nomfic) (que le nom de fichier contienne des espaces ou pas)
L'erreur est '424' Objet requis...
Pourriez vous m'aider?
Merci d'avance
Vaati
Voila je dois ouvrir un classeur pour y extraire des informations et les mettre dans mon fichier courant. Voici mon code:
Code:
Public Sub synchroniserFicConsommations()
Dim nomfic As String
Dim nomCourrant As String
Dim wb As Workbook
nomCourrant = ActiveWorkbook.Name
nomfic = StrFile
MsgBox nomfic
If nomfic <> "Faux" Then
wb = Workbook.Open(nomfic)
Else
Exit Sub
End If
End Sub
la fonction StrFile ouvre une boite de dialogue pour selectionner un classeur Excel 2002, et marche, puisque la msgbox me donne le bon chemin d'acces...
Au cas ou , "Faux" est ma valeur de retour au cas ou quelqu'un clique sur annuler dans la boite de dialogue...
cependant j'ai toujours une erreur à wb = Workbook.Open(nomfic) (que le nom de fichier contienne des espaces ou pas)
L'erreur est '424' Objet requis...
Pourriez vous m'aider?
Merci d'avance
Vaati