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
Michel Pierron
Bonsoir Rejete; Il faut modifier la base de registre; mais tu peux inviter l'utilisateur à le faire à l'ouverture du classeur avec :
Dim VBP As Object If Val(Application.Version) < 10 Then Exit Sub On Error Resume Next Set VBP = ActiveWorkbook.VBProject If Err.Number = 0 Then GoTo 1 MsgBox "Menu Outils / Macro / Sécurité / Onglet Editeurs" _ & " approuvés :" & vbLf & "Cocher Faire confiance au " _ & "projet Visual Basic !", 64, "Sécurité options" 1: Set VBP = Nothing
MP
"Rejete" a écrit dans le message de news: e02$$
Bonjour
j'aimerais savoir grace à quel code il est possible de cocher une option sous Excel
sous Excel : outils/macros/sécurité >>> "faire confiance au projet visual
basic" sous l'onglet "éditeurs approuvés"
merci.
Bonsoir Rejete;
Il faut modifier la base de registre; mais tu peux inviter l'utilisateur à
le faire à l'ouverture du classeur avec :
Dim VBP As Object
If Val(Application.Version) < 10 Then Exit Sub
On Error Resume Next
Set VBP = ActiveWorkbook.VBProject
If Err.Number = 0 Then GoTo 1
MsgBox "Menu Outils / Macro / Sécurité / Onglet Editeurs" _
& " approuvés :" & vbLf & "Cocher Faire confiance au " _
& "projet Visual Basic !", 64, "Sécurité options"
1: Set VBP = Nothing
MP
"Rejete" <marcolet.pierre@free.fr> a écrit dans le message de news:
e02$$BRIGHA.3728@tk2msftngp13.phx.gbl...
Bonjour
j'aimerais savoir grace à quel code il est possible de cocher une option
sous Excel
sous Excel : outils/macros/sécurité >>> "faire confiance au projet
visual
Bonsoir Rejete; Il faut modifier la base de registre; mais tu peux inviter l'utilisateur à le faire à l'ouverture du classeur avec :
Dim VBP As Object If Val(Application.Version) < 10 Then Exit Sub On Error Resume Next Set VBP = ActiveWorkbook.VBProject If Err.Number = 0 Then GoTo 1 MsgBox "Menu Outils / Macro / Sécurité / Onglet Editeurs" _ & " approuvés :" & vbLf & "Cocher Faire confiance au " _ & "projet Visual Basic !", 64, "Sécurité options" 1: Set VBP = Nothing
MP
"Rejete" a écrit dans le message de news: e02$$
Bonjour
j'aimerais savoir grace à quel code il est possible de cocher une option sous Excel
sous Excel : outils/macros/sécurité >>> "faire confiance au projet visual
basic" sous l'onglet "éditeurs approuvés"
merci.
Michel Pierron
Re Rejete; Ou en utilisant SendKeys:
If Val(Application.Version) < 10 Then Exit Sub Dim VBP As Object On Error Resume Next Set VBP = ActiveWorkbook.VBProject If Err.Number = 0 Then GoTo 1 With Application .SendKeys "%s" .CommandBars.FindControl(ID:627).Execute End With 1: Set VBP = Nothing
MP
"Rejete" a écrit dans le message de news: e02$$
Bonjour
j'aimerais savoir grace à quel code il est possible de cocher une option sous Excel
sous Excel : outils/macros/sécurité >>> "faire confiance au projet visual
basic" sous l'onglet "éditeurs approuvés"
merci.
Re Rejete;
Ou en utilisant SendKeys:
If Val(Application.Version) < 10 Then Exit Sub
Dim VBP As Object
On Error Resume Next
Set VBP = ActiveWorkbook.VBProject
If Err.Number = 0 Then GoTo 1
With Application
.SendKeys "%s"
.CommandBars.FindControl(ID:627).Execute
End With
1: Set VBP = Nothing
MP
"Rejete" <marcolet.pierre@free.fr> a écrit dans le message de news:
e02$$BRIGHA.3728@tk2msftngp13.phx.gbl...
Bonjour
j'aimerais savoir grace à quel code il est possible de cocher une option
sous Excel
sous Excel : outils/macros/sécurité >>> "faire confiance au projet
visual
If Val(Application.Version) < 10 Then Exit Sub Dim VBP As Object On Error Resume Next Set VBP = ActiveWorkbook.VBProject If Err.Number = 0 Then GoTo 1 With Application .SendKeys "%s" .CommandBars.FindControl(ID:627).Execute End With 1: Set VBP = Nothing
MP
"Rejete" a écrit dans le message de news: e02$$
Bonjour
j'aimerais savoir grace à quel code il est possible de cocher une option sous Excel
sous Excel : outils/macros/sécurité >>> "faire confiance au projet visual
basic" sous l'onglet "éditeurs approuvés"
merci.
michdenis
Bonjour Rejete,
Comme tu es sûrement un lecteur curieux, tu trouveras à cette adresse toute l'information pertinente sur le sujet :
Et par la même occasion, si tu pouvais en faire un résumé succint pour ceux ayant de la difficulté avec la langue anglaise !!!
;-))
Salutations!
"Rejete" a écrit dans le message de news: e02$$ Bonjour
j'aimerais savoir grace à quel code il est possible de cocher une option sous Excel
sous Excel : outils/macros/sécurité >>> "faire confiance au projet visual basic" sous l'onglet "éditeurs approuvés"
merci.
Rejete
Merci beaucoup pour ton aide précieuse
"Michel Pierron" a écrit dans le message de news:
Bonsoir Rejete; Il faut modifier la base de registre; mais tu peux inviter l'utilisateur à le faire à l'ouverture du classeur avec :
Dim VBP As Object If Val(Application.Version) < 10 Then Exit Sub On Error Resume Next Set VBP = ActiveWorkbook.VBProject If Err.Number = 0 Then GoTo 1 MsgBox "Menu Outils / Macro / Sécurité / Onglet Editeurs" _ & " approuvés :" & vbLf & "Cocher Faire confiance au " _ & "projet Visual Basic !", 64, "Sécurité options" 1: Set VBP = Nothing
MP
"Rejete" a écrit dans le message de news: e02$$
Bonjour
j'aimerais savoir grace à quel code il est possible de cocher une option sous Excel
sous Excel : outils/macros/sécurité >>> "faire confiance au projet visual
basic" sous l'onglet "éditeurs approuvés"
merci.
Merci beaucoup pour ton aide précieuse
"Michel Pierron" <michel.pierron@free.fr> a écrit dans le message de news:
e2jjeGSIGHA.1728@TK2MSFTNGP09.phx.gbl...
Bonsoir Rejete;
Il faut modifier la base de registre; mais tu peux inviter l'utilisateur à
le faire à l'ouverture du classeur avec :
Dim VBP As Object
If Val(Application.Version) < 10 Then Exit Sub
On Error Resume Next
Set VBP = ActiveWorkbook.VBProject
If Err.Number = 0 Then GoTo 1
MsgBox "Menu Outils / Macro / Sécurité / Onglet Editeurs" _
& " approuvés :" & vbLf & "Cocher Faire confiance au " _
& "projet Visual Basic !", 64, "Sécurité options"
1: Set VBP = Nothing
MP
"Rejete" <marcolet.pierre@free.fr> a écrit dans le message de news:
e02$$BRIGHA.3728@tk2msftngp13.phx.gbl...
Bonjour
j'aimerais savoir grace à quel code il est possible de cocher une option
sous Excel
sous Excel : outils/macros/sécurité >>> "faire confiance au projet
visual
Bonsoir Rejete; Il faut modifier la base de registre; mais tu peux inviter l'utilisateur à le faire à l'ouverture du classeur avec :
Dim VBP As Object If Val(Application.Version) < 10 Then Exit Sub On Error Resume Next Set VBP = ActiveWorkbook.VBProject If Err.Number = 0 Then GoTo 1 MsgBox "Menu Outils / Macro / Sécurité / Onglet Editeurs" _ & " approuvés :" & vbLf & "Cocher Faire confiance au " _ & "projet Visual Basic !", 64, "Sécurité options" 1: Set VBP = Nothing
MP
"Rejete" a écrit dans le message de news: e02$$
Bonjour
j'aimerais savoir grace à quel code il est possible de cocher une option sous Excel
sous Excel : outils/macros/sécurité >>> "faire confiance au projet visual
