Dante Amor

Sincroniza tu correo google con tu teléfono Entra a whatsapp, selecciona el menú (los tres puntos) Selecciona Ajustes, Chats, Copia de seguridad, Guardar Revisa el siguiente vídeo para restaurar tu copia https://www.youtube.com/watch?v=c-LoN68O8lo...

Cuando inicia windows. Puedes crear un acceso directo a tu archivo de excel. Ese acceso directo lo copias y lo pegas en la carpeta Inicio. Para llegar a la carpeta de inicio, puedes seleccionar el botón de windows, Todos los programas, Busca la...

Te anexo un ejemplo de como pudieras tener tus datos. Para cada registro en tu hoja "tareas" se creará una tarea en outlook Los campos de estado y Prioridad, tienes que poner un número, para estado van desde el 0 hasta 4 y corresponden a los valores...

H o l a: Pon tus datos en una hoja empezando en la fila 2. En la columna B el correo destino En la columna C el asunto En la columna D el cuerpo del correo En la columna E el archivo con ruta y extensión, ejemplo: C:\trabajo\archivo.txt Cambia en la...

Te anexo la macro Private Sub UserForm_Activate() 'Por.Dante Amor Set h1 = Sheets("Enviar") Set h2 = Sheets("temp") h2.Cells.Clear ' Label3.Caption = "ENVIANDO CORREOS" ruta = h1.Range("A4") If ruta = "" Then MsgBox "Ingresa la carpeta": Exit Sub If...

Pon un par de macros para actualizarlas, te dejo los ejemplos para que hagas los cambios con otras macros.

Pon tu macro para enviar correos Y una imagen de cómo estarían tus datos

En una celda quieres poner la carpeta C:\pdf? ¿Y en otras celdas quieres poner los números de archivo a buscar? Supongamos que tienes tu hoja así: Entonces en la celda A2 pon el nombre de tu carpeta De las celdas B2 hacia abajo pon los números que...

Te anexo la macro actualizada Cambia "C:\trabajo\diario", por la ruta específica Private Sub CommandButton1_Click() 'ruta = ActiveWorkbook.Path ruta = "C:\trabajo\diario" arch = "VENTA DEL DIA " & Range("J4") ActiveSheet.Range("D1:Q50").Select...

Te anexo la macro, cambia "Hoja1" por el nombre de la hoja que quieras respaldar, cambia "Libro2" por el nombre del nuevo archivo Sub Respaldo_Hoja() ' ' Por.Dante Amor ' ' Application.ScreenUpdating = False Application.DisplayAlerts = False...