Select the sheet tab which you want to work with. Right click the sheet tab
and click on 'View Code'. This will launch VBE. Paste the below code to the
right blank portion. Get back to to workbook and try out.


Private Sub Worksheet_Activate()
If Day(Date) = 1 Then Cells(1, Month(Date)) = 100
End Sub

--
Jacob


"terilad" wrote:

Hi,

I am looking for a formula or code to fill in a range of cells with a figure
on the 1st of every month, so when 1st March arrives I need cell C1 to enter
£100 and when 1st April arrives I need cell D2 to £100 and so on for 12
months.

Can anyone help me with this query.

Many thanks


Mark