Juan Carlos

Juan Carlos

 España @juancarlos49 desde - visto
Preguntar

Actividad pública reciente

Voto positivo a la respuesta

Comerciar un archivo excel evitando pirateo

respondió: Enviame un mail (mis correos aparecen en sitio que dejo al pie) y te lo explico con un libro de ejemplo.
Voto positivo a la respuesta

Macro para volver una hoja de Excel a PDF y luego enviar dicho PDF por correo electrónico.

respondió: Te anexo la macro documentada. Sub EnviarHojaEnPdf() 'Enviar una hoja en PDF por correo 'Por.Dante Amor Application.ScreenUpdating = False Application.DisplayAlerts = False ' 'Se estable cuál hoja se va a guardar en PDF Set h2 = Sheets("Hoja1") '...
Ha preguntado en el tema en

Macro para listar archivos de carpeta con fechas de creación y última modificación

A toda la comunidad Les traigo la siguiente duda que me tiene paralizado varios días y no logro solucionarla. Se trata de poner en una hoja excel, el listado de archivos de una carpeta que tengan por extensión *.xls y que añada también en las...
Sin respuestas
Ha valorado "Excelente" la respuesta

Acceder al libro excel mediante contraseña

respondió: Juan Carlos, con esta macro tienes tres intentos, si no se consigue, cierra el libro actual. Private Sub Workbook_Open() intentos = 1 Do While intentos < 4 clave1 = InputBox("Ingrese contraseña. Intento nº:" & intento) If clave1 <> "" Then Select...
Ha valorado "Excelente" la respuesta

Cómo combinar dos formatos de celda en una sola celda

respondió: El formato personalizado acepta 4 estilos, para positivos, para negativos, para el cero y para texto. Te dejo una imagen para que veas como deberías hacerlo en el formato personalizado
Ha empezado a seguir a
Ha empezado a seguir a
Ha valorado "Excelente" la respuesta

Cómo hacer que la Lista despegable quede sin celdas vacías

respondió: Juan Carlos, esta macro realiza ese proceso. Sub Copiar_Sin_Blancos() Range("K2:M300").Select Selection.SpecialCells(xlCellTypeConstants, 23).Select Selection. Copy Range("AA2"). PasteSpecial xlPasteValues Application.CutCopyMode = False...
Ha valorado "Excelente" la respuesta

Ejecutar varias macros según valor en un rango de celdas

respondió: No has especificado si quieres que se vuelvan a ejecutar todas las macros que tengan 1 en su casilla correspondiente o sólo se ejecuten cuando se pone un 1. Para que se ejecute cuando se cambia el valor de la celda correspondiente a 1, pon esto en el...
Ha valorado "Excelente" la respuesta

Bloquear atajos del teclado en libro excel

respondió: Pon la siguiente macro en los eventos de workbook, guarda el libro, cuando lo vuelvas a abrir la combinación Ctrl + AvPag y Ctrl + RePag, estarán "inactivas" Private Sub Workbook_Open() 'Por.Dante Amor Application.OnKey "^{PGUP}", ""...