Discussion :

[parmi]

Bonjour,

Je viens de passer à Office 365 64 bits sur Win7 64 bits
Lorsque j'essaie d'importer des données d'un fichier Excel xlsx fermé avec ADODB, ce dernier s'ouvre au .Open (ce qu'il ne faisait pas sous 32 bits)
Le temps de développer, j'utilise une référence à MS ActiveX Data Objects 6.1 Library
Est-ce qu'il y a une parade ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
    With Cn
        .ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" _
            & Chemin & "\" & Fichier & ";Extended Properties=""Excel 12.0;HDR=YES;IMEX=1"""
        .Open   'Ici le fichier s'ouvre ?!
    End With

Merci !

[Invité]

Bonjour,

j'utilise une référence à MS ActiveX Data Objects 6.1 Library

supprime cette vilaine référence de ton projet!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
With cCreateObject("Adodb.Connection")           
 .Open Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" _           
 & Chemin & "\" & Fichier & ";Extended Properties=""Excel 12.0;HDR=YES;IMEX=1"""  'Ici le fichier s'ouvre ?! 
.closeEndWith

[parmi]

Je notais l'utilisation de la référence au cas où, mais le problème demeure le même en l'enlevant.
Le fichier s'ouvre encore sur le .Open

J'ai aussi essayé avec ACE.OLEDB.15.0 mais ça ne change rien (?)

[parmi]

Bon..................
Aucune idée de ce qui s'est passé, mais ça fonctionne bien maintenant avec ou sans référence (?!)

Merci tout de même

[Invité]

tu es le seule à travailler sur le fichier ou il était ouvert sur un autre pose?

[parmi]

C'est drôle que tu me poses la question...

Je suis justement allé voir la personne que je connais qui utilise le fichier habituellement, mais elle n'était pas là.
Il faudrait que je fasse des tests avec un autre fichier sur un autre poste.

De toute façon, je n'ai pas pris de chance et je vérifie si le fichier est ouvert et je le ferme si ça arrive.

Merci à toi !

[parmi]

tu es le seule à travailler sur le fichier ou il était ouvert sur un autre pose?

+1
Après tests, je confirme que c'est bien là le problème.
Si le fichier est ouvert par quelqu'un d'autre, il s'ouvre lors du .Open.
Autrement, il ne s'ouvre pas.

[Invité]

Testes le mode partager sur ton fichier!

[parmi]

Je pourrais, mais quand c'est le temps pour moi de rouler ce programme, je n'ai pas vraiment le temps d'attendre que le fichier se libère.
Quelquefois les gens ouvrent des fichiers et partent en meeting ou sur la route ou même chez eux en fin de journée... (@#!&%)
Mais c'est effectivement une bonne façon de vérifier par contre.

Merci !

[Invité]

bonjour,
j'ai rencontré le même problème sur un fichier! mais j'ai tellement ramé pour le résoudre que je ne sais pas quel levier actionner pour le résoudre!