1 - Guia DESENVOLVEDOR > Inserir > Botão (Controle de formulário) 2 - Clique em qualquer lugar da planilha para que ele apareça, surgirá uma tel...

Será que é isso que queria? Sub sem_retorno() Application.ScreenUpdating = False On Error Resume Next Dim nome As String Dim result As Integer no...

Sub AdicionaLinhaDuploClique() Application.ScreenUpdating = False Dim qtd As Integer qtd = Application.InputBox("Quantas linhas abaixo?...

anexe as duas planilhas que você quer que interajam e identifique pra mim que dados quer importar e em qual lugar da outra planilha devem ser inserido...

Segue a resolução: att,

A função procv dessa maneira acredito não ser possível mas para separar dos dados faça o seguinte: 1 - Selecione toda a coluna "Produto" e...

Aline bom dia, faça a seguinte alteração: 1- Vá até seu arquivo "Solicitação de Compra.xlsm" 2- Recorte a sub IR_Tabela_1() de "Esta Pa...

O problema está aqui: Private Sub UserForm_Initialize() '- ok Call AtivarBotoesMinMax(Me) ok Sheets("Relatorio Cavaletes").Select <<...

Talvez você pudesse considerar puxar esses dados por VBA ao invés de conexão de dados. Se precisar de ajuda, estamos aí...

Vlw man, ficou interessante isso. Pode me vir a calhar...

(Estou considerando que a linha 4 contém seu cabeçalho) se for o caso tente Isso: Sub last6() ActiveSheet.Range("B4").Select Do ...