Davi,
Veja se o modelo (bem simplificado) te auxilia á entender como funciona (apenas uma das diversas maneiras existentes) este processo.
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Pesquisa resultou em 805 ocorrências
- Ter Mar 17, 2020 6:16 pm
- Fórum: VBA Básico
- Tópico: Informações Selecionadas do Combobox para listbox
- Respostas: 1
- Exibições: 3083
- Ter Mar 17, 2020 4:50 pm
- Fórum: VBA Básico
- Tópico: Carregar dados em formulário [RESOLVIDO]
- Respostas: 3
- Exibições: 4169
Re: Carregar dados em formulário
july_onda,
Veja se as alterações feitas no seu modelo, atendem sua necessidade.
Estude as rotinas existentes nos módulos e adapte-as conforme sua necessidade.
Veja se as alterações feitas no seu modelo, atendem sua necessidade.
Estude as rotinas existentes nos módulos e adapte-as conforme sua necessidade.
- Sáb Mar 14, 2020 3:00 am
- Fórum: VBA Básico
- Tópico: pesquisar,copiar e colar partes de texto com vba
- Respostas: 5
- Exibições: 6776
Re: pesquisar,copiar e colar partes de texto com vba
zen, Experimentou usar a função Split? Veja abaixo, se a rotina atende sua necessidade. Sub extrairPedido() Dim planDados As Worksheet Set planDados = ThisWorkbook.Sheets(1) Dim linhaAtual As Long, linhaFinal As Long With planDados linhaAtual = 1 linhaFinal = .Cells(Rows.Count, 1).End(xlUp).Row Whil...
- Sex Fev 28, 2020 4:56 pm
- Fórum: VBA Básico
- Tópico: Impedir dados duplicados com critério
- Respostas: 4
- Exibições: 3458
Re: Impedir dados duplicados com critério
Delzor, Analisando seu modelo, acredito que a informação vital para que a validação dos dados funcione a contento, é o local da obra. Experimente esta informação em ambas Functions que validam os dados, exemplo : A function que valida a PEP : Private Function VerificarPEP(nomePEP As String, localOBR...
- Qui Fev 27, 2020 4:37 pm
- Fórum: VBA Básico
- Tópico: Impedir dados duplicados com critério
- Respostas: 4
- Exibições: 3458
Re: Impedir dados duplicados com critério
Delzor,
Ao redigir uma mensagem / tópico, abaixo do campo de texto, existe a opção Anexos, ao lado de Opções.
Basta adicionar o arquivo compactado (zipado).
Ao redigir uma mensagem / tópico, abaixo do campo de texto, existe a opção Anexos, ao lado de Opções.
Basta adicionar o arquivo compactado (zipado).
- Qui Fev 27, 2020 3:18 pm
- Fórum: VBA Básico
- Tópico: Impedir dados duplicados com critério
- Respostas: 4
- Exibições: 3458
Re: Impedir dados duplicados com critério
Delzor,
Tentei baixar o arquivo do link, porém o mesmo apresenta problemas.
Se possível, suba novamente o arquivo ok?
Tentei baixar o arquivo do link, porém o mesmo apresenta problemas.
Se possível, suba novamente o arquivo ok?
- Qui Fev 27, 2020 2:49 pm
- Fórum: VBA Básico
- Tópico: Abrir planilhas em um diretorio
- Respostas: 3
- Exibições: 3037
Re: Abrir planilhas em um diretorio
Douglas, Os arquivos que deseja abrir sempre estarão localizados no mesmo local? Caso positivo, altere esta linha da rotina : .InitialFileName = ThisWorkbook.Path Para : .InitialFileName = caminhoAbsoluto Onde caminhoAbsoluto será o caminho completo de onde os arquivos estão, exemplo "S:\TI\9-G...
- Qua Fev 26, 2020 7:41 pm
- Fórum: VBA Básico
- Tópico: Login com acesso restrito a planilhas por usuario
- Respostas: 1
- Exibições: 2136
Re: Login com acesso restrito a planilhas por usuario
Alan,
Veja se o novo modelo atende sua necessidade.
Usuário : admin
Senha : admin
Senha padrão para novos usuários : Mudar123
Veja se o novo modelo atende sua necessidade.
Usuário : admin
Senha : admin
Senha padrão para novos usuários : Mudar123
- Qua Fev 26, 2020 7:38 pm
- Fórum: VBA Básico
- Tópico: Abrir planilhas em um diretorio
- Respostas: 3
- Exibições: 3037
Re: Abrir planilhas em um diretorio
Douglas, Experimente o que se segue abaixo. Adicione um novo módulo á pasta de trabalho, copie e cole a rotina : Public pastasSelecionadas() As String Sub selecionarArquivos() Dim caixaArquivo As Office.FileDialog Erase pastasSelecionadas Set caixaArquivo = Application.FileDialog(msoFileDialogFilePi...
- Seg Jan 20, 2020 3:43 pm
- Fórum: VBA Básico
- Tópico: importar arquivo de imagens e listar na planilha (Resolvido)
- Respostas: 2
- Exibições: 1968
Re: importar arquivo de imagens e listar na planilha
valzito, Veja se a rotina abaixo atende sua necessidade. Sub retornarArquivos() Dim novaLinha As Long Dim caixaArquivos As Office.FileDialog Set caixaArquivos = Application.FileDialog(msoFileDialogFilePicker) With caixaArquivos .AllowMultiSelect = True .Filters.Clear .Filters.Add "Arquivos de i...