Agendas / Directorios
Aportes relacionados con agendas, diarios, calendarios, dietarios y gestión del tiempo.
6 files
-
Agenda Calendario Lunar 2025
Por pegones1
🎄 Comienza el nuevo año 2025 descargando la mejor agenda y calendario lunar que he diseñado en Excel: Agenda Calendario Lunar 2025 | #ExcelPedroWave
🧮 Como está hecha solo con fórmulas, y no contiene macros VBA, se puede abrir en cualquier versión de Excel de escritorio, en Excel para la Web y en las aplicaciones de Excel para Android y de Excel para Mac.
🕑 En la agenda se pueden planificar tareas para cualquiera de las 24 horas de los 365 días del año.
🗓️ Feliz comienzo de Año Nuevo 2️⃣0️⃣2️⃣5️⃣
Salu2,
Pedro Wave
2 downloads
0 comentarios
Enviado
-
Agenda Calendario Lunar 2024
Por pegones1
Para comenzar bien el año comparto con todo el mundo la mejor:
🗒️ Agenda de 366 días y 24 horas al día.
📅 Calendario del año bisiesto 2024.
🌛 Lunar con las 4 fases de la Luna.
🏎️ hecha con fórmulas de Excel.
Que además es:
🕝 un Diario de 24 horas.
🔍 un Buscador de cualquier texto de la agenda.
🏖️ un aviso de Festivos.
☀️ un recordatorio de Aniversarios.
⛅ un Calendario que funciona en la nube OneDrive.
Más datos aquí: https://pedrowave.blogspot.com/2024/01/agenda-calendario-lunar-2024.html
¡¡¡ Feliz Año Nuevo 2024 !!! 🥂🍾
Salu2,
Pedro Wave
8 downloads
0 comentarios
Enviado
-
Agenda Calendario Lunar 2023
Por pegones1
Como felicitación de Año Nuevo adjunto una Agenda Calendario Lunar 2023.
Las explicaciones en mi blog:
https://pedrowave.blogspot.com/2023/01/agenda-calendario-lunar-2023.html
Salu2,
Pedro Wave
3 downloads
0 comentarios
Enviado
-
Calendario Laboral Dinámico
Por pegones1
Nuevo calendario laboral con la plantilla descargable y explicaciones en texto y en vídeo de cómo lo he hecho. Espero que te guste y me lo digas...
¡Ya puedes pedir las vacaciones del 2021!
Edita la tabla de la hoja de Eventos para poner los días festivos de tu localidad.
El calendario se puede imprimir.
Está basado en un calendario hecho con una tabla dinámica.
Puedes leer más sobre este calendario en este enlace:
https://pedrowave.blogspot.com/2020/12/calendario-laboral-dinamico-en-excel.html
41 downloads
0 comentarios
Enviado
-
Mis álbumes de fotos
Por Antoni
Hola a todos:
Os dejo un formulario para crear y visualizar álbumes de fotografías.
Cada álbum va en una hoja.
Puede haber cualquier número de álbumes.
Cada álbum puede contener cualquier número de imágenes.
En el formulario:
Se pueden añadir múltiples imágenes a la vez. Al pulsar sobre la miniatura cambia la resolución de la imagen. El resto os lo dejo para que lo descubrais vosotros.
Paz y amor.
78 downloads
0 comentarios
Enviado
-
Agenda
Por EMIRO ERAZO
Mi Agenda se concentra en Buscar: Técnicos, Choferes y Coteros.
Cambien los nombres de acuerdo a lo que ustedes Buscan con frecuencia
Los datos se agregan en Hoja Registro, y se visualizan en Hoja Buscador
Para colocar Imagen a la Carpeta: Clic con botón derecho a la Carpeta/ Propiedades/Personalizar/Cambiar Icono/Escoger la Imagen: Icono e la Carpeta 8es e extensión “ico”)
Código UserForm1
Private Sub Label1_Click()
End Sub
Private Sub ComboBox1_Change()
End Sub
Private Sub CommandButton1_Click()
Valor = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, Sheets("Registro").Range("A:C"), 3, 0)
Me.Label1.Caption = Valor
End Sub
Private Sub Label2_Click()
End Sub
Private Sub Label4_Click()
End Sub
Private Sub CommandButton2_Click()
Valor = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, Sheets("Registro").Range("A:C"), 2, 0)
Me.Label4.Caption = Valor
End Sub
Private Sub CommandButton3_Click()
Unload Me
End Sub
Private Sub UserForm_Initialize()
Me.ComboBox1.List = Sheets("Registro").Range("A2:A300").Value
End Sub
Código UserForm2
Private Sub Label6_Click()
End Sub
Private Sub ComboBox2_Change()
End Sub
Private Sub CommandButton3_Click()
Valor = Application.WorksheetFunction.VLookup(Me.ComboBox2.Value, Sheets("Registro").Range("D:E"), 2, 0)
Me.Label6.Caption = Valor
End Sub
Private Sub Label7_Click()
End Sub
Private Sub CommandButton4_Click()
Unload Me
End Sub
Private Sub UserForm_Initialize()
Me.ComboBox2.List = Sheets("Registro").Range("D2:D300").Value
End Sub
Código UserForm3
Private Sub Label7_Click()
End Sub
Private Sub ComboBox3_Change()
End Sub
Private Sub CommandButton6_Click()
Valor = Application.WorksheetFunction.VLookup(Me.ComboBox3.Value, Sheets("Registro").Range("F:H"), 3, 0)
Me.Label8.Caption = Valor
End Sub
Private Sub Label10_Click()
End Sub
Private Sub Label8_Click()
End Sub
Private Sub Label9_Click()
End Sub
Private Sub CommandButton7_Click()
Valor = Application.WorksheetFunction.VLookup(Me.ComboBox3.Value, Sheets("Registro").Range("F:H"), 2, 0)
Me.Label9.Caption = Valor
End Sub
Private Sub CommandButton8_Click()
Unload Me
End Sub
Private Sub UserForm_Initialize()
Me.ComboBox3.List = Sheets("Registro").Range("F2:F300").Value
End Sub
Código Hoja 1 (Registro)
Private Sub CommandButton2_Click()
UserForm1.Show
End Sub
Private Sub CommandButton3_Click()
UserForm2.Show
End Sub
Private Sub CommandButton4_Click()
UserForm3.Show
End Sub
79 downloads
0 comentarios
Actualizado