XL 2016 VBA - Trouver les feuilles d'un classeur fermé

Dudu2 · 5 Septembre 2025

Bonjour,

J'ai bien une fonction pour trouver les valeurs d'une feuille donnée d'un classeur fermé (fichier joint) mais je n'ai rien pour trouver les noms des feuilles de ce classeur fermé.

Merci par avance.

patricktoulon · 9 Septembre 2025

Bonjour @nullose
vien vu
mais attention là on garantie plus l'ordre exacte des feuilles
car j'ai testé plusieurs classeurs et certains va savoir pourquoi les <sheet name="... ne sont pas dans l'ordre dans certains fichier
c'est pour ça que j'utilise l'indexation par l'attribut "sheetId"
donc
il faut laisser le tableau se construire avec les lignes vides et les supprimer par la suite

VB:

'patricktoulon

Sub testv5()
    xlsxPath = "C:\Users\patricktoulon\Desktop\Classeur1.xlsx"
    MsgBox Join(ListfeuilleXmlTarV2(xlsxPath), vbCrLf)
    Debug.Print Join(ListfeuilleXmlTarV2(xlsxPath), vbCrLf)
End Sub


Function ListfeuilleXmlTarV2(xlsxPath)
    Dim tempFolder As String, xmlPath As String, xmlcontent As String, cmd As String...

Staple1600 · 6 Septembre 2025

Re

patricktoulon à dit:
tenez j'ai trouvé ceci pour power query

Apparemment je suis invisible...

Pour Power Query, j'avais posté un code M ce matin à 10h30

Peut-être qu'il sera vu à 14h10

Staple1600 à dit:
Bonjour le fil

Une alternative avec PowerQuery

PowerQuery:

let Source = Excel.Workbook(File.Contents("C:\Chemin\Vers\Fichier.xlsx"), null, true), FeuillesSeulement = Table.SelectRows(Source, each [Kind] = "Sheet"), NomsDesFeuilles = Table.SelectColumns(FeuillesSeulement, {"Name"}) in NomsDesFeuilles

PS: adapter le chemin vers le fichier dans le code M

Cousinhub · 6 Septembre 2025

laurent950 à dit:
Petite précision importante : si un classeur est fermé et contient des feuilles protégées, il est impossible d’accéder à leur contenu directement via DAO, ADO ou même en lisant le XML du fichier.
On peut seulement récupérer les noms des feuilles, mais pour lire les cellules, il faut ouvrir le classeur et, si nécessaire, déprotéger les feuilles avec le mot de passe.
Autrement dit, il n’existe pas de méthode “magique” pour contourner la protection depuis un fichier fermé.

Bonjour,
Pas sûr 🧐
PQ peut importer les feuilles, même en VeryHidden et protégées par mdp...(même si le code VBA est protégé...)
Seul le fichier protégé par mdp en lecture empêche PQ d'y accéder.
Bonne apm

Staple1600 · 6 Septembre 2025

Re, Bonjour @Cousinhub

Invisible ou transparent, décidemment c'est pas ma journée.

Dudu2 · 6 Septembre 2025

Invisible ou transparent, décidemment c'est pas ma journée.

🤣
Mais non @Staple1600, mais du PowerQuery, perso je sais pas quoi en faire.
Puis-je exécuter du PQ et récupérer les résultats dans VBA où se trouve une palanquée de traitements que je dois faire après avoir récupéré les feuilles ?

Cousinhub · 6 Septembre 2025

Re,
Un exemple d'une requête pilotée par VBA
Tu choisis le fichier, et la requête te donne la liste des onglets de ce fichier

dysorthographie · 6 Septembre 2025

Avec ADO (OLEDB), quand tu ouvres un fichier Excel (.xls, .xlsx, .xlsm), tu ne passes pas par l’interface Excel mais par un fournisseur de données (Jet ou ACE).

Ce fournisseur ne comprend pas les mécanismes de protection de feuille (verrouillage des cellules, interdiction de modification, etc.).
👉 Résultat : tu peux lire les données d’un onglet protégé sans problème, puisque la protection agit seulement dans l’interface Excel, pas dans le moteur ADO.

patricktoulon · 6 Septembre 2025

dysorthographie à dit:
Avec ADO (OLEDB), quand tu ouvres un fichier Excel (.xls, .xlsx, .xlsm), tu ne passes pas par l’interface Excel mais par un fournisseur de données (Jet ou ACE).

Ce fournisseur ne comprend pas les mécanismes de protection de feuille (verrouillage des cellules, interdiction de modification, etc.).
👉 Résultat : tu peux lire les données d’un onglet protégé sans problème, puisque la protection agit seulement dans l’interface Excel, pas dans le moteur ADO.

