Fonction Close true

Bonjour,

j'utilise un fichier qui ouvre une base de donnée inscrit des donnée la ferme l 'enregistre .

Tout fonctionnait correctement , et du jour au lendemain le code bloque sur la fonction

Workbooks('nom fichier").Close True

je ne trouve pas la solution

si j'enregistre manuellement , ça marche !

merci d'avance

Bonjour Joulef, bonjour le forum,

Le code exact s'il te plaît !

• Tu mis une apostrophe devant nom fichier et un guillemet derrière. Ça ne peux pas marcher.

• On se sait pas si tu parles d'une variable ou si tu as écrit nom fichier comme ça.

• Le nom doit comporter l'extension !

Bref, aide-nous si tu veux qu'on t'aide...

Bonjour Désolé ,

du manque d'information , je rectifie voici le code :

Sub actualiasation
Application.ScreenUpdating = False
Sheets("Intertech").Unprotect
Dim bd As Workbook, plage As Range

Set bd = GetObject("X:\Banque\Consigne V2\bdtech.xlsx")
Set plage = ActiveSheet.Range("C11:J50")
Call LectureTech(bd, plage)
Workbooks("bdtech").Close True 'Ligne sur laquelle çà bloque 
End sub

la base de donnée s'appel "bdtech.xls" .

je rappel que tout fonctionnait très bien

Le message d'erreur est

erreur d'execution 9 :

l'indice n'appartient pas à la selection.

Merci de votre aide

Re,

Ton fichier ne s'appelle pas bdtech.xls comme tu sembles le dire mais bdtech.xlsx, sinon la ligne Set bd... planterait...

Essaie avec :

Workbooks("bdtech.xlsx").Close True

ou avec :

bd.Close True

Effectivement c'était en xlsX , faute de frappe !

en rajoutant l'extension ça fonctionne !!! c'était pourtant simple, par contre je ne comprend pas pourquoi hier sa fonctionnait sans .....