Injformatica

Disponível somente no TrabalhosFeitos
  • Páginas : 6 (1385 palavras )
  • Download(s) : 0
  • Publicado : 9 de abril de 2011
Ler documento completo
Amostra do texto
Excel – Macros e Programação em VBA

Campus Curitiba Departamento Acadêmico de Matemática Angela Olandoski Barboza
3 de junho de 2009
UTFPR – Damat

Pág. 1

Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
Preparação da Planilha • Salve a Pasta de Trabalho como Cadastro de Clientes.xls • Mude o nome da primeira planilha para Dados Clientes • Digite os títulos comomostra a figura:

3 de junho de 2009

UTFPR – Damat

Apostila - 131

Pág. 2

Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
Preparação da Planilha • Mude o nome da segunda planilha para Estados; • Digite os dados mostrados na figura a seguir

3 de junho de 2009

UTFPR – Damat

Apostila - 131

Pág. 3

Excel – Macros e Programação em VBA
Exemplo: Cadastro deClientes
Preparação da Planilha • Mude o nome da terceira planilha para Cidades; • Digite os dados mostrados na figura a seguir

3 de junho de 2009

UTFPR – Damat

Apostila - 131

Pág. 4

Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
Construção do User Form Coloque os seguintes objetos no UserForm:

3 de junho de 2009

UTFPR – Damat

Apostila - 131

Pág. 5 Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
Construção do User Form Clique uma vez no CommandButton1 e mude a propriedade Name para Gravar e Caption para Gravar.

3 de junho de 2009

UTFPR – Damat

Apostila - 131

Pág. 6

Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
Construção do User Form Clique uma vez no CommandButton2 e mude apropriedade Name para Pesquisar e Caption para Pesquisar.

3 de junho de 2009

UTFPR – Damat

Apostila - 131

Pág. 7

Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
Construção do User Form Clique uma vez no CommandButton3 e mude a propriedade Name para Excluir e Caption para Excluir.

3 de junho de 2009

UTFPR – Damat

Apostila - 131

Pág. 8

Excel – Macros eProgramação em VBA
Exemplo: Cadastro de Clientes
Construção do User Form Clique uma vez no CommandButton4 e mude a propriedade Fechar para Gravar e Caption para Fechar.

3 de junho de 2009

UTFPR – Damat

Apostila - 131

Pág. 9

Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
Construção do UserForm
• • Clique no UserForm; Na caixa de propriedades, altere aspropriedades Name e Caption, como mostra a figura:

3 de junho de 2009

UTFPR – Damat

Apostila - 131

Pág. 10

Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
Construção do UserForm
• • • Clique no UserForm; Selecione a ComboBox1, clicando sobre este objeto; Digite as linhas de comando mostradas na figura para a propriedade RowSource

3 de junho de 2009

UTFPR –Damat

Apostila - 131

Pág. 11

Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
• Botão Gravar 'Ativar a primeira planilha ThisWorkbook.Worksheets("Dados Clientes").Activate 'Selecionar a célula A3 Range("A3").Select 'Procurar a primeira célula vazia Do If Not (IsEmpty(ActiveCell)) Then ActiveCell.Offset(1, 0).Select End If Loop Until IsEmpty(ActiveCell) = True
3 de junhode 2009
UTFPR – Damat

Apostila - 131

Pág. 12

Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
• Botão Gravar

'Carregar os dados digitados nas caixas de texto para a planilha ActiveCell.Value = TextBox1.Value ActiveCell.Offset(0, 1).Value = TextBox2.Value ActiveCell.Offset(0, 2).Value = TextBox3.Value ActiveCell.Offset(0, 3).Value = ComboBox1.ValueActiveCell.Offset(0, 4).Value = ComboBox2.Value

3 de junho de 2009

UTFPR – Damat

Apostila - 131

Pág. 13

Excel – Macros e Programação em VBA
Exemplo: Cadastro de Clientes
• Botão Gravar 'Carregar as opções de cartão de crédito If CheckBox1.Value Then ActiveCell.Offset(0, 5).Value = "Sim" Else ActiveCell.Offset(0, 5).Value = "Não" End If If CheckBox2.Value Then ActiveCell.Offset(0, 6).Value =...
tracking img