Pesquisa resultou em 1643 ocorrências

Voltar à pesquisa avançada

Re: Fechar uma planilha com nome variável.

por alexandrevba ¦ 28 Fev 2018 às 11:33 ¦ Fórum: Macros e VBA ¦ Tópico: Fechar uma planilha com nome variável. ¦ Respostas: 4 ¦ Exibições: 105

Bom dia!!

Você leu minha postagem anterior? :?

Pois foi isso que eu sugerir...

Att

Re: Código para conexão com arquivos  [resolvido]

por alexandrevba ¦ 28 Fev 2018 às 11:03 ¦ Fórum: Macros e VBA ¦ Tópico: Código para conexão com arquivos ¦ Respostas: 5 ¦ Exibições: 112

Bom dia!! Considerando possibilidades, é possível criar uma conexão com/via (dados externos e outros arquivos xl*). Você pode via VBA, PowerTable, ODBC e ConxDadosExternos ou até acessar outro tipo de banco como sqlight, postgre etc. A proposito se é que eu entendi... você já tentou usar conexão com...

Re: Fechar uma planilha com nome variável.

por alexandrevba ¦ 28 Fev 2018 às 10:52 ¦ Fórum: Macros e VBA ¦ Tópico: Fechar uma planilha com nome variável. ¦ Respostas: 4 ¦ Exibições: 105

Bom dia!!

Código: Selecionar todos'Windows("240218 ESTOQUE COMPLETO.TXT").Activate

Você está tentando ativar um arquivo xls* baseado em uma variável?
Código: Selecionar todosNomeDaVariavel.Activate


Att

Re: Trabalhando com dois arquivos (pastas) diferentes  [resolvido]

por alexandrevba ¦ 27 Fev 2018 às 16:38 ¦ Fórum: Macros e VBA ¦ Tópico: Trabalhando com dois arquivos (pastas) diferentes ¦ Respostas: 5 ¦ Exibições: 148

Boa tarde!! Use nossa base de dados, pois há respostar similar a sua dúvida! Sub AleVBA_6344() 'Este arquivo deve ficar fora do diretório \TESTE\ Application.ScreenUpdating = False Dim wkbDest As Workbook Dim wkbSource As Workbook Set wkbDest = ThisWorkbook Dim lr As Long lr = Range("A1")....

Re: POPUP Automático

por alexandrevba ¦ 22 Fev 2018 às 16:03 ¦ Fórum: Macros e VBA ¦ Tópico: POPUP Automático ¦ Respostas: 1 ¦ Exibições: 57

Boa tarde!!

Teste o arquivo
Fonte:http://www.ozgrid.com/Excel/run-macro-on-time.htm

Att

Re: Botão Gravar Macro desabilitado  [resolvido]

por alexandrevba ¦ 22 Fev 2018 às 09:50 ¦ Fórum: Macros e VBA ¦ Tópico: Botão Gravar Macro desabilitado ¦ Respostas: 3 ¦ Exibições: 97

Bom dia!!

Leia:
https://answers.microsoft.com/pt-br/off ... _other/botão-de-macro-desativado/22f4c268-abf9-4584-84e3-217351e09d9f
https://social.technet.microsoft.com/Fo ... m=officept

Att

Re: Partilhar livro Excel

por alexandrevba ¦ 20 Fev 2018 às 19:06 ¦ Fórum: Macros e VBA ¦ Tópico: Partilhar livro Excel ¦ Respostas: 2 ¦ Exibições: 86

Boa tarde!!

Eu sugiro usar a pesquisa do fórum!!

Temos algo já explicado e feito que tem semelhança com sua dúvida.

Há opções com os suplementos (power table etc)

Att

Re: Copiar Tabelas no Chrome com Selenium

por alexandrevba ¦ 15 Fev 2018 às 09:56 ¦ Fórum: Macros e VBA ¦ Tópico: Copiar Tabelas no Chrome com Selenium ¦ Respostas: 2 ¦ Exibições: 78

Bom dia!! Uma possível solução seria... Private driver As WebDriver Sub AleVBA_6277() Dim tb1 As WebElement Dim tb2 As WebElement Dim times As Range Dim pontos As Range Set driver = New ChromeDriver 'Acessa o site driver.Get "https://globoesporte.globo.com/futebol/brasileirao-serie-a/" Set...

Re: Ajuda com Macro em Formulario de Cadastro  [resolvido]

por alexandrevba ¦ 07 Fev 2018 às 15:22 ¦ Fórum: Macros e VBA ¦ Tópico: Ajuda com Macro em Formulario de Cadastro ¦ Respostas: 1 ¦ Exibições: 91

