Excel Avançado - Projeto Agenda - Parte 02

Nesta segunda parte do Projeto Agenda, iremos construir a tela da Exclusão.
01. Menu Inserir/UserForm.

(Name): Frm_Excluir
Caption: Exlusão de Clientes
Height=: 180
Width: 260

02. Agora insira um Rótulo com as seguintes propriedades.

(Name): Lbl_Desc
Autosize: True
Caption: Selecione o(s) cliente(s) a ser(em) exluidos.

Left: 6

Top: 6

AutoSize: True

03. Insira uma caixa de listagem com as seguintes propriedades:

(Name): Lst_Nome
Height: 120
Left: 6
Multiselect: 1 frmMultiSelect
Top: 25
Width: 160

04. Agora vamos colocar 2 botões:


Botão 1
(Name): Cmd_Excluir
Accelerator: E
Caption: Excluir
Default: True
Height: 24
Left: 174
Top: 25
Width: 72

Botão 2
(Name): Cmd_Ok
Accelerador: O
Caption: OK
Height: 24
Left: 174
Top: 60
Width: 72

---

05. Vamos agora continuar a programação:
Dê dois cliques no botão Excluir e acima dele insira o código:



06. Depois clique dentro da Sub CMD_Excluir e digite:




07. Dê dois clique no botão OK.


08. Selecione o Objeto Lst_Name e localize o procedimento Change.


09. Digite as linhas de programação abaixo:


10. Selecione agora o Objeto UserForm e a propriedade Activate