La función VBA Day devuelve un número entero correspondiente al día de la fecha especificada.
Day(fecha)
Usando la función Day para obtener la información relevante de una fecha:
Sub DayExample1()
myDate = #10/30/2020#
MsgBox Day(myDate) 'Devoluciones: 30
End Sub
Esta función también acepta fechas en formato de texto:
Sub DayExample2()
myDate = "30/10/2020"
MsgBox Day(myDate) 'Devoluciones: 30
End Sub