ATENÇÃO NOVOS USUÁRIOS

Se registrou recentemente? Seu cadastro será avaliado e mendiante aprovação, a conta será ativada e você poderá usufruir do fórum. O tempo de avaliação gira em torno de 24 a 48 horas.

Esqueceu sua senha?

Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Pesquisa resultou em 9 ocorrências

por andril
Qui Jan 09, 2020 2:07 am
Fórum: VBA Básico
Tópico: Unir funções Worksheet_Change
Respostas: 2
Exibições: 595

Re: Unir funções Worksheet_Change

Gênio.

Funciona perfeitamente.

Muito obrigado amigo!!!
por andril
Qua Jan 08, 2020 3:23 am
Fórum: VBA Básico
Tópico: Unir funções Worksheet_Change
Respostas: 2
Exibições: 595

Unir funções Worksheet_Change

Bom dia rapazes. Precisava de uma ajuda realmente para um caso em particular, tenho duas funções Worksheet_Change, uma para forçar o formato de data, e outra para forçar as letras em maiúsculas, pesquisando, consegui encontrar uma solução para o mesmo problema, mas como são fórmulas diferentes, não ...
por andril
Ter Jan 07, 2020 2:54 am
Fórum: VBA Básico
Tópico: Forçar formato data DD/MM/AAAA VBA
Respostas: 4
Exibições: 844

Re: Forçar formato data DD/MM/AAAA VBA

Consegui! Segue fórmula, só colocar no conteúdo VBA da planilha e escolher o range que no meu caso é apenas a célula C5: Private Sub Worksheet_Change(ByVal Target As Excel.Range) Dim DateStr As String On Error GoTo EndMacro If Intersect(Target, Range("C5")) Is Nothing Then Exit Sub If Target.Cells.C...
por andril
Ter Jan 07, 2020 2:52 am
Fórum: VBA Básico
Tópico: Converter formato de data
Respostas: 5
Exibições: 1275

Re: Converter formato de data

Ops, respondi no tópico errado, rsrs.
por andril
Ter Jan 07, 2020 2:40 am
Fórum: VBA Básico
Tópico: Converter formato de data
Respostas: 5
Exibições: 1275

Re: Converter formato de data

Consegui! Segue fórmula, só colocar no conteúdo VBA da planilha e escolher o range que no meu caso é apenas a célula C5: Private Sub Worksheet_Change(ByVal Target As Excel.Range) Dim DateStr As String On Error GoTo EndMacro If Intersect(Target, Range("C5")) Is Nothing Then Exit Sub If Target.Cells.C...
por andril
Seg Jan 06, 2020 11:59 pm
Fórum: VBA Básico
Tópico: Forçar formato data DD/MM/AAAA VBA
Respostas: 4
Exibições: 844

Re: Forçar formato data DD/MM/AAAA VBA

Opa. Obrigado amigo.

Acompanhei os vídeos e tentei formatar usando a função CDate, mas ainda não consegui acertar :S
por andril
Sex Jan 03, 2020 4:43 am
Fórum: VBA Básico
Tópico: Forçar formato data DD/MM/AAAA VBA
Respostas: 4
Exibições: 844

Forçar formato data DD/MM/AAAA VBA

Bom dia rapazes. Tenho uma planilha em que insiro datas aleatórias e outros dados para depois imprimir. O que eu precisava é que, quando digitasse na célula por exemplo "03012020" ele transformasse em "03/01/2020". Já tentei de tudo e nada. Se deixo a célula formatada para tipo DATA, se eu insiro es...
por andril
Seg Dez 30, 2019 6:25 am
Fórum: VBA Básico
Tópico: Imprimir página se encontra palavra específica
Respostas: 1
Exibições: 442

Re: Imprimir página se encontra palavra específica

Opa!!! Consegui fazer, usei o código abaixo no meio do outro acima: With ThisWorkbook .Activate With .Worksheets("LISTAGEM") 'Ativa a planilha onde é feita a busca; .Activate LR3 = .Cells(.Rows.Count, 4).End(xlUp).Row 'Faz a busca na coluna D; For i3 = 8 To LR3 'Começando a partir da linha 8, já que...
por andril
Sáb Dez 28, 2019 2:57 pm
Fórum: VBA Básico
Tópico: Imprimir página se encontra palavra específica
Respostas: 1
Exibições: 442

Imprimir página se encontra palavra específica

Boa tarde rapazes! Sou novo por aqui, mas já consulto os posts há bastante tempo pra personalizar minhas planilhas. Tenho uma macro grande que gera um conjunto de páginas impressas, e dentro desse código eu precisava adicionar uma função, que, caso no range D8:D263 da planilha LISTAGEM, estiver escr...