Joaom Manuel

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...

Hacia Dante Amor, el cual saludo desde Venezuela. Este libro ya es de tu conocimiento pleno, pero le faltaba esto que lo estoy haciendo manualmente La macro para Validar Entrada o Salida seria Si txtEntrada contiene valor numérico, (o OptionButton1...

Hice esta minúscula macro If Sheets("Entra").Select Then frmEntraSale.Caption = "Entradas" Label3.Caption = "Entradas" Else Sheets("Sale").Select frmEntraSale.Caption = "Salidas" Label3.Caption = "Salidas" End If La idea es que si estoy en la hoja2,...