Excel vba proteger celulas e abrir usf plan desejada

Sex, 29 de Julho de 2011 17:53 Expedito Marcondes
Imprimir

Saberexcel - o site de quem precisa aprender Macros Microsoft Excel VBA

Esse procedimento do Aplicativo Microsoft Excel VBA, usando o evento ..Open() do módulo de Edição de Códigos do Livro(Workbook), abirá o userform  na planiha desejada, observe no código vba que selecionamos a planilha primeiramente  e depois mandamos abrir o userform.
Esse Evento Workbook_Open ocorre na abertura (Inicialização) do Livro.
 


Private Sub Workbook_Open()
Sheets("Plan3").Select
UserForm1.Show
End Sub
'----'


Imagem de como proteger células manualmente, se quiser poderá gravar a macro com os passos de proteção de células.
para o treinamento.

 

O Aluno(Leandro) solicitou que fizessemos um passo a passo de como proteger células na  determinada Folha de Planilha para evitar a
a digitação nas células e ou seleção nestas células protegidas. Fizemos uma imagem (abaixo) desse procedimento) manualmente e também,
via macro, como é um assunto para iniciantes usamos o GM(Gravador de Macros) já logo na explicação, usando o Gravador de Macros e resultou
nesta macro abaixo, que primeiramente desprotege todas as células da planilha, em seguida selecionamos nossas células ou uma área de células,
e marcamos nossas células como bloqueadas, isso significa que somente a nossas células ficaram bloqueadas, neste ponto voce poderá ir
em proteger planilha e selecionar os ítem selecionar células desbloqueadas, isso quer dizer que as células bloqueadas não poderão ser acessadas.
Veja a imagem abaixo.   ( observem que o GM(Gravador de Macros) que é o assunto de nosso Curso Completo Microsoft Excel VBA, Saberexcel - Planilhas onteúdo Curso Completo Microsoft Excel Vba (791.91 KB)como Aprender a lidar com o Gravador de Macros(Gravar, depurar um código etc..), que  é extremamente importante para aprendizes e ou já quem domina também a linguagem de programação ms excel vba. Expero que o exemplo possa ajudá-los, Fiquem com Deus. Expedito Marcondes

Código gerado pelo GM(Gravador de Macros) - automatizando dados ou formatação em uma folha de planilha
o esforço é fazer os passos no aplicativo corretamente para nao gravar códigos desnecessários.

Sub Macro1()
' Saberexcel_Treinamento VBA - Gravador de Macros
' Saberexcel  - o site das macros
 On Error Resume Next
'
    Cells.Select
    Selection.Locked = False
    Selection.FormulaHidden = False
    Range("E5,F6,G7,H8,I9,J10,K11,L12,M13,N14,O15,P16,Q17").Select
    Range("Q17").Activate
   
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = 65535
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
   
    Selection.Locked = True
    Selection.FormulaHidden = False
    Range("F10").Select
   
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
    ActiveSheet.EnableSelection = xlUnlockedCells
    Range("D7").Select
    Plan2.Select
    Range("D18").Select
End Sub

 

Sub limpar_cell()
ActiveSheet.Unprotect
Cells.Clear
Cells.Locked = True
[G1].Select
End Sub

Sub abrir()
UserForm1.Show
End Sub




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




   Baixe o exemplo de planilha contendo procedimento acima
Excel planilha vba proteger celulas e abrir usf plan desejada (188.97 KB)


Publicidade
Compre com segurança, garantia e ótimos preços
Eletrônicos - Submarino.com.br

Tags:
Última atualização em Qua, 10 de Agosto de 2011 08:15