Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Duplicidade no modelo de cadastro

Dúvidas gerais sobre Excel
noxios
Acabou de chegar
Acabou de chegar
Mensagens: 9
Registrado em: Sáb Out 22, 2011 8:49 am

Re: Duplicidade no modelo de cadastro

Mensagem por noxios »

Ola

estou absolutamente precisando de um tipo de impedimento de duplicidade "dupla" (tipo impedir q duas colunas DATA e LOCAL se repitam em conjunto) mas se se repetirem isoladas e aceitavel).
com o exemplo deste modelo possivelmente poderei tirar ideias ou mesmo adaptar à minha necessidade, só que nao estou conseguindo baixar o modelo (possivelmente devido ao problema q no passado corrumpeu muitos files deste forum)

o pedido por agora é no sentido q possam por favor disponibilisar este file ou algum melhorado (procurei no forum mas nao encontrei nada).

um muito obrigado desde ja por uma possivel ajuda.


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: Duplicidade no modelo de cadastro

Mensagem por webmaster »

Colega,

Acredito que o caminho seja este:

viewtopic.php?f=6&t=544&p=3299

Abraços


noxios
Acabou de chegar
Acabou de chegar
Mensagens: 9
Registrado em: Sáb Out 22, 2011 8:49 am

Re: Duplicidade no modelo de cadastro

Mensagem por noxios »

Obrigado pela resposta em tao curto espaço de tempo "webmaster" (nao esperava pra ser sincero)

relactivamente a pagina mencionada eu ja a tinha lido a adaptaçao essa, nao consegui e os files dessa pagina tb nao me são possiveis baixar
fica o agradecimento sincero do "direccionamento" dado... infelizmente (para mim) nao muito util.


Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: Duplicidade no modelo de cadastro

Mensagem por webmaster »

Colega,

Com algum esforço, o pessoal do fórum conseguiu restaurar alguns:

viewtopic.php?f=2&t=973&p=5968

Veja se o mesmo consta. São muitos. Perdoe e falha.

Abraços


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


noxios
Acabou de chegar
Acabou de chegar
Mensagens: 9
Registrado em: Sáb Out 22, 2011 8:49 am

Re: Duplicidade no modelo de cadastro

Mensagem por noxios »

Ora essa , nao tem nada o q perdoar antes pelo contrario neste caso em particular de impedimento a duplicidades no modelo V3 tou meio sem saber como fazer mas verdade seja dita muitas outras materias neste forum sao bastante didacticas e uteis.
Por esta e mais algumas razões eu é q tenho de agradecer o esforço que foi feito no forum para ajudarem os internautas menos providos de conhecimentos de programação (em particular o VBA)
Um bem haja ao forum e a todos que o formam.


wfranca
Colaborador
Colaborador
Mensagens: 38
Registrado em: Qua Set 11, 2013 11:44 am

Re: Duplicidade no modelo de cadastro

Mensagem por wfranca »

Pessoal,

andando pelo forum... encontrei esse código que até me ajuda, antes de realizar o lançamento para o banco de dados ele verifica se há duplicidade de informação, mas oq eu não encontrei e não consegui é fazer com que o código confronte dois campos para identificar a duplicidade.

No caso desse código ele está apenas localizando a informação do meu txt_nfe, gostaria de adaptar para pesquisar mais uma textbox que seria a txt_bloco.

Private Sub txt_nfe_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim RefId As String

'Valor a pesquisar
RefId = txt_nfe

If RefId = "" Then
MsgBox "Digite um Valor Inválido"
txt_nfe.SetFocus
Exit Sub

Else
'Chama a Function
ProcuraRefId (RefId)
End If

If sLocaliza = True Then
MsgBox "Para esse número de nota já exite lançamentos", vbExclamation
txt_nfe.Text = ""
Else
MsgBox "Referencia não Localizada"
End If

End Sub

Public Function ProcuraRefId(ByVal RefId As String) As String
Dim iLin As Long
Dim sCol As Long


sLocaliza = False


'Dim wbclientes As Workbook
'Dim wsDados As Worksheet
'Set wsBDFormularios = wbclientes.Worksheets(nomePlanilhaFormularios)



iLin = 2 'Linha 1
sCol = 16 'Coluna 1


With wsCadastro

Do While Not IsEmpty(.Cells(iLin, sCol))

If .Cells(iLin, sCol).Value = RefId Then

sLocaliza = True 'Verdadeiro se encontrado
sCel = .Cells(iLin, sCol).Address(False, False)

Exit Do 'Sai do Loop se encontrar

End If

'Incrementa a linha
iLin = iLin + 1

Loop

End With

End Function


Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1537
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: Duplicidade no modelo de cadastro

Mensagem por Reinaldo »

Não entendi??


wfranca
Colaborador
Colaborador
Mensagens: 38
Registrado em: Qua Set 11, 2013 11:44 am

Re: Duplicidade no modelo de cadastro

Mensagem por wfranca »

Desculpa Reinaldo.. não fui bem especifico...

estou usando o modelo de cadastro do Tomas... e estou querendo adaptar um código para que ao inserir um cadastro ele me identifique que aquele lançamento já consta no banco de dados...

pesquisei pelo forum e ainda ficou meio vago pq preciso de um código que confronte meu textbox1 e textbox2 por exemplo, numero da nota fiscal e data de emissão...


Patropi
Colaborador
Colaborador
Mensagens: 47
Registrado em: Ter Jun 15, 2010 9:17 pm

Re: Duplicidade no modelo de cadastro

Mensagem por Patropi »

noxios

Na assinatura do Tomás tem o endereço do Blog, dê uma procurada por lá.

[]s


SaraOliveira
Colaborador
Colaborador
Mensagens: 17
Registrado em: Sex Set 15, 2017 8:29 am

Re: Duplicidade no modelo de cadastro

Mensagem por SaraOliveira »

Bom dia!

Alguém ainda tem a planilha com esse módulo?
Este arquivo esta corrompido, infelizmente :'(


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder