none
LIMPIAR el combo box en blanco Al Dar click a un boton en un formulario En Excel VBA RRS feed

  • Pregunta

  • buen dia

    cuando ejecuto un formulario creado en VBA de Excel los comboboxes se visualizan en blanco, ya indique 

    combobox.clear y reasigne valore --> sale errores

    combobox.selText="Seleccionar" --> cada vez agrega seleccionar

    combobox.ListIndex (0) --> saca error

    el codigo que limpia mis controles, en esencia son comboboxes y textboxes

    Private Sub LimpiarControles()
    Dim z As Control
        For Each z In Frame1.Controls
            If TypeName(z) = "TextBox" Then
                z.Value = ""
            End If
            If TypeName(z) = "ComboBox" Then
    '            z.ListIndex (0)
    '            z.SelText = "Seleccionar"
            End If
                  
        Next z
        txtTipoDcto = "TRA"
        
        Dim strDate
        strDate = Now
        txtFechaDto.Text = Format(strDate, "yyyymmdd")
    
    End Sub


    • Editado greg_dorian jueves, 14 de julio de 2016 20:00
    jueves, 14 de julio de 2016 17:20