This is probably a super lame question, but I have no idea how to access the form object of a form that I have created in my VBA project.

Using the Microsoft Visual Basic editor I added a form called "ChartGenerator". I outfitted it with buttons and drop downs; all of which I renamed so that within the form code I could access the choosen values.

My problem comes when I try to Load the form within my code.
I swore all I needed to do was:

Load ChartGenerator
ChartGenerator.Show

But I am getting a debugging error on the Load... any ideas why? I assume just trying to load an unidentified variable like ChartGenerator is the problem, but I dont know how to do this. I looked on MSDN online and came up with ziltch. I think I have to Open it before I load it, but I still am missing a step.
----------------------------------------------------------------
Here is the code to get attempt to Load the Form:
Sub GenerateUserCreatedChart()
Load ChartGenerator
ChartGenerator.Show
End Sub
----------------------------------------------------------------
Here is the code within the From itself:

Private Sub UserForm_Activate()

End Sub

Private Sub CreateChart_Click()
' Send out selections and close
Dim arrayPosition As Integer
Dim chartTitle As String
Dim fieldOne As String
Dim fieldTwo As String
Dim fieldThree As String
Dim fieldFour As String
Dim fieldFive As String
Dim userArray(10) As pivotType

arrayPosition = 0

Do While (arrayPosition <= 10)
userArray(arrayPosition).entryOne.name = getFieldOne
userArray(arrayPosition).entryTwo.name = getFieldTwo
userArray(arrayPosition).entryThree.name = getFieldThree
userArray(arrayPosition).entryFour.name = getFieldFour
userArray(arrayPosition).entryFive.name = getFieldFive
userArray(arrayPosition).isEmpty = True
arrayPosition = arrayPosition + 1
Loop

Module1.CreateChartAndTable userArray, getChartTitle, getWhetherToSumFieldTwo
Unload ChartGenerator


End Sub

Sub Fill_ListBoxes()

Dim columnLetter As Integer
Dim rangeInt As Integer
rangeInt = 8 ' start location
Dim stringTest As String
rangeLettersArray = Array("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z", "AA", "AB", "AC", "AD", "AE", "AF", "AG")
columnLetter = 0

Do While Not isEmpty(Worksheets("Sheet5").Range(rangeLettersArray(columnLetter) & "7"))

' Always test for nulls
If (rangeLettersArray(columnLetter) = "G" Or rangeLettersArray(columnLetter) = "H" Or _
rangeLettersArray(columnLetter) = "I" Or rangeLettersArray(columnLetter) = "J") Then ' numeric
NumericList.AddItem Worksheets("Sheet5").Range(rangeLettersArray(columnLetter) & "7").value
Else
InfoBox1.AddItem Worksheets("Sheet5").Range(rangeLettersArray(columnLetter) & "7").value
InfoBox2.AddItem Worksheets("Sheet5").Range(rangeLettersArray(columnLetter) & "7").value
InfoBox3.AddItem Worksheets("Sheet5").Range(rangeLettersArray(columnLetter) & "7").value
InfoBox4.AddItem Worksheets("Sheet5").Range(rangeLettersArray(columnLetter) & "7").value
End If
' If Not IsNull(rst!UomID) Then cbo.ItemData(cbo.NewIndex) = rst!UomID

columnLetter = columnLetter + 1
Loop
InfoBox1.AddItem "dateTime"
InfoBox2.AddItem "dateTime"
InfoBox3.AddItem "dateTime"
InfoBox4.AddItem "dateTime"

End Sub

Private Sub UserForm_Initialize()
Fill_ListBoxes
End Sub

Function getFieldOne() As String
getFieldOne = NumericList.value
End Function
Function getFieldTwo() As String
getFieldTwo = InfoBox1.value
End Function
Function getFieldThree() As String
getFieldThree = InfoBox2.value
End Function
Function getFieldFour() As String
getFieldFour = InfoBox3.value
End Function
Function getFieldFive() As String
getFieldFive = InfoBox4.value
End Function
Function getChartTitle() As String
getChartTitle = ChartNameTextBox.value
End Function
Function getWhetherToSumFieldTwo() As Boolean
getWhetherToSumFieldTwo = SumFieldTwoCheckBox.value
End Function
----------------------------------------------------------------

Thanx in advance,
cLocKwOrk