Como localizar um valor e selecione essa celula do Microsoft Excel?

Eu tenho uma planilha que é um calendário de dias em que eu trabalho e cada semana é uma linha. Eu tenho usado Auto_Open macros antes de então eu estou olhando para adicionar código para essa macro para que quando eu abrir a planilha do excel 'achados' hoje data e seleciona a célula. Eu estive olhando em PROCV mas não tenho certeza de que ele pode executar o que estou procurando. Alguma dica ou direção seria muito apreciada. Obrigado antecipadamente.

Resposta

Você não indica se a data atual é uma coluna de valores de data ou pode ser em qualquer lugar na planilha.

Em qualquer caso, você terá que criar um loop para verificar cada célula no intervalo a avaliar (coluna ou planilha).

Assumindo que as datas estão na coluna A, essa macro será suficiente. Ele irá localizar a primeira instância da data atual e definir a célula como a célula ativa, assumindo que há uma ocorrência da data atual na coluna.

Altere a letra de nome e coluna de folha para suas necessidades específicas.

Sub SetActiveCellColumn()

Dim I, LastRow

LastRow = Application.Cells. SpecialCells(xlCellTypeLastCell).Linha

Sheets("Sheet1").Ativar

Para i = 1 para LastRow

Se células (i, "A").Valor = data Then

Células (i, "A").Selecione

Exit Sub

End If

Próximo

EndSub

Você pode chamar essa macro de sua macro Auto_Open ou integrar o código esta macro em-lo. Você também pode usar o manipulador de eventos de nível de pasta de trabalho WorkBook_Open para fazer a mesma coisa.

Se sua data pode ser em qualquer lugar na planilha, esta macro irá trabalhar:

Sub SetActiveCellSheet()

Para cada c em ActiveSheet.UsedRange

Se c.Value = data Then

c.Select

Exit Sub

End If

C próxima

EndSub