Preguntas esperando respuesta
Actividad pública reciente
Ha preguntado en el tema en
Microsoft Excel
Textbox sin dato genera error en Listbox
Tengo la siguiente rutina: Public Sub AgregarItems() If frm_Dos.ComboBox3.Text = "" Then MsgBox ("Elija un código de producto"): Exit Sub If Trim(frm_Dos.txt_Cantidad.Text) = "" Then MsgBox ("Debe ingresar la cantidad"): Exit Sub With frm_Uno...
Ha valorado "Excelente" la respuesta
ComboBox dependientes que carguen TextBox
Te anexo el código Dim h1, h2, h3, h4 ' Private Sub ComboBox1_Change() 'Act.Por.Dante Amor 'carga el combo2 (subcategoría) ComboBox2.Clear ComboBox3.Clear Call Limpiar_Textbox If ComboBox1 = "" Or ComboBox1.ListIndex = -1 Then Exit Sub End If ' col =...
Ha valorado "Buena" la respuesta
Datos en Combobox llamando final de fila
H o l a te paso 2 opciones Dim rango, celda As Range u = Range("A" & Rows.Count).End(xlUp).Row Set rango = Worksheets("Proveedores").Range("A2:A" & u) ' For Each celda In rango ComboBox1.AddItem celda.Value Next celdaSet h1 = Sheets("Proveedores") '...
Ha preguntado en el tema en
Microsoft Excel
Formulario que pueda captar datos para 3 formularios
Tengo tres formularios diferentes que requieren de algunos datos en comun, estos datos los ingreso mediante otro formulario, solo he podido hacer que ingrese los datos en el Userform1, el código que utilizo es el siguiente: Private Sub...
Sin respuestas
Ha preguntado en el tema en
Microsoft Excel
Varias facturas abiertas y disponibles para más datos
Hace más de un año me ayudaste con este inconveniente para mi proyecto de grado pero esa vez lo hicismos dentro de hojas de excel, en este momento la consulta es para realizar la misma operación con formularios. Se trata de una factura o recibo que...
Ha valorado "Buena" la respuesta
Por que no funciona formato moneda en todos los textbox desde initialize
H o l a: Cambia tu código por lo siguiente: Private Sub txt_Efectivo_Change() txt_Cambio = Format(txt_Efectivo - txt_APagar, "$ #,##0.00") End Sub ' Private Sub UserForm_Initialize() txt_Descuento.Value = Format(Sheets("Caja").Range("F26"), "$...
Ha valorado "Buena" la respuesta
Botón da valor a un celda Excel
En cada uno de los botones pon Userform1.Textbox1= 1 Userform1.Textbox1=2 Userform1.Textbox1=3 Mira un ejemplo integral con textbox, te puede ayudar y dar ideas https://youtu.be/gqZzSfikEYY...
Ha valorado "Excelente" la respuesta
Cambiar valor de checkbox de "Verdadero" a "X"
Si tienes algo como esto para pasar los datos a la hoja: Cells(i, "D") = CheckBox1 Cambia a esto: Cells(i, "D") = IIf(CheckBox1, "X", "")
Ha preguntado en el tema en
Microsoft Excel
Habilitar pestañas de Multipage con un formulario diferente
Tengo otro inconveniente, he probado varias rutinas y no ha sido posible. Tengo un formulario que tiene un multipage con cinco pages. Deseo deshabilitarlos, que únicamente al abrir el formulario se vea la página 1. Y ya que tengo tantos objetos desde...
Ha valorado "Excelente" la respuesta
Error definido por la aplicación o por el objeto?
Después de esta línea: ComboBox2. Clear Agrega esta línea If ComboBox1.ListIndex = -1 Then Exit Sub Es para verificar si elegiste un dato del combo, si escribiste un texto, pero no corresponde a ninguno de los datos del combo, entonces listindex =...