Este fórum está sendo desativado

[Noggy]

Tenho uma planilha onde, da celula A1 até à celula A366, constam os dias seguidos do ano e quero que, ao abrir a planilha a celula ativa seja a do dia de hoje, mas na coluna B, como faço?
Obrigado

[mucascosta]

Sugestão:
Em um modulo:
Function DtVba()
Dim P As String, i As Integer
P = Planilha1.Cells(Rows.Count, "A").End(xlUp).Row
For i = 3 To P
If Planilha1.Cells(i, 1) = Date Then
Planilha1.Cells(i, 2).Select
Exit Function
End If
Next
Range("B" & i).Select
End Function

No editor VBA
No menu da esquerda procure por EstaPasta_de_trabalho e selecione dando dois cliques. Na janela à direita digite o código abaixo:
Private Sub Workbook_Open()
ActiveWorkbook.Sheets("Planilha1").Activate
DtVba
End Sub

[andriessen]

Melhor que a minha . kkkkk Parabens

As datas estão na coluna A e a data de hoje em A2
Sub Procura()
Dim x As String
Dim Found As Boolean

Planilha1.Range("A1").Activate
x = Range("b1")
Found = False
Do Until IsEmpty(ActiveCell)
If ActiveCell.Value = x Then
Found = True
Exit Do
End If
ActiveCell.Offset(1, 0).Select
Loop
If Found = True Then
ActiveCell.Activate
'MsgBox "Encontrei" & ActiveCell.Address
Else
MsgBox "Não Encontrado"
End If

'Encontrei e adaptei em "ww.docs.microsoft.com/pt-br/office"

End Sub