Afficher les données d'un classeur fermé ?!

Re : Afficher les données d'un classeur fermé ?!

Bonjour

Regarde ce lien

https://www.excel-downloads.com/thr...iltres-variables-fichiers-fermes-acces.92374/

Re : Afficher les données d'un classeur fermé ?!

Bonsoir Pascal

merci pour ce lien

Malheureusement, je ne comprends rien à cela et je ne comprends pas , même en téléchargeant les exemples, je n'y arrive pas, c'est quand bien compliqué

En espérant avoir d'autres solutions, bonne soirée

Kiki

Re : Afficher les données d'un classeur fermé ?!

Bonjour le forum,
Bonjour PascalXLD, christian.bedere,

Pour te documenter, vois ce lien.

Lire et écrire dans les classeurs Excel fermés - Club d'entraide des développeurs francophones

Amicalement klin89

Re : Afficher les données d'un classeur fermé ?!

Bonjour Pascal et Klin

Merci pour ta réponse, je vais y jeter un oeil, mais j'ai changé de voie, et je m'oriente plutôt sur l'ouverture du fichier, mais en vérouillant pour éviter d'y aller saisir manuellement.
Bon week end et encore merci
Kiki

Re : Afficher les données d'un classeur fermé ?!

Re christian.bedere,

Tu dis :

je m'oriente plutôt sur l'ouverture du fichier

Cliquez pour agrandir...

Vois le lien ci-dessous et le fichier de steplof.
www.excel-downloads.com/forum/4403-cherche-cr-er-un-moteur-de-recherche-dans-excel.html

Klin89

Re : Afficher les données d'un classeur fermé ?!

Bonsoir,
Un essai à adapter
Les 2 fichiers doivent-être situés dans le même répertoire
Attention à l'ortographe du nom des articles ("abricot" et non "abicot" par exemple)
A+
kjin

Re : Afficher les données d'un classeur fermé ?!

Salut Kjin
Merci pour cette aide, je n' ai pas trop le temps de m'y pencher mais je jetterai un oeil en début de semaine.
Encore merci et bonne journée

Re : Afficher les données d'un classeur fermé ?!

Bonjour à tous,

Dans le lien ci-dessous, une superbe démo de notre ami Thierry.

https://www.excel-downloads.com/threads/form-et-lien-hypertexte.31739/

Pas sûr que cela réponde à ta question, mais à mettre dans la boite à archives, ça peut servir 🙂

Amicalement klin89

Re : Afficher les données d'un classeur fermé ?!

Re à tous,

A propos de la méthode ADO, cet autre lien et les commentaires avisés de Michel_M.

https://www.excel-downloads.com/threads/boucle-sur-feuilles-dun-classeur-ferme.27149/

Pour être complet, une démo de Thierry avec la contribution de Michel_M et MichelXLD.

https://www.excel-downloads.com/thr...e-automatisee-dans-differents-fichiers.65757/

klin89

Re : Afficher les données d'un classeur fermé ?!

Bien le bonjour à vous tous

Je galère énormément avec mes classeurs ouverts (j'avais essayé avec classeurs ouverts en attendant car j'imaginais bien que ce serait galère...) mais là, je plante c hyper lourd donc je vais essayer de me plonger là dedans et je vous tiens au courant

Encore Klin89 pour ton aide !!

Re : Afficher les données d'un classeur fermé ?!

Bonjour,

christian.bedere à dit:

Je galère énormément...

Cliquez pour agrandir...

Tu n'as pas pris le soin d'indiquer si tu avais utilisé ADO, et encore moins les difficultés que tu rencontres !
1) Pour utiliser ADO, il ne faut pas oublier d'activer "Microsoft ActiveX Data Objects X.X Library" (2.8 pour moi) dans les références de VBA --> Alt+F11 --> Menu/Outils/Références
2)Ouvre ton fichier base de données et réenregistre le sous le même nom avec "enregistrer sous", en l'écrasant par lui même en quelque sorte
J'avais comme toujours, testé le code avant de te le soumettre !
Alors dis nous
A+
kjin

Re : Afficher les données d'un classeur fermé ?!

Salut kjin

Si je "n'ai pas pris soin" comme tu dis, c'est que je n'ai pas eu le temps d'essayer tous les liens que tu m'as gentiment fournis.
Mais je ne voulais pas te laisser sans réponse, c'est pourquoi je t'ai répondu au plus vite pour ne pas oublier de te remercier.

Maintenant j'ai essayé, et après plusieurs essais cela semble fonctionner.

Je te remercie donc pour ta persévérence, et j'espère que tu ne m'en voudras pas.
J'espère à nouveau compter sur toi si j'en ai besoin

Bonne soirée à toi
Kiki

Re : Afficher les données d'un classeur fermé ?!

Bonsoir,

christian.bedere à dit:

Salut kjin...c'est que je n'ai pas eu le temps d'essayer tous les liens que tu m'as gentiment fournis....

Cliquez pour agrandir...

Euh, tu dois confondre, je n'ai fourni aucun lien...juste un fichier à tester, d'où mon message.
Mais entre klin et kjin...
A+
kjin

Re : Afficher les données d'un classeur fermé ?!

Re-

Oui désolé .... merci pour le fichier !! lol
Comme jusque-là, cela fonctionne, comment dois-je modifier le code :
Dim Rst As ADODB.Recordset
Set Cnx = New ADODB.Connection
Cnx.Open "DRIVER={Microsoft Excel Driver (*.xls)};DBQ=carnet d'adresses clients.xls"
ValSql = "SELECT DISTINCT Etablissement,Adresse,CP,Ville,Tél,Fax,Mail From Données"
Set Rst = Cnx.Execute(ValSql)
Do While Not Rst.EOF
If Rst.Fields(0) = CBOEtablissement Then
Adresse = Rst("Adresse")
CP = Rst("CP")
Ville = Rst("Ville")
Téléphone = Rst("Tél")
Fax = Rst("fax")
Mail = Rst("mail")
End If
Rst.MoveNext
Loop
Rst.Close
Cnx.Close
Set Rst = Nothing


si je souhaite me servir de ces mêmes champs pour rajouter un client à la même base de données ?
J'ai pensé à
Dim Rst As ADODB.Recordset
Set Cnx = New ADODB.Connection
Cnx.Open "DRIVER={Microsoft Excel Driver (*.xls)};DBQ=carnet d'adresses clients.xls"
ValSql = "SELECT DISTINCT Numéro Client,Etablissement,Adresse,CP,Ville,Tél,Fax,Mail From Données"
Set Rst = Cnx.Execute(ValSql)
Do While Not Rst.EOF
If Rst.Fields(0) = CBOEtablissement Then
Range("a2").Select
While ActiveCell <> ""
ActiveCell.Offset(1, 0).Activate
Wend
ActiveCell = NumClients
ActiveCell.Offset(0, 1).Activate
ActiveCell = CBOEtablissement
ActiveCell.Offset(0, 1).Activate
ActiveCell = Adresse
ActiveCell.Offset(0, 1).Activate
ActiveCell = CP
ActiveCell.Offset(0, 1).Activate
ActiveCell = Ville
ActiveCell.Offset(0, 1).Activate
ActiveCell = Téléphone
ActiveCell.Offset(0, 1).Activate
ActiveCell = Fax
ActiveCell.Offset(0, 1).Activate
ActiveCell = Mail

sachant que cela bugue à ce moment :"Set Rst = Cnx.Execute(ValSql)"

merci encore