Cuantos recuerdan uno de los clásicos juegos de la NES de 1984, me refiero al conocido (o no tanto por los mas jóvenes) Duck Hunt o Cacería de patos, ya que disponía de mas tiempo del que quería me di a la tarea de recrear este clásico en VBA lo cual fue un poco complicado por las limitaciones de este entorno ademas de que no quería exceder los 174kb que permite la subida a este servidor. Bueno como es una adaptación puede que no sea igual al original, las reglas son simples cada nivel tiene 10 patos para pasar de nivel necesitas darle al menos a 5 patos (con un click sobre el), tienes 3 tiros para darle a 1 pato si le das a la primera son 1000pts, a la segunda son 750pt…

Hace poco en el trabajo me pidieron que automatizara la creación de una página HTML que desplegaría el organigrama de cada una de las áreas de trabajo, dicho organigrama consta unos círculos donde cada uno de ellos se muestra la foto de la persona que ocupa dicha posición. Todas las imágenes que conformaran cada organigrama estarían dispuestas en una hoja de Excel, así es que como primer paso tendría que hacer una macro que tomara cada una de las formas (shapes) contenidas en la hoja y las exportara para después crear la pagina HTML. Lo que hace la macro es tomar cada una de las formas de la hoja organigrama, pegarla dentro del grafico de la hoja imagen y una vez ahí ex…

. Hi people: A raíz de esta consulta https://www.ayudaexcel.com/foro/threads/banner-de-publicidad-en-excel.37122/ se me ha ocurrido este aporte. Al abrir el archivo os encontrareis con la hoja Banners en la que hay que rellenar 3 datos, la ruta de la imagen del banner (bmp, jpg, gif,....), el hipervínculo del banner y el tiempo de visualización. Puede haber tantos banners como querais. La hoja Banners, una vez cumplimentada, puede ocultarse. Cada vez que activeis una hoja se mostrará un banner al azar. Pulsar sobre el banner para seguir el hipervínculo, y sobre la cruz para ocultarlo. . Banners.xls

Leyendo el Calendario automático de mi amigo [uSER=46507]@Macro Antonio[/uSER] se me ha ocurrido preparar un Control de Calendario desplegable con fórmulas en Excel 2010 y lo comparto con vosotros por si lo queréis probar en Excel 2013 que aún no lo tengo instalado. Se puede ver en cualquier celda con el botón derecho del ratón o en las celdas de las columnas que tienen "*FECHA*" en la primera fila. Se puede cambiar el rango seleccionado en esta rutina: Sub ControlCalVisible(bVisible As Boolean) ' ' Al seleccionar una celda se chequea la visibilidad del Control. ' With ActiveSheet.Shapes.Range(Array("ControlCal")) 'If Not Application.Intersect(Ac…

Hola a todos, incluso a los que están de vacaciones: Os adjunto un archivo con un formulario (ImageManager) este formulario permite añadir, restaurar y eliminar Puntos de recuperación de información. Un Punto de recuperación de información es la situación de una hoja en un momento dado elegido por nosotros. Se trata de copias de seguridad de una hoja sin necesidad de guardar diferentes versiones del archivo. Pueden existir tantos Puntos de recuperación de información como nosotros queramos, y pueden ser recuperados en cualquier momento. Si se guarda el archivo también se guardan los Puntos de recuperación de información. Copiar el formulario en cualquier archivo Exc…

Hola: Todavía sigue siendo bastante común el pactar los salarios netos en lugar de los brutos. Luego viene el problema de calcular un bruto al que quitándole los descuentos nos de ese salario neto. Eso, que a priori parece sencillo, en la práctica, no lo es tanto si lo hacemos de forma manual. En el adjunto encontrareis una hoja con salarios netos y sus porcentajes de descuento por Seguridad Social e IRPF, también encontrareis dos botones, uno a modo de calculadora, y otro que procesa la hoja y obtiene las columnas sombreadas en rojo. Saludos. CalcularBruto.xls

Buenas, Aquí os dejo una de las mejoras que le he puesto a mi proyecto de estudio por Excel. Se trata de un sistema de navegación entre directorios por exploración al igual que se puede hacer con el Regedit o con Windows Explorer, solo que en lugar de manejar objetos relacionados, simula dicha acción con las filas del Excel ocultándolas o mostrándolas. Para el ejemplo he cogido la ruta de directorios de Windows XP para que se entienda mejor el propósito, yo lo uso para definiciones de las materias que estoy estudiando. Además de expandir o contraer directorios mediante Doble Click, tiene también la opción de lanzar una macro en caso de no estar en la zona de expansi…

Les dejo una planilla bastante sencilla para llevar un control de valores (cheques) recibidos. En la hoja RESUMEN podrán consultar los movimientos y saldos en un periodo cualquiera. Me gustaria escuchar opiniones y sugerencias para mejorarlo un poco. Saludos Francisco ARQUEO DE CHEQUES.rar

Buenas noches A continuacion un pequeño aporte. Se trata de una tabla de multiplicar. Espero les agrade. Mis respetos. Tabla de Multiplicar.zip

Estimados compañeros He visto muchos calendarios "perpetuos" donde se selecciona un mes y un año y abajo dibuja el calendario completo. Aquellas veces que he visto cómo lo hicieron, muchos de ellos lo hacían con fórmulas matriciales, algunos con macros. Las fórmulas matriciales y las macros son medio complicadas (para el común de los primates) así que quise hacerlo sólo con fórmulas simples y formatos condicionales. En mi solución, he usado una única fórmula para todo el calendario (inclusive los títulos los saco con esa fórmula) y aplico formatos para los feriados (100% configurables) y para todo en general. Espero que les sea de interés este minúsculo aporte. Un abra…

____________________________________________________________ Hola a todos: Producto del aburrimiento me ha salido esto. Para aquellos que teneis que hacer mucho copy/paste os dejo estas cuatro líneas de código. Colocarlas en la hoja deseada y: Seleccionar un rango + click derecho en la selección + clic en la celda de destino. ________________________________________________________ Dim Switch As Boolean Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) Cancel = True Selection.Copy Switch = True End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Switch = True Then Target.PasteSpecial Application.Cu…

