Atividade
 
Notifications
Clear all
Osvaldomp
@osvaldomp
Prominent Member
Entrou: mar 26, 2012
Last seen: jan 9, 2025
Tópicos: 0 / Respostas: 864
Responder
Re: Ajuda com codigo

Considerei que todos os TextBoxes estão em um UserForm. Veja se o código abaixo ajuda. Se você não conseguir sugiro que você disponibilize uma amostra...

8 anos atrás
Responder
Re: ERRO 1004- C.ACTIVATE

Olá, Isidro. 1. Fica mantida a sugestão anterior de eliminar o comando 'c.Activate' no código do botão "Pesquisar". 2. Agora, no código d...

8 anos atrás
Responder
Re: Célula não reconhece como numero recebido do TextBox

Olá, Miguel. Experimente Range("D6") = TextBox1.Value ou Range("D6") = CDbl(TextBox1.Value)

8 anos atrás
Responder
Re: ERRO 1004- C.ACTIVATE

Olá, Isidro. Eu só verifiquei o problema com o c.Activate, que foi o título do seu post. Se há outros problemas eu sugiro que você seja específico p...

8 anos atrás
Responder
Re: ERRO 1004- C.ACTIVATE

... porém quando clico no botão pesquisar ele acusa erro na linha c.activate O erro ocorre porque não é possível ativar/selecionar um intervalo, que ...

8 anos atrás
Responder
Re: .find em células ocultas

O comando 'Find' não consegue encontrar um valor oculto pelo Auto Filtro, porém ele consegue encontrar um valor em coluna oculta, independente se a cé...

8 anos atrás
Responder
Re: Procura por período e contagem

substitua esta linha For Each c In Lançamentos.Range("A2:A" & Lançamentos.Cells(Rows.Count, 1).End(24)....

8 anos atrás
Responder
Re: Procura por período e contagem

Gostaria de uma ajuda para implementar contagem por data... Não considerei o Produto pois entendi erradamente que você queria somente o critério data...

8 anos atrás
Responder
Re: Procura por período e contagem

Experimente Function SomaPorPeríodo() Dim i As Date, f As Date, c As Range, v As Double Application.Volatile For Each c In Range("A2�...

8 anos atrás
Responder
Re: Ordenar valores de 6 digitos

Olá, Daniel. Veja se ajuda. O código abaixo colocará o resultado a partir de 'L1'. Sub AgrupaNúmeros() Dim n As Long, x As Long, LR As Long, c As L...

8 anos atrás
Responder
Re: Rodar uma das três macros ao modificar coluna

Aceita maiúsculas e minúsculas. Experimente: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count > 1 Then Exit Sub If Targe...

8 anos atrás
Responder
Re: MACRO DE ALTO FILTRO

Range("A3:H3").AutoFilter 1, "mar*"

8 anos atrás
Responder
Re: MACRO DE ALTO FILTRO

Experimente: Sub AutoFiltro() Range("A3:H3").AutoFilter 1, [A1] End Sub

8 anos atrás
Responder
Re: COPIAR E COLAR VALORES EM OUTRA PLANILHA

Olá, Jonas. Abaixo o código comentado. Cada comentário se refere à linha do código imediatamente acima dele. Sugestão - cole o código em um módulo, a ...

8 anos atrás
Responder
Re: Cortar parte de um texto

Apenas uma diferença, a atividade e o bairro se forem iguais devem ficar na mesma linha, independente se tem "MAT" ou "TARD"..... ...

8 anos atrás
Página 46 / 58