Respuesta
en
Microsoft Excel
a
Ejecutar modulo al presionar el decimo digito en textbox
Después de esto If Txt_DTPicker1 = "" Or Not IsDate(Txt_DTPicker1) Or _ Len(Txt_DTPicker1) < 10 Or Len(Txt_DTPicker1) > 10 Then Exit Sub End If Pon las líneas: If len(Txt_DTPicker.value) = 10 then Call validar end if [sal u dos .
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Config Hoja de impresión excel vba
Prueba con esto: ActiveWindow.View = xlPageBreakPreview ActiveSheet.ResetAllPageBreaks ActiveSheet.VPageBreaks(1).DragOff Direction:=xlToRight, RegionIndex:=1 Pero también debe existir un corte de página vertical, si los datos caben en una hoja te va...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Abrir el formulario automático de excel a través de un objeto
En un módulo pon la siguientes macros: (Cambia Userform1 por el nombre de tu formulario de entradas, lo mismo para el de salidas) Sub Entradas() UserForm1.Show End Sub ' Sub Salidas() UserForm2.Show End SubSigue las Instrucciones para un botón y...
Respuesta
en
Visual Basic
y en 1 temas más
a
Macro buscar datos en un libro y ver si coinciden en otro
¿Cómo se llaman las hojas en cada libro? ¿O es la primera hoja de cada libro? ¿En cuál fila empiezan los datos del libro1?
Respuesta
en
Microsoft Excel
a
Como saber si fecha existe en columna
Prueba con lo siguiente: Private Sub txt_DTPicker1_Change() lbltotal = "" ListBox1.Clear Dim fec As Date If txt_DTPicker1 = "" Or Not IsDate(txt_DTPicker1) Or _ Len(txt_DTPicker1) < 10 Or Len(txt_DTPicker1) > 10 Then Exit Sub End If...
Respuesta
en
Microsoft Excel
a
Modificar esta macro de Excel para que solo seleccione A:H
Te anexo la macro actualizada. En la macro te puse unos comentarios para explicar lo que hace la línea. Los comentarios van precedidos por un apostrofe ' Sub copiar() 'Para ocultar los cambios en pantalla y la ejecución se más rápida...
Respuesta
en
Microsoft Excel
a
Como agrupar las filas de varias pestañas de Excel en una una pestaña y, si añado en las de origen, se copien automáticamente.
Revisa la siguiente respuesta, ahí explico cómo ejecutar la macro. Lo más práctico es que ejecutes la macro manualmente, ya que si se ejecuta la macro en automático cada que haces un cambio o agregas un registro en una hoja, tendrías que esperar un...
Respuesta
en
Microsoft Excel
a
Tengo 18 hojas de excel y quiero unirlas en una sola hoja, todas tienen las mismas columnas pero diferentes filas, cómo hago?
Te anexo una macro para unir las hojas en la hoja "Resumen". La macro supone que tus hojas tienen un encabezado en la fila 1, que tus datos empiezan en la fila 2 y que también empiezan en la columna "A". Cambia en estas líneas de la macro, por tus...
Respuesta
en
Microsoft Excel
y en 3 temas más
a
MACRO para insertar un número de filas que el usuario indique al final de una tabla EXCEL
Si la tabla fue creada con la opción Insertar/Tabla, entonces ejecuta la siguiente macro: Sub Macro1() 'Por Dante Amor num = InputBox("Cuantas filas desea insertar?", "INSERTAR FILAS EN TABLA") If num = "" Or Not IsNumeric(num) Then Exit Sub End If...
Respuesta
en
Microsoft Excel
a
Buscar factura desde un listado de facturas (excel)
Va la macro Sub Buscar_factura() ' Por Dante Amor ' Set h1 = Sheets("factura") Set h2 = Sheets("compras_listas") ' factura = h1.Range("K8").Value If factura = "" Then MsgBox "Falta el número de la factura" End If ' fila = 25...