Setup para Instalação de projetos em VBA

Veja como incluir um instalador no seu projeto

1º – Criar uma planilha com nome “Instalar o Sistema”

  • Pode personalizar ela como quiser, com as instruções de instalação
  • “ATENÇÃO” deve manter o texto da célula B24 como “Status: Desinstalado”
  • Manter um botão para chamar o formulário de instalação e adicionar macro form_install.show
  • Ativar as Bibliotecas – Microsoft Scripting Runtime

2º – No evento Workbook_Open da sua pasta de trabalho, inserir o código abaixo:

Private Sub Workbook_Open()
    
    On Error GoTo trata_erro
    
        If ThisWorkbook.Sheets("Instalar o Sistema").Range("B24").Value = "Status: Desinstalado" Then
            
            For Each plans In ActiveWorkbook.Sheets
                
                name_plan = plans.Name
                
                If name_plan <> "Instalar o Sistema" Then
                    ThisWorkbook.Sheets(name_plan).Visible = 2
                Else
                    ThisWorkbook.Sheets(name_plan).Visible = -1
                End If
                
            Next plans
            
        ElseIf ThisWorkbook.Sheets("Instalar o Sistema").Range("B24").Value = "Status: Instalado" Then
            
            For Each plans In ActiveWorkbook.Sheets
                
                name_plan = plans.Name
                
                If name_plan = "Instalar o Sistema" Then
                    ThisWorkbook.Sheets(name_plan).Visible = 2
                Else
                    ThisWorkbook.Sheets(name_plan).Visible = -1
                End If
                
            Next plans
            
        End If
        
        
trata_erro:
        
    End Sub

3º – Importar o Form_Install para seu projeto:

  • Arquivo: form_install.frm

4º – Escolha um icone que melhor identifique sua aplicação (formato .ico)

  • Cole o arquivo na mesma pasta onde está sua aplicação VBA com nome “icon.ico”