Home Excel - Dicas Microsoft Excel VBA Excel VBA - Aplicativo Excel vba aplicativo mostra o nível de segurança das macros

Excel vba aplicativo mostra o nível de segurança das macros

E-mail Imprimir PDF

Saberexcel - o site das macros

Essa macro do Aplicativo Microsoft Excel VBA, mostra o nível de segurança atual no seu aplicativo MS Excel
 

Sub Teste_Nivel_Segurança()
  MsgBox Nivel_Seguranca
End Sub

 Function Nivel_Seguranca()
'para Excel 2000 et 2002,2003 a função retorna

' 1 -> nivel de segurança Baixo
' 2 -> nivel de segurança Médio
' 3 -> nivel de segurança Alto

Dim Cle2000$, Cle2002$, Cle2003$, WSH

 Cle2000 = "HKCU\Software\Microsoft\Office\9.0\Excel\Security\Level"
 Cle2002 = "HKCU\Software\Microsoft\Office\10.0\Excel\Security\Level"
 Cle2003 = "HKCU\Software\Microsoft\Office\11.0\Excel\Security\Level"

Set WSH = CreateObject(”WScript.Shell”)
Select Case Val(Application.Version)

Case 9
      Nivel_Seguranca = WSH.RegRead(Cle2000)
Case 10
      Nivel_Seguranca = WSH.RegRead(Cle2002)
Case 11
      Nivel_Seguranca = WSH.RegRead(Cle2003)
Case Else
      Nivel_Seguranca = "Versão d’Excel não conhecida "
End Select

End Function


Aprenda tudo sobre o Aplicativo Microsoft Excel VBA, sozinho, praticando com os produtos didáticos SaberExcel

Última atualização em Sáb, 13 de Agosto de 2011 17:20  

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

PROMOÇÃO DIDÁTICOS SABEREXCEL



Adquira já o Acesso Imediato
à Area de Membros

Compra Grantida --- Entrega Imediata

Aprenda Excel VBA com Simplicidade de 
códigos e Eficácia, Escrevendo Menos e
Fazendo Mais.

'-------------------------------------'
Entrega Imediata:
+  500 Video Aulas MS Excel VBA
+  35.000 Planilhas Excel e VBA
+  Coleção 25.000 Macros MS Excel VBA
+  141 Planilhas Instruções Loops
+  341 Planilhas WorksheetFunctions(VBA)
+    04 Módulos Como Fazer Excel VBA
+  Curso Completo MS Excel VBA
+  Planilhas Inteligentes


Pesquisa Google SaberExcel

Publicidade Google

<script type="text/javascript"><!--

google_ad_client = "ca-pub-2317234650173689";

/* retangulo 336 x 280 */

google_ad_slot = "0315083363";

google_ad_width = 336;

google_ad_height = 280;

//-->

</script>

<script type="text/javascript"

src="http://pagead2.googlesyndication.com/pagead/show_ads.js">

</script>

Publicidade

RSFirewallProtected


Google Associados

Depoimentos

Recebi ontem o DVD, e gostaria parabenizá-lo pelo excelente material. Muito bom mesmo!. Obrigado, Marcos - Prestação de Contas(prefeitura de (D...))...

Marcos - Prestação Contas Prefeitura (...)
11 January 2012
Sr. Marcondes, Recebi seu material (DVD – 14.000 PLANILHAS EXEMPLOS MICROSOFT EXCEL VBA e curso completo Microsoft Excel VBA).A entrega foi muito rápida. Já tenho sua coleção de macros que é excelente e me ajuda a criar projetos mais sofisticados. O DVD 14000 Planilhas vai aumentar meus co...

Odilon-São Paulo
São Paulo
28 January 2011

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA