Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) ActiveCell.Offset(0, 1).Select End Sub

Sub excluir() Dim linha As Long Dim coluna As Long inicio: For linha = 2 To Planilha1.UsedRange.Rows.Count For coluna = 1 To 5 ...

Consegui fazer com caixas de texto. Creio que o efeito é o mesmo que tu desejas. https://drive.google.com/file/d/1NV9aX5dtDkcVP9pmf07c...

Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Value = "" Then Dim Cancel As Boolean Dim Linha As Strin...

Sub Limpar6() application.screenupdating= false Range("K4,K5,K6,K7,K8,K9,K10,K11,K12,K13,K15,K17,K18,I27:I30").ClearContents ...

While sheets("NomeDaSuaPlanilha").Range("A" & linha).Value <> "" And achou = False Substitua NomeD...

Sub conciliar() On Error Resume Next Dim ul As Long 'inicio: ul = Planilha1.Range("A" & Rows.Count).End(xlUp).R...

Tente substituir Entire.Row Por EntireRow

Cinco dicas que foram muito úteis para mim: 1) Quando não sei fazer algo no VBA, vou ao menu EXIBIÇÃO >> MACROS >> GRAVAR MACRO Faço o qu...

Cinco dicas que foram muito úteis para mim: 1) Quando não sei fazer algo no VBA, vou ao menu EXIBIÇÃO >> MACROS >> GRAVAR MACRO Faço o qu...

https://www.youtube.com/results?search_query=vba+filtro

Vejo esse problema de uma forma bem ingênua: Na célula G1 colocar a fórmula: =C1

Quando não sei fazer algo no VBA, vou ao menu EXIBIÇÃO >> MACROS >> GRAVAR MACRO Faço o que eu quero aí volto ao menu EXIBIÇÃO >> MA...

Cinco dicas que foram muito úteis para mim: 1) Quando não sei fazer algo no VBA, vou ao menu EXIBIÇÃO >> MACROS >> GRAVAR MACRO Faço o qu...

https://www.youtube.com/results?search_query=vba+excluir+linha+em+branco