Boa tarde!!

Segue em anexo.


Att

Bom dia!!

Se você verificou meu post anterior, eu disse favor adaptar!!

Preencha suas guias com dados, pois o código verifica o total de linhas de cada um das guias que precisa ser copiadas. Eu volto a dizer, favor adaptar!!!!!!!!!

Att

Re: Como extrair linhas completas de um "array" ?

por alexandrevba ¦ 01 Fev 2018 às 12:48 ¦ Fórum: Fórmulas e Funções ¦ Tópico: Como extrair linhas completas de um "array" ? ¦ Respostas: 3 ¦ Exibições: 132

Bom dia!!

Veja.

Att

Re: Consulta de datas em várias colunas macro ou vba

por alexandrevba ¦ 30 Jan 2018 às 11:51 ¦ Fórum: Macros e VBA ¦ Tópico: DESAFIO !!! Consulta de datas em várias colunas macro ou vba ¦ Respostas: 3 ¦ Exibições: 142

Bom dia!! Segue um esboço para teste! Agora é só implementar conforme sua necessidade. Public Sub AleVBA_6187() 'https://gurudoexcel.com/forum/viewtopic.php?f=12&t=6187 'Copia baseado em data de várias guias para uma guia resumo Dim Ws As Worksheet, LR1 As Long, LR2 As Long Dim lr As Long Dim dD...

Re: Duvida Envio de e-mail  [resolvido]

por alexandrevba ¦ 29 Jan 2018 às 09:40 ¦ Fórum: Macros e VBA ¦ Tópico: Duvida Envio de e-mail ¦ Respostas: 4 ¦ Exibições: 116

Bom dia!! 'Para mais veja.. 'https://www.thespreadsheetguru.com/blog/vba-guide-sending-excel-attachments-through-outlook 'https://www.rondebruin.nl/win/s1/outlook/mail.htm Sub ENVIAR() Dim OutApp As Object Dim OutMail As Object Set OutApp = CreateObject("Outlook.Application") Set OutMail =...

Boa tarde!! Talvez algo como a propriedade EnableCancelKey , deve te ajudar! Private Sub test() 'https://msdn.microsoft.com/en-us/library/aa214566(office.11).aspx On Error GoTo handleCancel Application.EnableCancelKey = xlErrorHandler MsgBox "This may take a long time: press ESC to cancel"...

Re: Código de verificação de validade e criação de pasta  [resolvido]

por alexandrevba ¦ 26 Jan 2018 às 14:01 ¦ Fórum: Macros e VBA ¦ Tópico: Código de verificação de validade e criação de pasta ¦ Respostas: 5 ¦ Exibições: 169

Boa tarde! Segue... Sub teste_guru() Dim lr As Long Dim sNomeAbreviado As String Dim wb As Workbook lr = Cells(Rows.Count, "A").End(xlUp).Row With Worksheets("ES0659") .Range("AD:AD").Delete [AD3].Value = "InsForm" .AutoFilterMode = False .Range("AD4"...

Bom dia!! Caso você deseja digitar o nome do arquivo em uma InputBox, siga a ideia que eu utilizei no código para filtrar ( sNomeAbreviado = InputBox("Selecione o Nome Abreviado") ) Sub AleVBA_6158() 'https://gurudoexcel.com/forum/viewtopic.php?f=12&t=6158 Dim lr As Long Dim sNomeAbrev...

Re: Alguém poderia me ajudar ? Macro de pesquisa  [resolvido]

por alexandrevba ¦ 26 Jan 2018 às 10:50 ¦ Fórum: Macros e VBA ¦ Tópico: Alguém poderia me ajudar ? Macro de pesquisa ¦ Respostas: 4 ¦ Exibições: 182

Bom dia!!

Eu não sei se consegui entender, mas olhe o anexo e tente adaptar!

Att

Bom dia!! Talvez isso ajude a ter uma ideia... Sub AleVBA_6158() Dim lr As Long Dim sNomeAbreviado As String lr = Cells(Rows.Count, "A").End(xlUp).Row With Worksheets("Planilha1") [K1].Value = "InsForm" .AutoFilterMode = False .Range("K2").Formula = "=INT...

Re: Erro com ListRows.Add  [resolvido]

por alexandrevba ¦ 22 Jan 2018 às 09:04 ¦ Fórum: Macros e VBA ¦ Tópico: Erro com ListRows.Add ¦ Respostas: 4 ¦ Exibições: 139

Bom dia!!

Eu não tive o erro!
Procurei com o nome exato, parcial, incorreto, case-sensitive e não case-sensitive...

Att