Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichDenis
On Error Resume Next ThisWorkbook.VBProject.References.AddFromGuid _ GUID:="{00000200-0000-0010-8000-00AA006D2EA4}", major:=2, minor:=0
Pour trouver le nom de la bibliothèque "ADODB", on ajoute manuellement la référence dont on a de besoin dans la fenêtre de l'éditeur de code / menu / outils / références /
Dans l'explorateur d'objets (raccourci clavier F2), dans la liste déroulante identifiée "Toutes les bibliothèques", on retrouve le nom de toutes les bibliothèques chargées. Lors d'une sélection s'ajoute dans le bas de la fenêtre, quelques informations qui guident l'usager
Library ADODB ' Son nom 'Location et le fichier responsable de la bibliothèque C:Program FilesFichiers communssystemadomsado20.tlb 'Nom descriptif de la bibliothèque tel que vu dans la fenêtre "Références" Microsoft ActiveX Data Objects 2.0 Library
Et pour trouver les paramètres de la ligne de commande, on procède comme suit : '---------------------------------- Sub test() With ThisWorkbook.VBProject.References("ADODB") Range("A1").Value = .GUID Range("A2").Value = .Major Range("A3").Value = .minor End With End Sub '----------------------------------
P.S. Il est préférable de taire mon nom dans la formulation de la question. Les questions s'adressent à tous.
On Error Resume Next
ThisWorkbook.VBProject.References.AddFromGuid _
GUID:="{00000200-0000-0010-8000-00AA006D2EA4}", major:=2, minor:=0
Pour trouver le nom de la bibliothèque "ADODB", on ajoute manuellement
la référence dont on a de besoin dans la fenêtre de l'éditeur de code /
menu / outils / références /
Dans l'explorateur d'objets (raccourci clavier F2), dans la liste déroulante
identifiée "Toutes les bibliothèques", on retrouve le nom de toutes les
bibliothèques chargées. Lors d'une sélection s'ajoute dans le bas de la
fenêtre, quelques informations qui guident l'usager
Library ADODB ' Son nom
'Location et le fichier responsable de la bibliothèque
C:Program FilesFichiers communssystemadomsado20.tlb
'Nom descriptif de la bibliothèque tel que vu dans la fenêtre "Références"
Microsoft ActiveX Data Objects 2.0 Library
Et pour trouver les paramètres de la ligne de commande, on procède comme suit :
'----------------------------------
Sub test()
With ThisWorkbook.VBProject.References("ADODB")
Range("A1").Value = .GUID
Range("A2").Value = .Major
Range("A3").Value = .minor
End With
End Sub
'----------------------------------
P.S. Il est préférable de taire mon nom dans la formulation de la question.
Les questions s'adressent à tous.
On Error Resume Next ThisWorkbook.VBProject.References.AddFromGuid _ GUID:="{00000200-0000-0010-8000-00AA006D2EA4}", major:=2, minor:=0
Pour trouver le nom de la bibliothèque "ADODB", on ajoute manuellement la référence dont on a de besoin dans la fenêtre de l'éditeur de code / menu / outils / références /
Dans l'explorateur d'objets (raccourci clavier F2), dans la liste déroulante identifiée "Toutes les bibliothèques", on retrouve le nom de toutes les bibliothèques chargées. Lors d'une sélection s'ajoute dans le bas de la fenêtre, quelques informations qui guident l'usager
Library ADODB ' Son nom 'Location et le fichier responsable de la bibliothèque C:Program FilesFichiers communssystemadomsado20.tlb 'Nom descriptif de la bibliothèque tel que vu dans la fenêtre "Références" Microsoft ActiveX Data Objects 2.0 Library
Et pour trouver les paramètres de la ligne de commande, on procède comme suit : '---------------------------------- Sub test() With ThisWorkbook.VBProject.References("ADODB") Range("A1").Value = .GUID Range("A2").Value = .Major Range("A3").Value = .minor End With End Sub '----------------------------------
P.S. Il est préférable de taire mon nom dans la formulation de la question. Les questions s'adressent à tous.
Denys
Bonjour Denis,
Merci infiniment.... et désolé d'avoir mentionné ton nom, ce n'était pas fait à tort crois-moi. Je croyais qu'il n'était que justice de nommer l'auteur. Cependant, cela ne se reproduira plus...
J'ai gardé précieusement tes instructions
Bonne journée et à la prochaine
Denys
P.S. Il est préférable de taire mon nom dans la formulation de la que stion. Les questions s'adressent à tous.
Bonjour Denis,
Merci infiniment.... et désolé d'avoir mentionné ton nom, ce n'était
pas fait à tort crois-moi. Je croyais qu'il n'était que justice de
nommer l'auteur. Cependant, cela ne se reproduira plus...
J'ai gardé précieusement tes instructions
Bonne journée et à la prochaine
Denys
P.S. Il est préférable de taire mon nom dans la formulation de la que stion.
Les questions s'adressent à tous.
Merci infiniment.... et désolé d'avoir mentionné ton nom, ce n'était pas fait à tort crois-moi. Je croyais qu'il n'était que justice de nommer l'auteur. Cependant, cela ne se reproduira plus...
J'ai gardé précieusement tes instructions
Bonne journée et à la prochaine
Denys
P.S. Il est préférable de taire mon nom dans la formulation de la que stion. Les questions s'adressent à tous.