☰

Como o Excel pode mover-se automaticamente para a célula destacada

tag-icon • tag-icon microsoft-excel worksheet-function charts
Como o Excel pode mover-se automaticamente para a célula destacada

Tenho brincado com o modelo de gráfico de Gantt e editado alguns conteúdos. Uma das desvantagens que notei é que quando altero a data na célula “E4”. A célula na seção esquerda será destacada, mas não movida automaticamente.

Quando eu mudar a data para 02/02/2017. A coluna de data será destacada, mas preciso rolar manualmente até essa data.

Pergunta: Existe alguma maneira do Excel mover automaticamente a planilha para a data selecionada?

Gráfico de Gantt

Responder1

Você pode usar um Worksheet_Change()evento para fazer isso. Noplanilhavocê deseja que isso seja executado, adicione este código. (Clique com o botão direito na guia da planilha e vá em "Exibir código"):

Private Sub Worksheet_Change(ByVal Target As Range)
Dim dateCell As Range

If Target.Address = "$E$4" Then
    Set dateCell = Range("A49:A50").Find(what:=Target.Value)
    If dateCell Is Nothing Then
        MsgBox ("Date not found")
    Else
        dateCell.Select
    End If
End If
End Sub

Observação: ajuste Set dateCell = Range([this range])para o intervalo de datas para o qual você deseja "pular" depois de inserir a data.

informação relacionada