Luis_P

Posiciónate sobre la celda y presiona F2 allí veras todo el contenido Lo que pides no es posible, a menos que estes trabajando con un formulario

Si la idea es tener una macro disponible para cualquier libro, te sugiero utilizar los complementos de excel, debes crear un nuevo libro, en el grabas todas las macros y funciones que desees, luego este libro lo grabas como complemento es decir con...

Lo mas fácil sería que realices una conexión a la base, mediante el asistente de conexiones en la pestaña datos..., es muy sencillo seguir el wizard... Lo otro, seria trabajar la conexión directamente vía programación a través de los objetos...

se puede, pero queda algo feo... Desde el editor de vb abres la hoja que deseas proteger y pegas esto, y ya esta '4c7569735f50 Option Explicit Dim anterior As Variant Dim i As Byte Private Sub Worksheet_Change(ByVal Target As Range) i = (i + 1) If i...

Prueba con esto selection.end(xltoright).select ' te lleva a la ultima celda con datos desde la fila seleccionada Selection.offset(0,1).select ' te lleva una celda a la derecha desde la ultima con datos

Ok. ¿Pero cómo deseas ingresar los rangos a imprimir? ¿Mediante una consulta en pantalla? ¿Mediante valores anidados en alguna celda como texto? Ahora si el área de impresión siempre sera la misma, basta con que utilices el grabador de macros

Debes partir primero por normalizar la data, es decir si tienes datos no coincidentes en nada dificilmente puedes comparar. Te sugiero que codifiques los articulos atendiendo a su funcionalidad, asi si 3 proveedores diferentes te envian los datos de...

Prueba ahora Sub resumen() '4c7569735f50 Application.ScreenUpdating = False Worksheets("CtasxPagar").Range("A:D").Clear Worksheets("CtasxPagar2").Select Range("B8").Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy...

Bueno la funcion contara() cuenta el numero de celdas no vacias... considerando esto utiliza esta forma: '4c7569735f50 =indirecto((direccion(contara(d:d);4)))+100

evalua los controles mediante el uso de la sentecia if then else '4c7569735f50 ejemplo: if len(trim(textbox1))=0 or len(trim(combobox1))=0 or len(trim(combobox3))=0 then msgbox "Faltan Datos" exit sub ' sale de la sub rutina antes de guardar end if...