edwinhenao

Podrías configurar el ajuste de áreas de impresión, en la ficha Diseño de página, grupo Ajustar área de impresión, en ancho y alto. También puedes implementar en el código algo como: ... With ActiveSheet.PageSetup .FitToPagesWide = 1 .FitToPagesTall...

Con Application. Caller obtienes el nombre del objeto que llamó la macro. No olvides calificar y cerrar la pregunta...

Dos preguntas... Donde está guardado el consecutivo. Y cuando dices que pueda guardar unicamente la hoja 2, que quieres decir. ¿Qué tome la hoja 2 y la guarde como un libro diferente?

Podrías copiar el código y el error exacto... es bastante extraño lo que comentas...

Puedes usar las herramientas de Excel y ahorrarte un poco de código... por ejemplo el quitar duplicados de Excel 2007... Si armas la lista de capitales, y en rangos aledaños las listas de pueblos puedes cargar los ComboBox con RowSource y Select...

si utilizas Paste:=xlPasteFormats pegara los altos de fila. Suponiendo que el Libro1 tiene los altos de fila deseados y los quieres llevar al Libro2, la macro adjunta hace el trabajo. Éxitos y no olvides calificar y cerrar la pregunta. ... Sub...

Debes hacer modificaciones para incluir las demás columnas a colorear, también hay que preguntar por el color para que la celda que ya está coloreada no sea agregada. Por otro lado hay que realizar un control de errores para controlar el ListBox y...

Lo que quieres hacer lo puedes hacer con filtro Avanzado, activando la opción Copiar a otro lugar. Puedes llamar el filtro (Datos>Avanzadas) desde otra hoja y en ella puedes tener como rango de criterios el titulo tal y como está en la base de datos...

Claro que si, en el libro crea una macro que se llame auto_open() y allí se pone la hoja y la celda que que se desea sleccionar al abrir el libro... No olvides calificar y cerrar la pregunta... Éxitos. ... Algo así: Sub auto_open()...

Sería una macro de copiar y pegar datos. Suponiendo que la hoja donde actualizas los datos se la Hoja1, está macro hace el trabajo. No olvides calificar y cerrar la pregunta. Éxitos... ... Sub IngresaDatos() Sheets("Hoja1").Select Range("A2").Select...