I got it with a gambiarra, by putting the variable only as Dia = CStr(Month(Now)) & "/" & CStr(Year(Now)) excel places the date with cell formatting and assigned the correct value…
I made a code to return a string from the first day of the month acts: Dia = "1/" & CStr(Month(Now)) & "/" & CStr(Year(Now)) then I glue it to a cell Cells(rowx,colx).value = Dia the…