Hola Sabemos que existen varias formas para cerrar un formulario, y una de las dificultades para lograr esto es hacerlo presionando la tecla "Escape" Espero les sirva [DBOX]Cerrar Formulario (UserForm) con tecla "Escape"[/DBOX] Saludos

A través de los años, resolviendo dudas, aprendiendo técnicas me he dado cuenta de que Excel a pesar de ser una potente y flexible herramienta no puede resolver o efectuar las tareas que uno desearía realizar o por lo menos no de la manera más fácil, es por esta razón que desde hace tres años comencé a programar un complemento para ampliar las funcionalidades de Excel y realizar tareas que pudieran parecer imposibles de realizar en la interfaz de Excel, dicho complemento le llame: iSoft Utilities Pero… ¿qué es un complemento? He aquí una explicación detallada de lo que son y como instalarlos. Actualmente sigo adicionando nuevas características al complemento que comencé…

Macro Antonio, lo prometido es deuda, aquí tienes el gestor de consultas que te prometí. Antes de nada, copiaros la hoja Excel a un sitio donde tengáis vuestras hojas de trabajo ya que cuando se abre se genera en la barra de complementos de Excel una barra personalizada con tres opciones y a partir de ese momento siempre que se utilice la buscara en el sitio desde donde haya sido abierta. Conexión Consultas Activas Una vez abierta la hoja os solicitara permiso para ejecutar las Macros y se generara la barra personalizada, despues desde cualquier hoja excel podreis utilizarlo para ello pulsareis sobre la opción de Consultas. Lo primero que tenemos que elegi…

Buen día a Todos; Estaba actualizando mi música con la tendencia del momento, y necesitaba saber que canciones ya tenía para no duplicar, por lo que se me facilitaría más si tuviera un listado en Excel de mis canciones, obviamente hacerlo manual NO ERA LA OPCIÓN,, y encontré la forma de hacerlo desde el Símbolo del sistema (cmd.exe), y los pasos son los siguientes: 1. Ejecutar la línea de comandos de Windows: - Inicio -> Ejecutar -> cmd y enter 2. Ir a la carpeta que deseáis listar, aquí una serie de instrucciones básicas: - Para ver el contenido de la carpeta actual se hace con "dir". - Para acceder a una carpeta "cd nombreDeLaCarpeta". - Para cambiar de…

Estimado aquí les dejo un aporte con formulario para menu ,el cual se despliega desde una hoja de excel , tipo Visual Basic 6.0 , lo encontré en un video por youtube ,talvez les pueda ayudar en el manejo de sus presentaciones con formularios en excel. Columna A va el nivel del Menú,en la columna B se escribe el nombre del menú, en la columna C debe ir el procedimiento nombre de la Macro a correr ,columna D estado del fin de Menu , y en columna E el indice. Saludos Cordiales, MENU_CON_APIS.rar

