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

Créer une discussion
Répondre

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
christian.bedere

christian.bedere

XLDnaute Occasionnel
Bonsoir et bon week end à vous ....

Je reviens ce soir vous soumettre mon problème.

Pour les besoins de mon travail, je crée des bases de données et afin de ne pas allourdir mes tableaux (pas loin de 10 500 ko , juste de programmation, alors j' imagine avec la BDD complète ....) je voudrais pouvoir créer cette BDD sur plusieurs classeurs différents et faire en sorte que lorsque je veux retrouver mes articles, je choisisses ds une liste les articles et que par le biais d'une combobox aille chercher les concordances ds le fichier 'base de données" mais tout en le laissant fermé.
Je vous joint les deux fichiers, et pour que cela fonctionne, merci d'ouvrir le fichier 'essai' pour comprendrez plus facilement ma requête.
Je vous remercie à nouveau pour le temps que vous m'accorderez

Kiki
 

Pièces jointes

Trier par date Trier par votes
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
 
Vote positif 0 Vote négatif
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
 
Vote positif 0 Vote négatif
Dernière édition:
Vote positif 0 Vote négatif
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 !!
 
Vote positif 0 Vote négatif
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
 
Vote positif 0 Vote négatif
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
 
Vote positif 0 Vote négatif
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
 
Vote positif 0 Vote négatif
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

D
  • Résolu(e)
Microsoft 365 récupérer des données d'une feuille excel d'un classeur A pour les incrémenter automatiquement sur le classeur B
Réponses
10
Affichages
455
TooFatBoy
TooFatBoy
L
  • Résolu(e)
Power Query Problème de fusion de données entre deux fichiers Excel sous Power Query
Réponses
8
Affichages
1 K
chris
chris
M
  • Question Question
Microsoft 365 Afficher les données d'un userform sur un autre userform
Réponses
3
Affichages
623
Manon71.
M
G
  • Résolu(e)
XL 2021 Mise à jour d'un graphique, avec les données qui s'empilent
Réponses
12
Affichages
467
gerardphi
G
R
  • Question Question
XL 2021 Récupérer des données dans plusieurs classeurs sans les ouvrir - Résolu
Réponses
10
Affichages
835
job75
job75
p'tit vieux
  • Question Question
XL 2021 Problème d'accès aux datas d'une autre feuille fermée
3 4 5
Réponses
62
Affichages
3 K
p'tit vieux
p'tit vieux
M
  • Question Question
XL 2010 Récupération de données et les transformer avec Power Query ?
Réponses
3
Affichages
799
DJunqueira
D
K
  • Résolu(e)
Microsoft 365 Ouvrir un autre classeur excel (VBA) pour utiliser les données de celui dans le classeur actif
Réponses
5
Affichages
2 K
Dranreb
Dranreb
9
  • Question Question
Microsoft 365 Copier Coller les données (cellules) de plusieurs feuilles d'un classeur vers plusieurs autres feuilles d'un classeur
Réponses
5
Affichages
1 K
92lever
9
N
  • Résolu(e)
XL 2019 copier 2 colonnes d'un classeur A et coller les données dans une seule colonne dans un classeur B
Réponses
14
Affichages
863
Dranreb
Dranreb
Y
  • Question Question
XL 2019 Copier les données des colonnes d'un fichier à un autre
Réponses
4
Affichages
718
JHA
J
J
  • Question Question
XL 2019 Extraire les données d'un fichier fermer pour les coller dans un fichier que l'on doit créer
Réponses
1
Affichages
949
jui42
J
X
  • Question Question
XL 2019 Extraire données d'un classeur vers un autre en réorganisant et renommant les colonnes
Réponses
10
Affichages
2 K
XLSM75
X
!xmusaton
  • Question Question
XL 2016 Copier les données d'un classeur dans un deuxième classeur fermé
Réponses
3
Affichages
2 K
!xmusaton
!xmusaton
Z
  • Question Question
XL 2019 Rapatriement de donnée d'un onglet vers un autre onglet en fonction d'une valeur identique
Réponses
2
Affichages
2 K
Zlataa21
Z
P
  • Résolu(e)
Power Query Power Query : proposer la sélection d'un fichier de données
Réponses
4
Affichages
3 K
p2r
P
N
  • Résolu(e)
XL pour MAC Refonte complete d'un fichier, besoin d'idées
8 9 10
Réponses
147
Affichages
14 K
Staple1600
Staple1600
C
  • Résolu(e)
XL 2019 Synthétiser efficacement des données non contigues dans plusieurs onglets d'un classeur
Réponses
5
Affichages
2 K
CiolBel
C
R
  • Résolu(e)
Autres Copier des feuilles d'un classeur à partir de données identiques
Réponses
2
Affichages
1 K
Renaud22
R
Z
  • Question Question
copier une feuille d'un classeur fermé dans un classeur ouvert
Réponses
1
Affichages
3 K
herve62
herve62
Retour