Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Neutraliser les macros ?

4 réponses
Avatar
John
bonjour,

Via une application Access, j'ouvre un fichier Excel. Si l'utilisateur à une
ou des macros personnalisées(complémentaires) sur son application excel,
cela ne fonctionne pas. Par contre si l'utilisateur n'a pas de macro
complémentaire cela fonctionne.
Serait-il possible de neutraliser la macro complémentaire au début de la
procédure d'ouverture du fichier excel et de la remettre en fin de procédure
? Ou peut-être y -t-il une autre solution ?

Merci de vos réponses

4 réponses

Avatar
papou
Bonjour
Si tu fais appel à l'objet Excel dans ton code ex:
CreateObject("Excel.Application"), tu peux effectivement "décharger" une
macro complémentaire :
Application.AddIns("Outils pour l'euro").Installed = False
'.....
Application.AddIns("Outils pour l'euro").Installed = True
Cordialement
Pascal

"John" a écrit dans le message de news:

bonjour,

Via une application Access, j'ouvre un fichier Excel. Si l'utilisateur à
une
ou des macros personnalisées(complémentaires) sur son application excel,
cela ne fonctionne pas. Par contre si l'utilisateur n'a pas de macro
complémentaire cela fonctionne.
Serait-il possible de neutraliser la macro complémentaire au début de la
procédure d'ouverture du fichier excel et de la remettre en fin de
procédure
? Ou peut-être y -t-il une autre solution ?

Merci de vos réponses




Avatar
John
Bonjour

Merci pour l'information.
Mais selon ton code , cela sous-entend que l'on connaisse le nom de la
macro.
Dans le cas contraire ... ?? :-) Comment faire ?

Merci encore



"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de
news:
Bonjour
Si tu fais appel à l'objet Excel dans ton code ex:
CreateObject("Excel.Application"), tu peux effectivement "décharger" une
macro complémentaire :
Application.AddIns("Outils pour l'euro").Installed = False
'.....
Application.AddIns("Outils pour l'euro").Installed = True
Cordialement
Pascal

"John" a écrit dans le message de news:

bonjour,

Via une application Access, j'ouvre un fichier Excel. Si l'utilisateur à
une
ou des macros personnalisées(complémentaires) sur son application excel,
cela ne fonctionne pas. Par contre si l'utilisateur n'a pas de macro
complémentaire cela fonctionne.
Serait-il possible de neutraliser la macro complémentaire au début de la
procédure d'ouverture du fichier excel et de la remettre en fin de
procédure
? Ou peut-être y -t-il une autre solution ?

Merci de vos réponses








Avatar
Clément Marcotte
Dans l'aide de VBA:


Sub DisplayAddIns()
Worksheets("Feuil1").Activate
rw = 1
For Each ad In Application.AddIns
Worksheets("Feuil1").Cells(rw, 1) = ad.Name
Worksheets("Feuil1").Cells(rw, 2) = ad.Installed
rw = rw + 1
Next
End Sub



"John" a écrit dans le message de
news:
Bonjour

Merci pour l'information.
Mais selon ton code , cela sous-entend que l'on connaisse le nom de
la

macro.
Dans le cas contraire ... ?? :-) Comment faire ?

Merci encore



"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de
news:
Bonjour
Si tu fais appel à l'objet Excel dans ton code ex:
CreateObject("Excel.Application"), tu peux effectivement
"décharger" une


macro complémentaire :
Application.AddIns("Outils pour l'euro").Installed = False
'.....
Application.AddIns("Outils pour l'euro").Installed = True
Cordialement
Pascal

"John" a écrit dans le message de news:

bonjour,

Via une application Access, j'ouvre un fichier Excel. Si
l'utilisateur à



une
ou des macros personnalisées(complémentaires) sur son
application excel,



cela ne fonctionne pas. Par contre si l'utilisateur n'a pas de
macro



complémentaire cela fonctionne.
Serait-il possible de neutraliser la macro complémentaire au
début de la



procédure d'ouverture du fichier excel et de la remettre en fin
de



procédure
? Ou peut-être y -t-il une autre solution ?

Merci de vos réponses












Avatar
Jacques
Merci beaucoup

"Clément Marcotte" a écrit dans le message
de news:
Dans l'aide de VBA:


Sub DisplayAddIns()
Worksheets("Feuil1").Activate
rw = 1
For Each ad In Application.AddIns
Worksheets("Feuil1").Cells(rw, 1) = ad.Name
Worksheets("Feuil1").Cells(rw, 2) = ad.Installed
rw = rw + 1
Next
End Sub



"John" a écrit dans le message de
news:
Bonjour

Merci pour l'information.
Mais selon ton code , cela sous-entend que l'on connaisse le nom de
la

macro.
Dans le cas contraire ... ?? :-) Comment faire ?

Merci encore



"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de
news:
Bonjour
Si tu fais appel à l'objet Excel dans ton code ex:
CreateObject("Excel.Application"), tu peux effectivement
"décharger" une


macro complémentaire :
Application.AddIns("Outils pour l'euro").Installed = False
'.....
Application.AddIns("Outils pour l'euro").Installed = True
Cordialement
Pascal

"John" a écrit dans le message de news:

bonjour,

Via une application Access, j'ouvre un fichier Excel. Si
l'utilisateur à



une
ou des macros personnalisées(complémentaires) sur son
application excel,



cela ne fonctionne pas. Par contre si l'utilisateur n'a pas de
macro



complémentaire cela fonctionne.
Serait-il possible de neutraliser la macro complémentaire au
début de la



procédure d'ouverture du fichier excel et de la remettre en fin
de



procédure
? Ou peut-être y -t-il une autre solution ?

Merci de vos réponses