form principal - Excel con VBA

Private Sub btnGo_Click()
    Worksheets(Me.ComboBox1.Text).Range(Me.txtCell.Text).Value = Me.txtText.Text
    'La línea anterior se utiliza para seleccionar una celda en particular,
    'donde no necesariamente la hoja respectiva está activa, de ahí la necesidad
    'de utilizar el método Worksheets pasándole como argumento el texto actual
    'del ComboBox1.
    'A Range le paso como argumento la celda (que se ingresa en el textbox txtCell)
    Worksheets(Me.ComboBox1.Text).Activate
    'Se activa la hoja
    Worksheets(Me.ComboBox1.Text).Range(Me.txtCell.Text).Columns.AutoFit
    'Redimensiono la columna donde acabo de escribir, si es necesario
    Worksheets(Me.ComboBox1.Text).Range(Me.txtCell.Text).Select
    'Y selecciono la celda ingresada
End Sub

Private Sub ComboBox1_Change()
    MsgBox "You have selected: " + Me.ComboBox1.Text, vbOKOnly, "This is a message:"
    'Muestro un MessageBox indicando cuál es la hoja que se acaba de seleccionar. El primer argumento
    'que le paso es el texto que quiero que muestre, el segundo el tipo de botón que quiero que tenga
    'y finalmente el título del mismo. Los argumentos se separan con comas.
End Sub

Private Sub UserForm_Initialize()
    MsgBox "The form " + Me.Name + " has been initialized!", vbOKOnly, "Message"
    'Accedo al nombre del formulario mediante la propiedad Name del control actual
    '(al cual, a su vez, hago referencia mediante la palabra reservada Me.

    '############## Este loop me sirvió para probar en el proceso de carga de ítems al combobox
    'Dim i As Integer
    'Dim myArray As Variant
    'myArray = Array("John Doe", "Mengano", "Suntano")
    'For i = LBound(myArray) To UBound(myArray)
        'Me.ComboBox1.AddItem myArray(i)
    'Next
    '##############

    Dim sheet As Worksheet 'Hay que declarar a sheet como variable del tipo Worksheet
    For Each sheet In Sheets
        Me.ComboBox1.AddItem sheet.Name 'Agrego los nombres de las hojas al Combobox
                                        'mediante un bucle For Each (en vez de hardcodearlo)
                                        'por si el usuario final llega a cambiarlos.
    Next
End Sub