Valeu Reinaldo, funcionou de buenas..

Ve se é isso... Sub incluir() Dim numeroDeLinhas As Integer Dim numeroDeColunas As Integer Dim linha As Integer Dim coluna As Integer Dim intervalo A...

Eu não entendi a sua dúvida, você quer contar o número de colunas e inserir linhas abaixo? para contar quantas coluna há na planilha, use: contagem ...

Eu não entendi a sua solicitação, você quer que a macro seja habilitada quando a aba CAPA for ativada? Se for isso, basta clicar no módulo com o nome...

mairon, não sei se isso atende a sua necessidade. Eu fiz o seguinte, coloquei o texto da tag em uma célula (A1 por exemplo), e nas duas células de ba...

Você pode facilmente resolver isso com um procv =se(É.NÃO.DISP(procv(B1;$A:$A;1;0));A1;procv(B1;$A:$A;1;0)) Depois só arrastar até o final da coluna

Olá NILPEOLI Eu consegui resolver esse problema sem usar macro. Eu fiz o seguinte: 1) na coluna CF, adicionei a seguinte fórmula: =AN2 + (lin()*0,0...

Ola vonzuben, eu não consigo upar o arquivo porque estou no trabalho e é bloqueado, eu acho que consegui, segue o código que usei... Sub InserirLinha...

Você pode fazer o seguinte.. Sheets(suaplaniha).Range(seuintervalo).Sort Key1:=Range(estado), Order:=xlAscending

Sub Limpar() Sheets("Plan1").Range("A1").Value = Sheets("Plan1").Range("A4").Value Sheets("Pl...

denilsonsl, qual erro o código está apresentando...? Tem uma planilha de exemplo? A minha sugestão é o seguinte: With Mensagem .to = &...

textbox1.Value=ActiveCell.Value

Simone, como o rapaz acima falou, deve ser algum loop infinito, ou alguma consulta no banco de dados que está muito lenta. Você pode por exemplo, se ...