Discussion :

[jojo86]

Bonjour,

Depuis plusieurs années, j'utilise cette méthode pour aller lire des fichiers excel via des requetes SQL.
J'ai un problème, lorsque je vais lire un classeur qui est en lecture seule, le classeur s'ouvre au premier plan. Ce comportement n'est pas normal et je ne l'ai que sur les classeurs en lecture seule...
Le fichier s'ouvre au moment du : Rst.Open requete, Cn, adOpenStatic

Avez-vous déjà eu ce cas?

Voici mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
Sub connexionbase(Fichier As String)
Set Cn = New ADODB.Connection
    With Cn
        .Provider = "Microsoft.ACE.OLEDB.12.0"
        .ConnectionString = "Data Source=" & Fichier & _
            ";Extended Properties=Excel 12.0 Xml;"
        .ConnectionTimeout = 40
        .Open
    End With
    Set Rst = New ADODB.Recordset
End Sub
 
 
Sub Test()
Dim requete as string
 
requete = "Select `Champ` FROM [MaTable$] WHERE `Critere` = " & Valeur
Call connexionbase(CheminVersLeFichier)
Rst.Open requete, Cn, adOpenStatic
If Rst.RecordCount > 0 Then
'Du code
Else
'Du code
End If
End Sub

Merci de votre aide

[joe.levrai]

Bonjour,

en jouant avec l'argument IMEX pour forcer la lecture seule ça ne fonctionne pas non plus ?

[jojo86]

Salut, c'est peut être une piste, mais lorsque j'ajoute "IMEX=1" j'ai le message Piote ISAM introuvable.

[Invité]

Salut, c'est peut être une piste, mais lorsque j'ajoute "IMEX=1" j'ai le message Piote ISAM introuvable.

Code :

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

1
2
3
4
5
With Cn
        .Provider = "Microsoft.ACE.OLEDB.12.0"
        .ConnectionString = "Data Source=" & Fichier & ";Extended Properties=""Excel 12.0 Xml;IMEX=1;"""
        .Open
    End Withl

[jojo86]

Merci, plus de message d'erreur avec ton code, mais le fichier s'ouvre quand même au premier plan, c'est vraiment pénible ce comportement d'excel...
Sinon j'ai pensé ouvrir le classeur de manière cachée et l'enregistrer en local sur le disque utilisateur et ensuite utiliser ce fichier comme base de données...

En fait je viens de comprendre que si une personne est ouverte en modif sur la base de données, alors le fichier s'ouvre à l'écran... Savez-vous comment éviter ça?

[hdi2009]

Bonjour

j'ai eu le meme souci, la solution c'est que tu télécharge un outil se synchronisation automatique tel que "synckBack" et tu syncronise le fichier en question sur un New dossier qui sera ton chemin d'accès connectionstring ( pas de lecteur seul )

[Invité]

Bonjours,
IMEX=1 permet de s'affranchir du type string/numerique qui pourrait induire une erreur sur le typage des champs.

Cette options rend fortuitement les requête en lecture seule mais ça n'a rien à voir avec ce qui te préoccupes.

Code :

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

IMEX=1;Readonly=True