A função VBA Day retorna um número inteiro correspondente ao dia da data especificada.
Dia(data)
Usando a função Day para obter as informações relevantes de uma data:
Sub DayExample1() myDate = #10/30/2020# MsgBox Day(myDate) 'Retorna: 30 End Sub
Esta função também aceita datas em formato de texto:
Sub DayExample2() myDate = "30/10/2020" MsgBox Day(myDate) 'Retorna: 30 End Sub