Choosing a field depending on the date 1

[etcski]

I am trying to choose a particular field depending on the date. I have
JAN_field1
FEB_field2
MAR_field3....etc.

In a report I am trying to reference today's date to automatically choose the correct field in the months_tbl to perform an autosum.

So if today's date is 14 FEB, The autosum will pick the FEB_field2 field from the months_tbl and SUM.
Thanks,
Ski

 

[PaulBricker]

I haven't tried it but this might work.

Dim myName as string
myName = Format(Date(),"mmm&quot
DoCmd.GoToControl Like *myName*"


Paul

 

[PaulBricker]

I tried it and it didn't work. This did in the AfterUpdate event for a textbox.

Dim myVal As String
myVal = Format(Date, "mmm&quot
Dim ctl As Control
For Each ctl In Me.Controls
If Left(ctl.Name, 3) = myVal Then
DoCmd.GoToControl ctl.Name
End If
Next

Paul