Voici mon problème,
J'ai sur un ordi plusieurs comptes et j'aimerai en tant qu'administrateur de
cet ordi mettre le niveau de securité des macros excel sur le niveau de
securité moyen pour chaque compte a partir du compte Admin. Peut etre la
valeur d'une clé à modifier?
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
Daniel.C
Bonjour. Regarde là. http://support.microsoft.com/kb/307882 Comme j'ai XP home, je ne peux pas regarder plus avant. Si tu as des problèmes, adresse-toi plutôt au forum correspondant à ton OS. Cordialement. Daniel
Bonjour tous,
Voici mon problème, J'ai sur un ordi plusieurs comptes et j'aimerai en tant qu'administrateur de cet ordi mettre le niveau de securité des macros excel sur le niveau de securité moyen pour chaque compte a partir du compte Admin. Peut etre la valeur d'une clé à modifier?
Merci tous
Bonjour.
Regarde là.
http://support.microsoft.com/kb/307882
Comme j'ai XP home, je ne peux pas regarder plus avant. Si tu as des
problèmes, adresse-toi plutôt au forum correspondant à ton OS.
Cordialement.
Daniel
Bonjour tous,
Voici mon problème,
J'ai sur un ordi plusieurs comptes et j'aimerai en tant qu'administrateur de
cet ordi mettre le niveau de securité des macros excel sur le niveau de
securité moyen pour chaque compte a partir du compte Admin. Peut etre la
valeur d'une clé à modifier?
Bonjour. Regarde là. http://support.microsoft.com/kb/307882 Comme j'ai XP home, je ne peux pas regarder plus avant. Si tu as des problèmes, adresse-toi plutôt au forum correspondant à ton OS. Cordialement. Daniel
Bonjour tous,
Voici mon problème, J'ai sur un ordi plusieurs comptes et j'aimerai en tant qu'administrateur de cet ordi mettre le niveau de securité des macros excel sur le niveau de securité moyen pour chaque compte a partir du compte Admin. Peut etre la valeur d'une clé à modifier?
Merci tous
michdenis
Ceci est le contenu d'un fichier VBS qui permet de modifier le niveau de sécurité d'excel. En même temps, il s'occupe de cocher les 2 cases que l'on retrouve dans la fenêtre "éditeurs approuvés que l'on retrouve dans la même fenêtre de "Sécurité"
Au besoin, tu peux te contenter d'extraire la modification a apporté dans la base de registre...
Dans l'exemple suivant, il s'agit de remplacer le 1 par un 2 pour le niveau moyen.
'---------------------------------------------- On Error Resume Next Set objXl=GetObject(,"Excel.Application") If Not IsEmpty(objXl) Then Msgbox "Fermer excel pour exécuter ce scr1pt...",64,"La direction" WScript.Quit else Set objxl=createobject("Excel.Application") Ver = objxl.Version set objxl = nothing End If Err.Clear
Set wsh = WScript.CreateObject("WScript.Shell")
'Niveau de sécurité 1 pour 1er niveau wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityLevel",1,"REG_DWORD"
if ver >= 10 then 'Faire confiance au projet VBA -> 1 pour que la case soit cochée ' -> 0 pour que la case soit décochée wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityaccessVBOM",1,"REG_DWORD"
'Faire confiance au modèle -> 0 pour que la case soit cochée ' -> 1 pour que la case soit décochée wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityDontTrustInstalledFiles",0,"REG_DWORD" end if '----------------------------------------------
"berkowil" a écrit dans le message de groupe de discussion :
Bonjour tous,
Voici mon problème, J'ai sur un ordi plusieurs comptes et j'aimerai en tant qu'administrateur de cet ordi mettre le niveau de securité des macros excel sur le niveau de securité moyen pour chaque compte a partir du compte Admin. Peut etre la valeur d'une clé à modifier?
Merci tous
Ceci est le contenu d'un fichier VBS qui permet de modifier
le niveau de sécurité d'excel. En même temps, il s'occupe de
cocher les 2 cases que l'on retrouve dans la fenêtre "éditeurs
approuvés que l'on retrouve dans la même fenêtre de "Sécurité"
Au besoin, tu peux te contenter d'extraire la modification a
apporté dans la base de registre...
Dans l'exemple suivant, il s'agit de remplacer le 1 par un 2
pour le niveau moyen.
'----------------------------------------------
On Error Resume Next
Set objXl=GetObject(,"Excel.Application")
If Not IsEmpty(objXl) Then
Msgbox "Fermer excel pour exécuter ce scr1pt...",64,"La direction"
WScript.Quit
else
Set objxl=createobject("Excel.Application")
Ver = objxl.Version
set objxl = nothing
End If
Err.Clear
Set wsh = WScript.CreateObject("WScript.Shell")
'Niveau de sécurité 1 pour 1er niveau
wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _
Ver & "ExcelSecurityLevel",1,"REG_DWORD"
if ver >= 10 then 'Faire confiance au projet VBA -> 1 pour que la case soit cochée
' -> 0 pour que la case soit décochée
wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _
Ver & "ExcelSecurityaccessVBOM",1,"REG_DWORD"
'Faire confiance au modèle -> 0 pour que la case soit cochée
' -> 1 pour que la case soit décochée
wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _
Ver & "ExcelSecurityDontTrustInstalledFiles",0,"REG_DWORD"
end if
'----------------------------------------------
"berkowil" <berkowil@free.fr> a écrit dans le message de groupe de discussion :
40AFB4CF-9DC8-43F1-B52C-50B164A9728D@microsoft.com...
Bonjour tous,
Voici mon problème,
J'ai sur un ordi plusieurs comptes et j'aimerai en tant qu'administrateur de
cet ordi mettre le niveau de securité des macros excel sur le niveau de
securité moyen pour chaque compte a partir du compte Admin. Peut etre la
valeur d'une clé à modifier?
Ceci est le contenu d'un fichier VBS qui permet de modifier le niveau de sécurité d'excel. En même temps, il s'occupe de cocher les 2 cases que l'on retrouve dans la fenêtre "éditeurs approuvés que l'on retrouve dans la même fenêtre de "Sécurité"
Au besoin, tu peux te contenter d'extraire la modification a apporté dans la base de registre...
Dans l'exemple suivant, il s'agit de remplacer le 1 par un 2 pour le niveau moyen.
'---------------------------------------------- On Error Resume Next Set objXl=GetObject(,"Excel.Application") If Not IsEmpty(objXl) Then Msgbox "Fermer excel pour exécuter ce scr1pt...",64,"La direction" WScript.Quit else Set objxl=createobject("Excel.Application") Ver = objxl.Version set objxl = nothing End If Err.Clear
Set wsh = WScript.CreateObject("WScript.Shell")
'Niveau de sécurité 1 pour 1er niveau wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityLevel",1,"REG_DWORD"
if ver >= 10 then 'Faire confiance au projet VBA -> 1 pour que la case soit cochée ' -> 0 pour que la case soit décochée wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityaccessVBOM",1,"REG_DWORD"
'Faire confiance au modèle -> 0 pour que la case soit cochée ' -> 1 pour que la case soit décochée wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityDontTrustInstalledFiles",0,"REG_DWORD" end if '----------------------------------------------
"berkowil" a écrit dans le message de groupe de discussion :
Bonjour tous,
Voici mon problème, J'ai sur un ordi plusieurs comptes et j'aimerai en tant qu'administrateur de cet ordi mettre le niveau de securité des macros excel sur le niveau de securité moyen pour chaque compte a partir du compte Admin. Peut etre la valeur d'une clé à modifier?
Merci tous
michdenis
(Attention : Le script n'a pas été testé sous Office 2007)
"michdenis" a écrit dans le message de groupe de discussion :
Ceci est le contenu d'un fichier VBS qui permet de modifier le niveau de sécurité d'excel. En même temps, il s'occupe de cocher les 2 cases que l'on retrouve dans la fenêtre "éditeurs approuvés que l'on retrouve dans la même fenêtre de "Sécurité"
Au besoin, tu peux te contenter d'extraire la modification a apporté dans la base de registre...
Dans l'exemple suivant, il s'agit de remplacer le 1 par un 2 pour le niveau moyen.
'---------------------------------------------- On Error Resume Next Set objXl=GetObject(,"Excel.Application") If Not IsEmpty(objXl) Then Msgbox "Fermer excel pour exécuter ce scr1pt...",64,"La direction" WScript.Quit else Set objxl=createobject("Excel.Application") Ver = objxl.Version set objxl = nothing End If Err.Clear
Set wsh = WScript.CreateObject("WScript.Shell")
'Niveau de sécurité 1 pour 1er niveau wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityLevel",1,"REG_DWORD"
if ver >= 10 then 'Faire confiance au projet VBA -> 1 pour que la case soit cochée ' -> 0 pour que la case soit décochée wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityaccessVBOM",1,"REG_DWORD"
'Faire confiance au modèle -> 0 pour que la case soit cochée ' -> 1 pour que la case soit décochée wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityDontTrustInstalledFiles",0,"REG_DWORD" end if '----------------------------------------------
"berkowil" a écrit dans le message de groupe de discussion :
Bonjour tous,
Voici mon problème, J'ai sur un ordi plusieurs comptes et j'aimerai en tant qu'administrateur de cet ordi mettre le niveau de securité des macros excel sur le niveau de securité moyen pour chaque compte a partir du compte Admin. Peut etre la valeur d'une clé à modifier?
Merci tous
(Attention : Le script n'a pas été testé sous Office 2007)
"michdenis" <michdenis@hotmail.com> a écrit dans le message de groupe de discussion :
eCQrv62lJHA.5732@TK2MSFTNGP05.phx.gbl...
Ceci est le contenu d'un fichier VBS qui permet de modifier
le niveau de sécurité d'excel. En même temps, il s'occupe de
cocher les 2 cases que l'on retrouve dans la fenêtre "éditeurs
approuvés que l'on retrouve dans la même fenêtre de "Sécurité"
Au besoin, tu peux te contenter d'extraire la modification a
apporté dans la base de registre...
Dans l'exemple suivant, il s'agit de remplacer le 1 par un 2
pour le niveau moyen.
'----------------------------------------------
On Error Resume Next
Set objXl=GetObject(,"Excel.Application")
If Not IsEmpty(objXl) Then
Msgbox "Fermer excel pour exécuter ce scr1pt...",64,"La direction"
WScript.Quit
else
Set objxl=createobject("Excel.Application")
Ver = objxl.Version
set objxl = nothing
End If
Err.Clear
Set wsh = WScript.CreateObject("WScript.Shell")
'Niveau de sécurité 1 pour 1er niveau
wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _
Ver & "ExcelSecurityLevel",1,"REG_DWORD"
if ver >= 10 then 'Faire confiance au projet VBA -> 1 pour que la case soit cochée
' -> 0 pour que la case soit décochée
wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _
Ver & "ExcelSecurityaccessVBOM",1,"REG_DWORD"
'Faire confiance au modèle -> 0 pour que la case soit cochée
' -> 1 pour que la case soit décochée
wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _
Ver & "ExcelSecurityDontTrustInstalledFiles",0,"REG_DWORD"
end if
'----------------------------------------------
"berkowil" <berkowil@free.fr> a écrit dans le message de groupe de discussion :
40AFB4CF-9DC8-43F1-B52C-50B164A9728D@microsoft.com...
Bonjour tous,
Voici mon problème,
J'ai sur un ordi plusieurs comptes et j'aimerai en tant qu'administrateur de
cet ordi mettre le niveau de securité des macros excel sur le niveau de
securité moyen pour chaque compte a partir du compte Admin. Peut etre la
valeur d'une clé à modifier?
(Attention : Le script n'a pas été testé sous Office 2007)
"michdenis" a écrit dans le message de groupe de discussion :
Ceci est le contenu d'un fichier VBS qui permet de modifier le niveau de sécurité d'excel. En même temps, il s'occupe de cocher les 2 cases que l'on retrouve dans la fenêtre "éditeurs approuvés que l'on retrouve dans la même fenêtre de "Sécurité"
Au besoin, tu peux te contenter d'extraire la modification a apporté dans la base de registre...
Dans l'exemple suivant, il s'agit de remplacer le 1 par un 2 pour le niveau moyen.
'---------------------------------------------- On Error Resume Next Set objXl=GetObject(,"Excel.Application") If Not IsEmpty(objXl) Then Msgbox "Fermer excel pour exécuter ce scr1pt...",64,"La direction" WScript.Quit else Set objxl=createobject("Excel.Application") Ver = objxl.Version set objxl = nothing End If Err.Clear
Set wsh = WScript.CreateObject("WScript.Shell")
'Niveau de sécurité 1 pour 1er niveau wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityLevel",1,"REG_DWORD"
if ver >= 10 then 'Faire confiance au projet VBA -> 1 pour que la case soit cochée ' -> 0 pour que la case soit décochée wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityaccessVBOM",1,"REG_DWORD"
'Faire confiance au modèle -> 0 pour que la case soit cochée ' -> 1 pour que la case soit décochée wsh.RegWrite "HKCUSoftwareMicrosoftOffice" & _ Ver & "ExcelSecurityDontTrustInstalledFiles",0,"REG_DWORD" end if '----------------------------------------------
"berkowil" a écrit dans le message de groupe de discussion :
Bonjour tous,
Voici mon problème, J'ai sur un ordi plusieurs comptes et j'aimerai en tant qu'administrateur de cet ordi mettre le niveau de securité des macros excel sur le niveau de securité moyen pour chaque compte a partir du compte Admin. Peut etre la valeur d'une clé à modifier?