Joaom Manuel

Pregunta para Dante. Hola Dante, recibe mis saludos En un libro del cual me haz ayudado bastante, está este código que es BASTANTE LENTO y mientras más líneas con datos tenga la hoja, más lento es. Además de eso, busca por cualquier parte Y PUNTO de...

Sub contador() For x = 0 To frmProd.lista.ListCount - 1 If frmProd.lista.List(x, 0) <> "" Then m = m + 1 End If Next frmProd.txtExistencia.Value = m End Sub La tengo en Modulo. Quiero asignarla por via Call contador a 2 formularios mas del mismo...

Me surge un error el cual especifico en el titulo Esto sucede cuando inicio el form en la hoja inicial donde tengo todos botones para iniciar los forms, Desde la hoja inicial, abro el form, selecciono de un Combo la hoja a la cual voy a...

Del form frmProd insertar producto en la hoja seleccionada en un ComboBox y al seleccionar la hoja, llenar el ListBox con los datos de dicha hoja Te envíe correo James Bond

Hola James Bond Sobre lo que hiciste de pasar a buscar por línea 2 Solo responde y califico

Crear hoja con nombre interno y externo Nombre externo (de la pestaña) Casa Sheets.Add.Name = "Casa" o Worksheets.Add.Name = "Casa" ¿Y nombre interno? La línea que incluya nombre interno y eterno, los dos En el explorador de proyectos se ve así...

James bond Seguro recuerdas esta Private Sub cmbBusque_Click() fecha_inicial = Format(DTPicker1, "mm/dd/yyyy") fecha_final = Format(DTPicker2, "mm/dd/yyyy") Set hf = Worksheets("Filtro"): hf.UsedRange.Clear If OptionButton1 = True Then COLUMNA =...

La macro es larga y por eso no deja subir la pregunta. Espero alguna respuesta para enviar la 2ª parte Private Sub CommandButton1_Click() 'Por.Dante Amor 'Act. Adriel 'Filtrar por fecha Dim u As Double, i As Double Dim h1 As Object, h2 As Object, h3,...

Esta macro Private Sub cmbBusque_Click() 'Por.Dante Amor 'Filtrar por fecha Dim U As Double, i As Double Dim h1 As Object, h2 As Object ' Application.ScreenUpdating = False Application.DisplayAlerts = False Set h1 = Sheets("Productos") Set h2 =...

Nuevamente por acá. Después del gran trabajo (ayuda) que prestaste, ve4ngo con algo mucho más sencillo (para ti) Quiero bloquear el nombre EXTERNO de hojas. Se que el nombre interno no cambia, seguirá siendo Hoja1, 2, 3, etc o el que le des en las...