Hay una consulta que es frecuente y es el tema de las validaciones dependientes. Se me ocurrió hacer algo con tablas dinámicas, validaciones, rangos dinámicos y unas pocas macros. Les comparto lo que he hecho. ------ Las validaciones van en las celdas de color gris claro ------ En la primera hoja los filtros se hacen con segmentaciones ------- Proyecto desarrollado y ensayado en Excel 2013, verificado en Excel 2010 aunque noté que hay algunos cambios visuales en las segmentaciones. No lo he probado en ninguna otra versión de Excel. Filtro Dependiente con tablas dinámicas.xlsm.zip

Buenas Noches Queria si alguien pudiera aydarme a crear una consulta de datos de que Hoja1 busque unas datos por fecha en Hoja2 y que me la imprima los datos en Hoja3 ( todo dentro del mismo archivo) anexo el archivo pd soy nuevo en esto De Antemano Muchas Gracias Consulta_Embarque.rar

Les dejo este archivo para recordar los cumpleaños de sus seres queridos. Espero les sea útil y mil gracias por tanta gentileza en ayudarme. Mis respetos para todos. CUMPLEAÑEROS DEL MES.rar

Bueno a raiz de este tema https://www.ayudaexcel.com/foro/threads/como-convertir-a-letras-minutos-y-segundos.36817/ , hice esta función que dejo por si a alguien le es de utilidad Salu2 convertir hora en letras.zip convertir hora en letras.xls

Buen día Compañeros del Foro, espero les interese y a la vez compartir este archivo con Ustedes. se trata de un Traductor con Google Translator el cual puede traducir en mas de 60 idiomas .A instancia del navegador se abre con el archivo, tanto en el idioma original y traducido al idioma que haya seleccionado. Aquí está la función que utiliza Google Translator para traducir palabras, frases y oraciones. Cabe decir que se requiere conexión a Internet. El archivo consta de 3 Hojas. Hoja1: consta de palabras en español el cual serán traducidas al ingles por defecto de acuerdo a los parámetros dados. Hoja2: consta de palabras en español el cual se utiliza la f…

En una ocasión decidí reemplazar las molestas bolitas del Bingo por un archivo en Excel, fue diversión con mi familia y amigos en una navidad, lo proyectamos sobre la pared e hizo de este juego algo divertido y ordenado, pues en el Tablero se ve cuales números han salido. Espero les guste. JADA PD/ Ya esta desencriptado. BINGO_JD.zip

Para los que les gusten las fórmulas, adjunto una variante de lo que se suele buscar con los "Filtros de texto" de las tablas en el caso: "Contiene..." que ya sabemos que no distingue entre mayúsculas y minúsculas cuando busca valores de texto. No he encontrado nada similar en el foro, pues este otro tema se basa en macros: Formula que busca un Texto o Numero Me ha venido la idea contestando a este tema: Buscar texto y copiar lo que contenga la celda BuscarTexto_PW1.xls

He aquí mi intento de crear una sola función(UDF) en la que podamos validar campos de texto o realizar otras funciones como borrar todos los campos de un formulario de una manera simple con solo copiar un código en un modulo, un "4 en 1" por el momento. Que podemos hacer con esta UDF ? : -Comprobar que campos están vacíos dentro del formulario. -Borrar todos los campos de un formulario. -Validar que solo se puedan introducir números en un campo -Validar que solo se pueda introducir texto en un campo -Convertir un valor numérico en formato de moneda local (formatcurrency) Cual es la ventaja de utilizar esta función? : -Funciona para cualquier formulario sin importa…

Hace poco estuve trabajando a fondo en un proyecto que calcularía a futuro (3 meses) los días de inventario para varias divisiones, categorías, mg y sku por cliente. Para empezar las bases de datos con los que tendría que hacer los cálculos (inventarios, sell in, sell out) eran bases de datos que superaban los 500 mil registros, tuve que verme en la necesidad de previamente compactar la información de manera manual usando tablas dinámicas, luego supuse que tendría que crear varios resúmenes de datos, ya sea por cliente, categoría, etc… así que pensé pudiera hacerlo en Access (y quizás hubiese sido buena alternativa), desgraciadamente el prototipo tenía que estar listo en …