Compile Error: Expected Function or Variable

[Sharid]

I have moved some code into a Module called "Location" and I am trying to Run it from there when needed.

The Code is Run by using the following code

Private Sub LocationTabStrip_Change()
'On Tab Change Call This Module
Application.Run "Location.LocationTabStrip"
End Sub

This code has been moved to a Module CALLED "Location"

Private Sub LocationTabStrip()
'###  CHANGE FRAME CAPTIONS WHEN TAB IS SELECTED -
Select Case LocationTabStrip.Value
    Case Is = 0
       LocationFrame.Caption = "London"
    Case Is = 1
        LocationFrame.Caption = "Birmingham"
    Case Is = 2
         LocationFrame.Caption = "Nottingham"
    Case Is = 3
         LocationFrame.Caption = "Derby"
    Case Is = 4
         LocationFrame.Caption = "Manchester"
End Select
End Sub

I keep getting and error message here as soon as I change a Tab on this line of code below and I can't work it out.

Select Case LocationTabStrip.Value

 

[Sharid]

I was able to sort this problem out by changing the name of the code, this error happens when a Sub is called the same as variable
From

Private Sub LocationTabStrip()
'###  CHANGE FRAME CAPTIONS WHEN TAB IS SELECTED -
Select Case LocationTabStrip.Value

To

Private Sub LocationTab()
'###  CHANGE FRAME CAPTIONS WHEN TAB IS SELECTED -
Select Case LocationTabStrip.Value

And to run the code

Private Sub LocationTabStrip_Change()
'On Tab Change Call This Module
Application.Run "Location.LocationTab" 'changed this, removed the word TabStrip
End Sub

This has got rid of the first error message however I now get the following error message on the same line of code

Select Case LocationTabStrip.Value

PS, All the code was working fine when it was part of the tabstrip and in the userform, I removed it to make it run from a Module as it would load the userform faster and tidy up all the code in the form. However it now throws up problems

 

[jasonb75]

Not something that I'm entirely familiar with, but I expect that you need to refer to the parent name as well. For example if LocationTabStrip is an object on a userform then you need to use the form name as well, something like Userform1.LocationTabStrip.Value

More likely you will need to declare the value and caption as public variables or procedure variables for them to be passed back and forth.

Better advice would be to move the code back to the original module, having it elsewhere is going to create more problems than you think it might solve.

 

[Sharid]

Jasonb75

Thanks your answer was super, I had to reference the userform as well.