Looping through months VBA code

Hello,

I am new here (and also for coding), please excuse me if i am not following the pattern.

Issue: i am trying to write a code which fills the 'textbox' by picking data from worksheet(ex - Function - January, Function - February,..) and cell address constant through sheets (Q12)

however, below thing isnt working and the user form doesnt show anything.

Private Sub monthlist_Change()

Dim myarray As Variant
Dim x As Long

myarray = Array(January, February, March, April, May, June, July, August, September, October, November, December)

For x = LBound(myarray) To UBound(myarray) Step 1


If Me.monthlist.Text = "x" Then Me.sdmteamcount.Value = Worksheets("Functions - &x").Range("q12").Value

Next x
End Sub

Your help is greatly appreciated.

Hi Harin,

Welcome to the Forum!

The month names need to be strings:

myarray = Array("January"," February", etc

BTW - Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE] [/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

There is also an issue with your worksheet syntax. It should be

Worksheets("Functions - " & myarray(x)).

Check this:

"Functions -"

your original post suggests there is a space after the dash, which would be:

"Functions - "

it is an important difference