Duvida rotina de repetição

Question

Pessoal, boa tarde!

Preciso de uma rotina que complemente a coluna E, com os dados da coluna G, quando a coluna E estiver vazia (conforme imagem).

Alguém pode me ajudar com esta rotina?

Answer 1

Sub teste()

    Dim i As Long
    
    For i = 1 To ThisWorkbook.Sheets("Planilha1").UsedRange.Rows.Count
        
        If ThisWorkbook.Sheets("Planilha1").Cells(i, 5).Value = "" Then
            
            ThisWorkbook.Sheets("Planilha1").Cells(i, 5).Value = ThisWorkbook.Sheets("Planilha1").Cells(i, 7).Value
            
        End If
        
    Next i
    
    
End Sub

---

Anderson Diniz

Answer 2

Favor marcar como respondido.

---

Anderson Diniz

Answer 3

Muito obrigado!