Você está em: Principal › Tutoriais › Informatizando sua Empresa com Excel : Agendaconsulta005
Sistema Agenda Consulta. Parte 5
O objetivo deste tutorial é continuar o desenvolvimento do sistema agenda consulta, nesta tutorial iremos crdesenvolver o banco de dados para armazenar os registros, para isso vamos utilizar a segunda planilha, também iremos codificar o formulário Paciente. Tudo de forma simples e direta, através de telas.
Começaremos desenvolvendo o banco de dados, utilizaremos a plan2, modifique o nome da mesma para "PACIENTE", depois iremos inserir os seguintes campos:
Feito isso, iremos inserir na primeira linha uma cor cinza e negrito, assim ficara destacado como cabeçalho.
O procedimento para formatação dos demais campos é quase a mesma, então irei apenas informar como deve ser a formatção dos demais campos, não havendo necessidade de mostrar em telas.
Terminado a criação do banco, bem como ajustados os campos, vamos passar para a codificação do formulário "paciente".Insira o código abaixo dentro formulário, no evento initialize.
Me.N = Application.WorksheetFunction.CountA(Plan2.Columns(1)) – 1
Codificaremos agora os botões, devendo ser inserido o codigo abaixo sempre dentro do evento clic do botão.
If Me.TextBox_email.Text = "" Then
CADASTRO(3) = UCase(Me.TextBox_telefone)
Set Consulta = Plan2.Cells(1, 1).CurrentRegion
Neste tutorial ensinei a desenvolver o banco de dados para o sistema, definindo as formatações necessárias para cada campo. Codificamos também o formulário "paciente", inserindo os códigos, tudo de forma simples, e objetiva mostrando através de telas para melhor entendimento. Na próxima parte do tutorial daremos continuidade no desenlvovimento do sistema. Bons estudos e até a próxima parte.