VBA Help with Subroutines and Functions

661
0
01-09-2013 05:53 AM
MichelleCouden1
Occasional Contributor III
I have a command button going to open an mxd when said name is selected. My error is that my sub and function are not defined. Please lead me in the right direction for defining these. My code is below :

Private Sub cmdMap_Click()

'Declare Variables

Dim cboDistrict As String
Dim pcmdMap As IcmdMap
    Call frmMapSetUp

If cboDistrict = "Abilene" Then IcmdMap.OpenDocument ("K:\TASS\4_MAPPING_DATA_SUPPORT\Traffic_Mapping\District_Maps\2012\Abilene\Abilene_Base_Map.mxd")
Elif
End If

End Sub
0 Kudos
0 Replies