não consegui entender sera que poderia dar um exemplo como poderia usar no código abaixo: Sub Alterar_Status() If ActiveCell.Text = "" Then ...

range("a1").value = vba.cdate(TextBox1.text) Olá Fernando eu gostaria que a da ficasse desta forma na célula (30/07 - 14:44h), entendeu? na...

Estou ultilizando este código para copiar de uma planilha para outra, mas preciso sempre inserir acima da range("A2"), como posso fazer. ...

Código corrigido deu certo agora! Sub NaoTestado() Dim rRange1 As Range, rRange2 As Range, rRange3 As Range Dim lLoop As Long Set r...

Boa tarde!! Esse código deve ajudar, porém não foi testado!!! Sub NaoTestado() Dim rRange1 As Range, rRange2 As Range, rRange3 As Range Dim l...

Boa tarde!! Uma pergunta, na sua guia Clientes, os dados não repetem CODIGO T1-1 T1-3 T1-2 T2-1 T2-3 T2-4 T2-2 Então esse dados não serão delatados d...

Bom dia Alexandre! Estou enviando abrindo a Planilha você vai ver que existe 4 planilhas: Clientes, Pedidos, Filtro1, Filtro2. estou precisando de u...

Boa noite!! Aqui não é local para postagem de dúvidas!!! Mude a linha a baixo For Each x In Sheets("Sheet1").Range("A2:A10&q...