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

Pesquisa resultou em 67 ocorrências

por Basole
Qui Mar 01, 2018 9:51 pm
Fórum: Modelos Prontos
Tópico: VBA - Preenchendo um listbox com mais de 10 colunas
Respostas: 13
Exibições: 13791

Re: VBA - Preenchendo um listbox com mais de 10 colunas

fbzam, com o Listbox acrescentando dados de textbox e combobox, seria mais ou menos assim: With ListBox1 .List(.ListCount - 1, 0) = TextBox1.Text .List(.ListCount - 1, 2) = comboBox1.Text .List(.ListCount - 1, 3) = TextBox2.Text .List(.ListCount - 1, 4) = TextBox3.Text .List(.ListCount - 1, 5) = com...
por Basole
Qua Fev 28, 2018 12:45 pm
Fórum: VBA Básico
Tópico: TECLA DE ATALHO
Respostas: 1
Exibições: 2130

Re: TECLA DE ATALHO

Voce pode usa a propriedade accelerator. referenciando uma letra, por exemplo a letra z, quando seu formulário estiver aberto e apertando as teclas [ Alt+z ], o botão é acionado tomáticamente.

Imagem
por Basole
Qua Fev 28, 2018 12:25 am
Fórum: VBA Básico
Tópico: [RESOLVIDO]Pesquisa direto no listview
Respostas: 3
Exibições: 2757

Re: Pesquisa direto no listview

Veja se é isso que entendi o que você quer. Ajustei o ComboBox para 2 colunas e carreguei o nome e a data, lado-a-lado. https://s17.postimg.org/tkyz2w39b/combobox.jpg 'CONFIGURA O COMBOBOX With ComboBoxNomePesquisa .ColumnCount = 2 .ColumnWidths = "150 pt;65 pt" .ListWidth = 215 End With W...
por Basole
Qui Fev 08, 2018 9:23 am
Fórum: VBA Básico
Tópico: NAVEGAR E CADASTRAR INFORMAÇÕES EM GUIAS DO EXCEL PELO COMBOBOX
Respostas: 2
Exibições: 2352

Re: NAVEGAR E CADASTRAR INFORMAÇÕES EM GUIAS DO EXCEL PELO COMBOBOX

Segue um exemplo veja se consegue adaptar.
É com Listbox, para selecionar a aba, mas pode substituir por um combobox, com pequenas alterações no código.
por Basole
Qui Fev 01, 2018 9:10 pm
Fórum: Modelo de Aplicativo de Cadastro em VBA no Microsoft Excel
Tópico: APLICATIVO DE CADASTRO
Respostas: 5
Exibições: 5871

Re: APLICATIVO DE CADASTRO

Amigo, Aperte as teclas [ ALt+F11 ], e em Ferraemntas>Referencias> E procure por "Microsoft ActiveX Data Objects 2.XXX Library" e MARQUE.
Com isso pelo menos esse erro nao vai aparecer.
por Basole
Seg Jan 29, 2018 11:26 am
Fórum: VBA Básico
Tópico: Erro Listview VBA
Respostas: 2
Exibições: 2645

Re: Erro Listview VBA

Mes passado, formatei uma maquina e re-instalei o office, e alguns arquivos que continham userform, apresentaram este erro de falha catastrófica. Após algumas atualizações automáticas do windows ao office, este problema não apareceu mais. De qualquer forma, se puder, anexe o seu arquivo para que pos...
por Basole
Seg Jan 29, 2018 8:13 am
Fórum: Modelos Prontos
Tópico: Índice/Menu no TreeView
Respostas: 16
Exibições: 18057

Re: Índice/Menu no TreeView

Bom dia amigo,
Não, no ambiente 64 bits, não é possivel utilizar o treeview.
Abc.
por Basole
Sex Jan 26, 2018 8:18 am
Fórum: VBA Básico
Tópico: AJUSTE AUTOMÁTICO DE USERFORM A RESOLUÇÃO TELAS DESCONHECIDA
Respostas: 16
Exibições: 35023

Re: AJUSTE AUTOMÁTICO DE USERFORM A RESOLUÇÃO TELAS DESCONHECIDA

Sim, veja se é isso que precisa.
por Basole
Seg Jan 22, 2018 9:06 am
Fórum: VBA Básico
Tópico: Macro para ampliar imagem
Respostas: 1
Exibições: 2359

Re: Macro para ampliar imagem

Segue abaixo exemplo genérico, veja se consegue adaptar:

Insira esta macro em um modulo padrão e atribui a imagem a esta macro. Ao clicar na imagem, será ampliada e clicando novamente, volta ao normal.
por Basole
Sex Jan 19, 2018 8:05 pm
Fórum: VBA Básico
Tópico: ListBox com filtro interno
Respostas: 2
Exibições: 2483

Re: ListBox com filtro interno

Veja este exemplo: Altere os nomes dos objetos de acordo com a sua planilha. Dim rng As Range Dim Lr As Long Dim c As Range Dim i As Integer With ActiveSheet Lr = .Cells(Rows.Count, 1).End(xlUp).Row Set rng = .Range("A2:A" & Lr) With Me.ListBox1 .ColumnCount = 8 .ColumnWidths = "6...