Notifications
Clear all

AJUDA! PROCURAR A MESMA LINHA PARA GRAVAR DADOS

5 Posts
2 Usuários
0 Reactions
926 Visualizações
(@bilokas)
Posts: 168
Reputable Member
Topic starter
 

Galera, preciso da ajuda de vocês num projeto que estou desenvolvendo aqui para o meu trabalho.
Imaginem a seguinte rotina para cadastrar dados de um CONTRATO:

Private Sub btn_Cadastrar_Click()
Dim lin As Integer
If Range("A3") = "" Then
lin = 3 'meu cabeçalho tem 2 linhas
    Else
    Range("A1").Select
    Selection.End(xlDown).Select
    lin = ActiveCell.Row + 1
End If
    Sheets("contrato&garantia").Cells(lin, 1).Value = Me.txt_C_Numero.Value & "/" & Me.txt_C_Ano.Value
    Sheets("contrato&garantia").Cells(lin, 2).Value = Me.txt_C_Processo.Value
    Sheets("contrato&garantia").Cells(lin, 3).Value = Me.txt_C_Beneficiario.Value
    Sheets("contrato&garantia").Cells(lin, 4).Value = Me.cbo_C_Modalidade.Value
    Sheets("contrato&garantia").Cells(lin, 5).Value = Me.txt_C_Objeto.Value
    Sheets("contrato&garantia").Cells(lin, 6).Value = Me.txt_C_Observacao.Value
End Sub

Agora imaginem que este mesmo cotrato possui uma GARANTIA que pode ser incluída depois do cadastro do CONTRATO.
Para isso, no formulário de cadastro de garantia, tem duas TextBox (txt_ReferenteC_Numero, txt_ReferenteC_Ano).
Ao cadastrar a GARANTIA do contrato, preciso de algum código que faça a verificação dessas duas TextBox e salve os dados na mesma linha do contrato referido.

Peço encarecidamente a ajuda dos colegas do fórum. Isso é de muita importância para mim.

 
Postado : 06/12/2013 8:40 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
(@bilokas)
Posts: 168
Reputable Member
Topic starter
 

Obrigado pela resposta alexandrevba, eu usei a pesquisa do fórum, mas não encontrei nada. E se você reparar bem no que eu estou pedindo ajuda não é sobre INCLUIR OU ALTERAR.

É sobre incluir a partir de. Ou seja, tenho um formulário, e nele tenho duas TextBox, onde informo o número de contrato e ano, e ao clicar em cadastrar, ele identifica a linha pelo número e ano informado e cadastrar na mesma linha.

Com o método de alterar, justamente a pessoa não estaria INCLUINDO A PARTIR DE, estaria apenas pesquisando e simplesmente alterando, quer dizer, seria uma ação de alterar e não de incluir.

 
Postado : 06/12/2013 11:00 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Entendo que o que deseja é Alterar.
Uma vez o registro "gravado", qualquer complementação de dados deve ser considerada/entendia como Alteração. Para tanto é necessário uma rotina que busque/procure o registro unico (entendo que seja o valor em A). Obtendo esse registro, "carrega-se" os dados em suas respectivas TextBoxs/Combobox ...; bem como a linha index onde o registro está(foi localizado). Então seleciona-se essa linha e salva os dados (todos ou somente alguns) novamente.

 
Postado : 06/12/2013 11:35 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite!!

Favor informa as postagens cruzadas!!!
http://www.tomasvasquez.com.br/forum/vi ... 380#p12380

Att

 
Postado : 07/12/2013 7:18 pm