Registrate ahora en Selosdije!    Login
Ingreso
Nombre:

Contraseña:

Recordar contraseña?
Anonimo

¿Perdió su Contraseña?

Regístrese Ahora!
Menú
¿En línea?
4 usuario(s) en línea
(3 usuario(s) navegando Foros)

Anonimo: 0
Miembros: 0
Invitados: 4

más ....
Tiendas
Paypal
PCDomino
Directorio Web
Web Site Monitoring
asociaciones-y-clubs


aya | skins
SemiSwirl v2 | aya


  Reply to this topicStart new topicStart Poll

> Generador de Calendario en Excel, Generador de Calendario en Excel
garzo
Posted: Sep 2 2008, 01:01 AM
Quote Post


Soldado
*

Group: Members
Posts: 18
Member No.: 1761
Joined: 22-June 07



Les quiero compartir este archivo que hice con una macro en Visual Basic, creo que a algunos les podrá servir.

Por requerimientos de mi trabajo tuve la necesidad de crear este generador de calendarios en Excel para poder ver todo el año en una sola hoja. Ahora cada inicio de año simplemente lo ejecuto, lo imprimo y lo pego en la pared aquí en mi escritorio y la verdad me es muy útil.

Lo hice en el formato que tienen los Planeadores Vision ya que así es muy facil y rápido buscar alguna fecha.

Todo se calcula al ejecutar la macro, incorporé asuetos de ley, Semana Santa, Día del Padre, día de cambio de presidente (cada 6 años), 24 y 31 de Diciembre medio día. Incluí texto en los asuetos para saber que se festeja ese día ya que nunca me acuerdo cual es el día de la Revolución o de la Independencia y ahora ya no le fallo.

Para el cálculo de Semana Santa use el algoritmo (Butcher, 1876) el cual sólo es válido para fechas entre 1700 y 2300, lo cual no creo que sea un problema. (si lo heredan por favor comenten esto a sus bisnietos smil3dbd4daabd491.gif )

Para usarlo, cuando abran el archivo habiliten las macros y para generar el calendario solamente modifiquen el año en la celda A1 y opriman Generar, ya luego lo pueden imprimir y listo.

Aqui les dejo una imagen:

user posted image

Liga de la foto

Y aqui va la liga del archivo.

Si alguien lo puede subir a RapidShare o algún otro sitio hágalo por favor ya que esos sitios los tengo bloqueados aqui en la oficina y donde puse el archivo solamente estará disponible 30 días.

Espero les sea de utilidad.

Tengo algunas otras macros que he hecho para hacerme la vida mas facil y rápida (ej. para convertir numeros a letras para facturas o pólizas de cheques), si a alguien lo puedo ayudar con esto de VB o tiene alguna duda o comentario avíseme y con todo gusto (no se mucho pero me defiendo).

Saludos.

This post has been edited by garzo on Sep 2 2008, 01:05 AM
PM
Top
JaPo
Posted: Sep 2 2008, 04:20 PM
Quote Post


Comandante
*

Group: Moderador
Posts: 965
Member No.: 23
Joined: 14-June 03



muy bueno y muy util tambien!!!

muchisimas gracias Garzo :D

Saludos!!!
PMICQ
Top
Duke
Posted: Sep 2 2008, 07:50 PM
Quote Post


DAK Field Marshal
*

Group: Admin
Posts: 1969
Member No.: 1
Joined: 5-June 03



excelente

ya esta en la seccion de descargas de selosdije

http://www.selosdije.com/modules/mydownloa...ewcat.php?cid=2

gracias por compartir smil412d0d8a81667.gif smiles-dr-evil.jpg smiles-woohoo.gif
PMUsers Website
Top
kuroko_vfx
Posted: Sep 2 2008, 11:34 PM
Quote Post


Sargento
*

Group: Usuarios
Posts: 379
Member No.: 1152
Joined: 20-October 04



el de convertir de letras a numeros o viceversa seria muy bien recibido
PMUsers Website
Top
garzo
Posted: Sep 3 2008, 04:05 PM
Quote Post


Soldado
*

Group: Members
Posts: 18
Member No.: 1761
Joined: 22-June 07



Gracias Duke por subirlo a la sección de descargas.

Kuroko, aqui va el de los Numeros a Texto, incluí las instrucciones dentro del mismo archivo.

Ejemplo: 1,893.78 -> (Un mil ochocientos noventa y tres pesos 78/100 M.N.)

Aqui la Liga

Cualquier duda, a sus ordenes.

Duke, ojalá tambien puedas poner este en la sección de descargas.

Saludos.
PM
Top
Duke
Posted: Sep 3 2008, 05:08 PM
Quote Post


DAK Field Marshal
*

Group: Admin
Posts: 1969
Member No.: 1
Joined: 5-June 03



listo
PMUsers Website
Top
kuroko_vfx
Posted: Sep 3 2008, 06:27 PM
Quote Post


Sargento
*

Group: Usuarios
Posts: 379
Member No.: 1152
Joined: 20-October 04



muchas gracias mi garzo...este me hacia mucha falta pero la verdad yo soy malo para el VB ya te debo una ronda de cerveza...
PMUsers Website
Top
JaPo
Posted: Sep 3 2008, 06:56 PM
Quote Post


Comandante
*

Group: Moderador
Posts: 965
Member No.: 23
Joined: 14-June 03



tsss van a ser dos rondas, ya no voy a batallar en las facturas XD

Saludos!!!
PMICQ
Top
1 User(s) are reading this topic (1 Guests and 0 Anonymous Users)
0 Members:

Topic Options Reply to this topic Quick ReplyStart new topicStart Poll


 


SemiSwirl v2.1 designed by aya | network - © 2003 aya

Powered by XOOPS 2.0 © 2001-2007 The XOOPS Project  |  Design by 7dana.com