SELECIONAR ITEM LIS...
 
Notifications
Clear all

SELECIONAR ITEM LISTVIEW TRANSFERIR TEXTBOX

13 Posts
1 Usuários
0 Reactions
1,721 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Olá pessoal, quero desenvolver um formulário de emissão da solicitação de nota fiscal onde no textbox(Empresa) com alguma tecla de atalho ou botão, abri-se outro formulário de pesquisa,isto é, com a função listview, e ao pesquisar digitando no nome da empresa desejado no textbox(Empresa) aparecendo na lista o nome, mas quero selecionar esta empresa desejada na lista dando duplo clique onde será transferido o nome para o textbox(Empresa) do formulário principal e fechando o formulário de pesquisa.

Existirá uma aba com o cadastro das empresas.

silvajmp

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 16/03/2013 12:47 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde

Veja se estes links ppodem te ajudar:

http://www.tomasvasquez.com.br/forum/vi ... UXpdRyG1J4

http://social.msdn.microsoft.com/Forums ... 6d3ef6de34

Esperoo ter ajudado.

Um abraço.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 17/03/2013 10:04 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde!!

Veja um exemplo em
http://www.sendspace.com/file/44okhm
Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 17/03/2013 12:26 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa noite Alexandre, obrigado pelas dicas me ajudou muito, só para ter mais conhecimento, eu consigo ao invés de criar um botão para chamar o formulário frmPesq, dar duplo clique no próprio textbox(TextEmpresa) no frmSNF, na qual será inserido o nome da Empresa buscado no formulário frmPesq?

silvajmp

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 19/03/2013 6:22 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa noite!

Não sei se vai dar certo mas use o Evento DblClick

Private Sub TextEmpresa_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
frmPesq.Show
End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 19/03/2013 8:04 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Alexandre, preciso mais uma dica, teria como uma tecla de atalho tipo aperto o F3 como exemplo para abrir o frmPesq.

silvajmp

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 23/03/2013 7:26 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa noite!!

Exemplo

Sub Test()
 'Coloque dentro de --> EstaPasta_de_Trabalho
 Application.OnKey "{F3}", "MostrarForm"
End Sub
Sub MostrarForm()
'Coloque dentro de --> Modulo
    frmPesq.Show
End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 23/03/2013 8:17 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Alexandre boa noite, fiz o teste mais não funcionou, na verdade preciso que esta tecla de atalho sege acionado quando o frmSNF estiver na tela. Exemplo acionei a frmSNF esta na tela quero abrir o frmPesq teclando esta tecla de atalho.

silvajmp

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 23/03/2013 9:07 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde!!

Veja se assim te ajuda...

Dentro do Form chamado frmSNF, use o seguinte código.

Private Sub TextEmpresa_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = vbKeyF3 Then frmPesq.Show
End Sub

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 24/03/2013 9:26 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde Alexandre, mais uma para o aprendizado, ficou do jeito que eu esperava, porém vamos mais uma duvida quando dou duplo clique na linha do listview no frmPesqForn e a informação retorna para o textFornecedor no frmSNF queria que aparece-se nos textbox2(CNPJ), textbox3(Endereço), textbox4(Cidade), textbox5(UF) e textbox6(Telefone) os dados já cadastrados na sheet(Empresa) sem ser no evento Exit ou Enter, já aparece quando o nome do fornecedor estiver no textFornecedor.

silvajmp

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 24/03/2013 10:32 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde!!

Reveja seu ultimo anexo postado, me parece que ele está sem alguns recursos de rotinas.

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 24/03/2013 10:39 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Alexandre na verdade estou construindo conforme meu tempo, a duvida citada seria a etapa do momento, as outras rotinas viram em seguida.

silvajmp

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 24/03/2013 11:15 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Muito estranho, na "etapa do momento" não há nada. Então não haverá rotina alguma??

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 24/03/2013 11:54 am