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