Colaboradores

terça-feira, 30 de agosto de 2011

Excel avançado - UserForm

Preparando a planilha, no Excel renomeie a Plan1 para Chamada do Curso.

Monte a seguinte tabela:



Em VBA monte a seguinte estrutura:

01. Primeiramente vamos montar o formulário. Menu Inserir / User Form.


02. Na caixa de propriedades altere a propriedade:
(Name) -> frmLivroCurso
Caption -> Formulário Cadastro.
Heigth -> 256,5
Width -> 208,5

02. Utilize a ferramenta Rótulo para criar os texto de exibição:
Nome -> Height: 9,75 / Left:12 / Top:12 / Width:24
Fone -> Heigth:9,75 / Left:12 / Top:36 / Width:26,25
Dpto. -> Heigth:9,75 / Left:12 / Top:60 / Width:46,5
Curso ->Heigth:9,75 / Left:12 / Top:84 / Width:29,25

03. Agora vamos utilizar a ferramenta Caixa de texto, para criar os locais onde o usuário irá digitar as informações:
1ª caixa:
(Name) -> txtNome
Heigth -> 18
Left -> 60
TabIndex -> 0
Top -> 12
Width -> 120

2ª caixa
(Name) -> txtFone
Heigth -> 18
Left -> 60
TabIndex ->1
Top -> 36
Width -> 120

04. Com a ferramenta caixa de combinação vamos fazer as caixas do departamento e do curso:

1ª caixa
(Name) -> cboDepartamento
Heigth -> 18
Left -> 60
TabIndex ->2
Top -> 60
Width -> 120

2ª caixa
(Name) -> cboCurso
Heigth -> 18
Left -> 60
TabIndex ->7
Top -> 84
Width -> 120

05. Agora vamos utilizar a ferramenta Quadro:
(Name) -> fraNivel
Caption -> Nível
Heigth -> 72
Left -> 12
TabIndex -> 8
Top -> 114
Width -> 78

06. Vamos colocar os itens dentro do quadro, para isso mantenha o mesmo selecionado, clique na ferramenta Botão de opção

1º Botão
(Name) -> optIntroducao
Caption -> Introdução
Heigth -> 17,25
Left -> 6
TabIndex -> 0
Top -> 6
Width -> 64,5

2º Botão
(Name) -> optIntermediario
Caption -> Intermediário
Heigth -> 17,25
Left -> 6
TabIndex -> 1
Top -> 24
Width -> 66,75

3º Botão
(Name) -> optAvancado
Caption -> introdução
Heigth -> 17,25
Left -> 6
TabIndex -> 2
Top -> 42
Width -> 56,25

07. Vamos utilizar agora a Caixa de Seleção

1ª Caixa
(Name) = chkAlmoco
Caption = Almoço
Height = 17,25
Left = 108
TabIndex = 9
top = 120
Width= 75,75

2ª Caixa

(Name) = chkvegetariano

Caption = Vegetariano

Enabled = False

Height = 17,25

Left = 108

Tabindex = 10

Top = 138

Width = 59,25


08. Vamos Criar os botões, são três, utilize a ferramenta botões de comando.

1º botão

(Name) = cmdLimpar

Caption = Limpar

Height = 24

Left = 108

Tabindex = 13

Top = 162

Width = 72


2º botão

(Name) = cmdOK

Caption = OK

Default = True

Height = 24

Left = 24

Tabindex = 11

Top = 198

Width = 72


3º botão

(Name) = cmdCancelar

Caption = Cancelar

Height = 24

Left = 108

Tabindex = 12

Top = 198

Width = 72

Nenhum comentário:

Postar um comentário