To anyone that can help....

I have a couple named ranges to which I like to assign different values
consecutively in a vba sub command.

Defined Named Ranges:
Name Range
-------------- -------------
TestRange1 =TestWorksheet1!$C$5
TestRange2 =TestWorksheet1!$D$5

Basically, in the sub I am able to set the value of TestRange1 or TestRange2
but not both.

Private Sub someSub() 'Called from CommandButton1_click()
Worksheets("TestWorksheet1").Range("TestRange1").v alue = "TEST Range 1"
Worksheets("TestWorksheet1").Range("TestRange2").v alue = "TEST Range 2"
End Sub

If i comment out the first line, then the second is executed. I tried to
capture a possible error, but the doesn't seem to be one.

I even tried to set the value through different means:

Private Sub someSub() 'Called from CommandButton1_click()
ActiveWorkbook.Names.Item("TestRange1").RefersToRa nge.value = "TEST1"
ActiveWorkbook.Names.Item("TestRange2").RefersToRa nge.value = "TEST2"
End Sub


Does anyone know why I can't assigne more than one value at a time?

TIA,

Joe