Bom dia Stanley Leia a minha mensagem anterior. []s Patropi - Moderador

Bom dia, Segue minha sugestão: Sub OcultarLinhas() For i = 1 To [B1].CurrentRegion.Rows.Count If InStr(1, Cells...

Bom dia, Já tentou como o nome da forma em inglês? Sheets(ultimaPlanilha - 1).Shapes("Rectangle 1").Delete Abraço

Boa noite!! Sub NaoTestado() Dim Str As String Dim c As Range Dim SrchRng As Range Str = InputBox("Digite o texto a procur...

Boa noite!! Veja se é isso... Att

Boa noite!! Eu preciso entender, oque você pretende fazer. Há como montar de uma forma manual, como deveria ficar os dados em seu arquivo? Ou seja ...

Boa noite!! Eu não entendi o que você quer. mas os próximos registros vão sempre para linha debaixo. ActiveCell.Offset(1, 0).Select Então p...

Boa noite!! Veja se ajuda. Att

Boa noite!! Eu não vejo a lógica de porque o código vai mostrar essa data 23/03/2015, há algum critério para isso, no seu exemplo eu não vejo essa da...

Boa tarde Cesar Baixe a planilha e veja se é isto que desejas, se não for dê mais detalhes. 08_02_15_Filtrar só os REPETIDOS-Patropi.zip Se a res...

Boa tarde!! Sinceramente eu não entendi. Att

Boa tarde!! Você pode usar uma coluna auxiliar com formula, de qualquer forma, qual é o critério para tal? Explique melhor. Att

Bom dia!! Como Anexar Aquivos Compactados viewtopic.php?f=7&t=3841 Att

Bom dia!!! Sinceramente, seu post não condiz com seu arquivo modelo, explique melhor o que pretende! Att

Bom dia lazzar Seja bem-vindo ao fórum! Experimente acrescentar este código, no final da macro, antes do End Sub: Range("A1").Select Se ...