Atividade
 
Notifications
Clear all
Osvaldomp
@osvaldomp
Prominent Member
Entrou: mar 26, 2012
Last seen: ago 12, 2025
Tópicos: 0 / Respostas: 906
Responder
Re: Pegar maior valor de um intervalo

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count > 1 Then Exit Sub If Target.Address = "$H$4" Then [K...

9 anos atrás
Responder
Re: RETORNO DE INFORMAÇÕES DINAMICAS

Se entendi corretamente você quer que após inserir um registro na planilha "BASE" esse registro seja replicado em outra(s) planilha(s) de ac...

9 anos atrás
Responder
Re: Tela Excel Piscando

Não deu certo. Não deu certo o que? O que exatamente você fez? O exemplo que coloquei foi para demonstrar que é possível efetuar alterações em uma p...

9 anos atrás
Responder
Re: Tela Excel Piscando

Experimente Sub MinhaMacroV2() With Sheets("Plan1") .Range("A1").Value = "jacaré" .Range("B2&...

9 anos atrás
Responder
Re: Classificação automatica e lançamento de alteração

O que eu precisaria na verdade e que se tivesse qualquer qualquer alteração nas colunas "A:I" ele me atualizasse a data e hora nas colunas &...

9 anos atrás
Responder
Re: Pegar maior valor de um intervalo

Experimente: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count > 1 Then Exit Sub If Target.Address = "$I$3"...

9 anos atrás
Responder
Re: Confirmar impressao

xxxxxxxxAxxxxxxxxxxxxxxxxxxxB 1xxxxxJoséxxxxxxxxxxxxxxxxxx1 2xxxxxMariaxxxxxxxxxxxxxxxxx3 3xxxxxUóchitoxxxxxxxxxxxxxxx2 4xxxxxWanderkleyssonxxxxxxx2 5...

9 anos atrás
Responder
Re: Confirmar impressao

Meu problema é que a cada nome o usuário é perguntado se deseja imprimir. Talvez eu esteja reinventando a roda, mas não queria escrever duas rotinas ...

9 anos atrás
Responder
Re: Confirmar impressao

Marcelo, veja se ajuda. Sub imprimir() Dim a As Long For a = 1 To 200 If a Mod 50 = 0 Then If MsgBox("Deseja Imprimir o documento"...

9 anos atrás
Responder
Re: Transposição/copia de Dados para outra coluna

Experimente Sub OrganizaDados() Dim N As Long, k As Long, c As Long, x As Long, m As Long, LR As Long For N = 2 To Cells(Rows.Count, 2)....

9 anos atrás
Responder
Re: OCULTAR LINHAS A PARTIR DE CRITERIOS

Preciso de um codigo, que a partir do momento que clicar em uma checkbox, oculte as linhas que tenham datas que não seja a do dia de hoje por exemplo....

9 anos atrás
Responder
Re: Inserir Linhas

Lógico que o código que eu coloquei faz isso, pode até olhar Lógico que NÃO FAZ. Mas se você imagina que faz, então deixa pra lá! Seu código está dan...

10 anos atrás
Responder
Re: Inserir Linhas

Seu código não está dando certo, pois quando excluo linhas, tipo 3 e 4 ele faz isso 1,2,5,6 Amigo, esse assunto de excluir linhas e refazer a sequênc...

10 anos atrás
Responder
Re: Inserir Linhas

Seu código não está dando certo, pois quando excluo linhas, tipo 3 e 4 ele faz isso 1,2,5,6 Não enetendi

10 anos atrás
Responder
Re: Inserir Linhas

Só faltou copiar as bordas vertical da A1:E1 que não inseriu Acrescente a segunda linha abaixo. ... ... Cells(UltL + ...

10 anos atrás
Página 60 / 61