punaise Robert c'est pas des choses a dire trop fort en public ça 😉

laurent950 · 6 Septembre 2025

Dudu2 à dit:
🤣
Mais non @Staple1600, mais du PowerQuery, perso je sais pas quoi en faire.
Puis-je exécuter du PQ et récupérer les résultats dans VBA où se trouve une palanquée de traitements que je dois faire après avoir récupéré les feuilles ?

👉 « Mais qui se STAPLE tout le travail ? C’est StapleGPT… l’IA 1600 chevaux ! »

dysorthographie · 6 Septembre 2025

Oui je lui ai demandé de rédiger la réponse

Maintenant si tu penses que j'ai demandé à chatgpt de rédiger le code c'est pas grave 👎

patricktoulon · 6 Septembre 2025

bonsoir

ok je sort 😛 🤪 🤣 🙃

Staple1600 · 6 Septembre 2025

Re

Je peux savoir pourquoi @laurent950 et @patricktoulon vous me tombez dessus sans raison ?

Je n'ai fait que répondre à 10h30 à la question de @dysorthographie

dysorthographie à dit:
Je sais pas si les adeptes de powerQery on l'a réponse

C'est pas ce genre de messages qui va m'inciter à refréquenter XLD plus souvent.

dysorthographie · 6 Septembre 2025

Staple1600 à dit:
Re

Je peux savoir pourquoi @laurent950 et @patricktoulon vous me tombez dessus sans raison ?

Je n'ai fait que répondre à 10h30 à la question de @dysorthographie

C'est pas ce genre de messages qui va m'inciter à refréquenter XLD plus souvent.

personnellement je n'ai pas accès à power Querry j'invitai juste ceux qui métrise à intervenir! qu'as tu compris?

c'est le mot adepte ? je voie pas d'insulte n'y de sarcasme.

je suis un adepte du SQL et je le revendique!

je n'avais pas l'intention de te blesser qui que ce soit et je n'enlève rien de ce que j'ais dis .

Staple1600 · 6 Septembre 2025

Re

@dysorthographie
j'ai compris exactement ce tu dis: "invitation à intervenir" avec une proposition Power Query
Ce que j'ai fait.
Puis, j'ai juste évoqué la non-réaction à mon message (celui de 10h30)

Pour ensuite me faire "titiller" gratuitement par @laurent950 et @patricktoulon.

Plus ca va, puis XLD n'est plus ce qu'il était (en tout cas c'est mon ressenti) et cela explique pourquoi je viens de moins en moins sur XLD.

J'arrête là car le seul message de ma part relatif à la question c'est celui de 10h30.

Allez bonne soirée à tous, je passe en mode "log out"

Dudu2 · 7 Septembre 2025

Les Experts, tout ce que vous donnez comme information est bon à prendre, qu'on l'utilise ou pas. On apprend toujours quelque chose.
Je suis malheureusement totalement ignorant de PowerQuery mais je vais m'intéresser au code @Cousinhub qui l'a interfacé avec VBA et le garder au chaud en cas de besoin. Quant aux BD de @dysorthographie, pareil.

En tous cas, grâce à vos retours, j'ai pu faire un traitement que je n'aurais pas pu faire sans. Merci à tous.

patricktoulon · 7 Septembre 2025

Bonjour à tous
perso je n'ai rien contre power query je l'utilise au boulot dans mes fichiers excel par ce que le peux
à la maison non par ce que je suis sur 2013 32 bit et le complément power pivot pour cette version est une blague
et je suis un inconditionnel de Ado en vba
et j'ajoute:
que toute les solutions valides sont bonnes a partir du moment ou elles sont maitrisées

@Staple1600 ce n’était qu'une blague personne ne te tombe dessus

XL 2016 VBA - Trouver les feuilles d'un classeur fermé

Dudu2

XLDnaute Barbatruc

Pièces jointes

patricktoulon

Staple1600

XLDnaute Barbatruc

Cousinhub

XLDnaute Barbatruc

Staple1600

XLDnaute Barbatruc

Dudu2

XLDnaute Barbatruc

Cousinhub

XLDnaute Barbatruc

Pièces jointes

dysorthographie

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

laurent950

XLDnaute Barbatruc

dysorthographie

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

Staple1600

XLDnaute Barbatruc

dysorthographie

XLDnaute Barbatruc

Staple1600

XLDnaute Barbatruc

Dudu2

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

Discussions similaires

XL 2016 VBA - Trouver les feuilles d'un classeur fermé

XLDnaute Barbatruc

Pièces jointes

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

Pièces jointes

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency