Jump to content

86 files

  1. MI BARRA DE PROGESO

    Hola compañeros,
    Quiero compartir con todos vosotros la barra de progreso que personalmente utilizo en mis aplicaciones ofimáticas.
    Antes de nada, me gustaría apuntar que sólo recomiendo utilizar dicha barra de progreso en aquellos procedimientos en los que se haga un recorrido por todas las celdas de la hoja, tal y como puede comprobarse en el fichero adjunto.
    Sin más que añadir, este es el código:
    Sub BarraDeProgreso() Application.ScreenUpdating = False ' Limpiamos los errores anteriores (por si acaso)... Err.Clear ' Tratamos los errores del procedimiento... On Error Resume Next ' Declaramos las constantes y variables locales... Const LONGITUD As Byte = 25 Dim contador As Byte ' Recorremos el bucle... For contador = 1 To LONGITUD ' Iniciamos la barra de progreso... Application.StatusBar = Application.Rept(ChrW(9607), contador) & " " & _ Application.Rept(" ", LONGITUD - contador) & Int(contador * 100 / LONGITUD) & "% completado" & _ IIf(contador <> LONGITUD, "...", ".") ' E insertamos aquí el procedimiento... ' ... Next contador ' Esperamos unos segundos... Call Application.Wait(Now + TimeValue("0:00:03")) ' Y finalizamos la barra de progreso... Application.StatusBar = False 'End Sub Espero que os sea de utilidad.
    Gracias, y un saludo.
     

    6 downloads

       (0 reviews)

    0 comments

    Updated

  2. Bloques

    Otro juego realizado con Excel, en este caso es un juego que consiste en acomodar bloques arrastrando y soltandos para formar la figura que se encuentra en la parte superior, el juego original tiene muchos mas niveles y distintas formas, pero hasta aqui llego mi amor, mi objetivo era poder replicarlo en excel, luego es un poco mas de lo mismo, espero que les sirva para pasar un rato in the office  

    16 downloads

       (0 reviews)

    0 comments

    Updated

  3. Juego Trabado

    Hola este es un juego que vi en estos días y me dió ganas de hacer lo en Excel, la verdad si bien me dio trabajo programarlo es más difícil lograr el objetivo del juego, en YouTube hay un par de tutoriales pero eso seria como ir derecho a la trampa así que les dejo este desafío para pasar el rato (yo no logré resolverlo)
    El objetivo del juego es bajar la ficha roja en la parte inferior tal como muestra el cuadro de solución, las piezas se mueven con el mouse.

    19 downloads

       (0 reviews)

    0 comments

    Updated

  4. Llenar un listbox/combobox a partir de una fórmula

    En el adjunto encontrareis un formulario con 2 ejemplos de como llenar un listbox/combobox, uno, a partir de un nombre y otro, a partir de una fórmula, ambos combinados con la propiedad RowSource.
    Se basan en la utilización  de DESREF y CONTARA.
    Lamentablemente la propiedad RowSource no admite la fórmula en ingles y con la fórmula en castellano, no funciona, de ahí que he colocado la fórmula en inglés en la propiedad Tag del listbox/combobox.

    20 downloads

       (0 reviews)

    0 comments

    Submitted

  5. Imagen con ScrollBars en la hoja

    Hola comparto una forma de agregar una imagen a la hoja con barra deslizantes, también se pude arrastrar y mover con el mouse, el ejemplo esta echo con un shape de fondo, pero este es solo para indicar en que lugar y de que tamaño se quiere la imagen. no son de mi agrado los scrollbar activeX de vba ya que no se comportan como deberían, tenia ganas de hacerlos con shapes, pero bueno quizás para otra ocasión.

    17 downloads

       (0 reviews)

    0 comments

    Submitted

  6. Modernizando controles para utilizar en Hojas

    En este aporte intenta dar una fachada diferente a los controles clásicos de VBA que se utilizan en la parte de la hoja de Excel, no es que sean controles nuevos, sino que están retocados estéticamente con ayuda de shapes y automatizaciones, hay dos modulos adentro que nos ayudaran para hacer que todo esto funcione, tenia ganas de crear un formulario para que se automatice agregar el control a la hoja, pero por el momento tendrán que copiar y pegar los controles de esta hoja a la que quieran utilizar.
    los controles intentan simular la fachada de la interfaz de Bootstrap o controles web, los que mas les recomiendo es el control calendario que creo que quedo bastante fachero.
    esto aun no esta muy testeado por lo que puede haber que ir ajustando algunas cosas solo arme un grupo de controles, pero no se me dio para hacer alguna hoja con alguna utilidad que los emplee, si alguien se anima bienvenido
    bien cualquier duda pregunten, no soy de conectarme mucho pero tratare de ayudar.
     

    53 downloads

       (0 reviews)

    0 comments

    Updated

  7. Juego - Caza de Patos / Duck Hunt

    Revisando mis viejos aportes me encontré con este, que como indica el titulo es el viejo juego de NES recreado en VBA.
    Tal vez la mayor utilidad de este aporte (ademas de ofrecer horas de diversión ) es que todo el juego esta realizado con controles de formulario, por lo que es una buena referencia sobre como funcionan los controles de formulario y la forma en que se pueden manipular en tiempo de ejecución.
    Así que bueno que se diviertan!! 
    Saludos

    142 downloads

       (0 reviews)

    1 comment

    Updated

  8. Actualizar código de módulos desde un Txt en la red

    Resulta que hace unos años me tope con el problema de que  en mi trabajo habían varios compañeros con un archivo con macros que yo les había pasado, pues resulta que el código del módulo tenia algunos errores o debía cambiar alguna parte del código. Esto era un problema ya que como eran varias personas tenia que ir una por una a modificar el código del modulo para actualizarlo ya que no podía enviar el archivo por correo porque cada uno tenia datos diferentes ingresados en el libro.
    Pero teníamos algo en común, todos estábamos en la misma red, entonces se me ocurrió el código que explico a continuación:
    1. En el archivo original se debe copiar el código en el módulo "Thisworkbook".
    2. Debe haber una carpeta de red a la que todos los usuarios tengan acceso (ya sea una red local o por VPN).
    3.Crear una carpeta con cualquier nombre donde colocaremos los archivos de actualización.
    4. Los archivos de actualización deben ser en formato .txt y el nombre del archivo debe ser el mismo que el del módulo a actualizar.
    5. Dentro de los txt se debe colocar el número de versión ejemplo  '1.01, con un apostrofe al inicio.(El código solo se actualiza si el número de la versión del txt es mayor que el del modulo del libro) 
    6. El código actualizara los módulos automáticamente y no afecta la información que este dentro del libro. Si no existe el módulo el código lo creara.
    El código se ejecuta automáticamente al abrir el archivo y se debe habilitar la opción de Confiar en  el acceso al modelo de objetos de proyectos VBA en la configuración de Centros de Confianza -> Configuración de Macros.
    En el ejemplo adjunto, se debe descomprimir y abrirlo por primera vez se actualizaran los módulos, ya que la carpeta por defecto es la misma que donde se guardo el archivo.
    Saludos y espero sea de funcionalidad para alguien.

    48 downloads

       (0 reviews)

    0 comments

    Submitted

  9. UserForm de Login

    Hola Sres  dejo por un userform con diseño.... 
    Mi primer aporte, soy asiduo visitante de la pagina para descargar y leer... No soy programador
    Gracias a todos por sus aportes, Mis respetos

    58 downloads

       (0 reviews)

    0 comments

    Submitted

  10. Ofuscador de código VBA

    Amigos, aquí les dejo un programa recién salido del horno, espero que les sirva, se anexa guía explicativa

    140 downloads

       (1 review)

    0 comments

    Submitted

  11. Gráfico de personas para Dashboard

    Gráfico inicial: Seleccionar Rango I6:K14/ Gráfico de Dispersión.
    Clic a Gráfico/Formato de línea de trazado /Opciones de áreas de trazado/ Eje vertical (Valor).
    Opciones de Eje:
    Mínimos: 0
    Máximos: 2
    Demás explicaciones en Hoja

    67 downloads

       (0 reviews)

    0 comments

    Updated

  12. Autos más Veloces del mundo 2019

    https://drive.google.com/open?id=15YoF5xb4do5UK0iXBaElLroHIyjQF7-r
     
    Autos más Veloces  del mundo
    En UserForm FLOTA DE VEHÍCULOS: Se le selecciona Marca y Modelo y se generan todas sus Características
    En UserForm AGREGAR VEHICULOS: Se agregan nuevos autos
    En UserForm CAMBIAR ESTADO DE UN VEHICULO: Se Modifican sus Características.
    En UserForm SACAR VEHICULO : Se Retiran autos

    33 downloads

       (0 reviews)

    0 comments

    Submitted

  13. Ventas en Semestre con Cuadro de Lista, Gráfica

    En Hoja: Datos,  figuran Vendedores y sus Ventas mensuales por un Semestre
    Con Cuadro de lista  y un Tablero Auxiliar (extrayendo valores con  INDICE ), se crea Gráfica para Vendedor seleccionado del Cuadro de Lista
    Ventas en Semestre con Gráfico.xlsx

    34 downloads

       (0 reviews)

    0 comments

    Submitted

  14. Fixture - COPA AMERICA BRASIL 2019

    Amigos en este nuevo aporte les traigo el archivo Copa America Brasil 2019 - Pronosticos que nos permitirá hacer el seguimiento al evento futbolístico más importante del año; este puede ser usado de 2 maneras (en ambos casos el funcionamiento es el mismo):
    Simplemente como seguimiento de los juegos, donde vamos colocando los resultados de los juegos y vemos como va evolucionando la clasificación, se puede llevar el seguimiento hasta el juego final. Podemos usarlo para participar en una quiniela, hacemos nuestro pronóstico para todos los juegos, se le envía la quiniela a la persona encargada y esa persona con un archivo especial se encarga de llevar el control de todas las quinielas. Anexo está el archivo y la guía completa de uso, espero que les guste y disfruten del torneo siguiendolo con este archivo
    gracias

    127 downloads

       (0 reviews)

    0 comments

    Updated

  15. Array de arrays (Jagged Arrays)

    Hola que tal.¿Alguna vez has trabajado con varias arrays y no te has preguntado si no podría ser que las pudieses agrupar todas en una como si fuesen las hojas de un libro?
    Pues esto es lo que yo me planteé un día y empecé a investigar en el tema. Tuve la necesidad de tratar cientos de datos de seis hojas de seis libros, una por cada libro.
    Cada hoja la puse en una array bidimensional y estas a su vez agrupadas en una Array de Arrays. Con esto tienes la ventaja de que lo puedes trabajar todo con un solo bucle, si no, tienes que crearte un código para cada hoja de cada libro. Al principio es un poco lioso, ¿pero que no es en programación cuando se empieza?
    Espero que os guste.
    Aporto esto para el foro que tanto me ha ayudado en mis inicios.
    Gracias.

    81 downloads

       (0 reviews)

    0 comments

    Updated

  16. Código oculto - Un tipo de 'protección'

    Saludos a toda la comunidad
    Le comparto un archivo muy curioso, al abrirlo ejecutará una macro que mostrará un mensaje, pero al intentar leer el código no lo encontrarán
    Lo hice modificando el archivo BIN con un lector hexadecimal
    Si alguien sabe cómo generar módulo transparentes agradecería pueda compartir la información
    Macro_Ocultame.xlsm Macro_Ocultame_modificada.xlsm

    28 downloads

       (0 reviews)

    0 comments

    Submitted

       (0 reviews)

    0 comments

    Updated

  17. Calendario minimalista

    Es un calendario al uso, sin misterios.
    Ya sabeis de mi debilidad por los calendarios, en este caso la gracia está en el código VBA.
    Os recomiendo que lo reviseis y os dareis cuenta que se puede hacer click en un label sin evento individual y sin módulo de clase.
    Calendario mínimo.xlsm

    66 downloads

       (0 reviews)

    0 comments

    Updated

  18. PALETA DE COLORES

    Despliegue de la paleta de colores utilizados en Visual Basic.
    Si alguien quiere aportar más cosas, es totalmente libre de hacerlo...
    Gracias.

    48 downloads

       (0 reviews)

    0 comments

    Submitted

  19. Buscar y abrir ficheros Excel, Word, PowerPoint y PDF

    Qué tal,
    A partir de una duda de un usuario, surge este archivo mejorado para la busqueda y apertura de ficheros Microsoft Office (Excel, Word y PowerPoint) y ficheros PDF. Entre otras tiene las siguiente características:
    Permite buscar solo en un directorio raiz, o en todo sus subdirectorios Permite buscar un fichero entre el listado de todos Permite filtrar por tipos de ficheros Permite volver a mostrar de nuevo todos los ficheros tras un filtro Espero que os sirva y os guste. Espero vuestras opiniones

    120 downloads

       (0 reviews)

    1 comment

    Submitted

  20. modo tactil

    83 downloads

       (2 reviews)

    0 comments

    Updated

  21. Informe Semestral y anual de Notas

    Informe de Notas que puede ser usado en establecimientos educacionales, contiene datos personales, asistencia, cantidad de anotaciones positivas y negativas y entrega en forma automática los informes para ser entregado a los apoderados.
    De fácil uso.

    244 downloads

       (0 reviews)

    0 comments

    Updated

  22. Enviar Multiples Correos (Outlook) desde Excel

    Que tal, les comparto este archivo el cual utilizo para enviar correos de Outlook desde la comodidad de Excel.
    Esto es de utilidad si como en mi caso necesitas enviar un mismo correo a varias personas pero con diferentes archivos adjuntos.
    Sin mas espero que el aporte sea de utilidad.
    Saludos.

    186 downloads

       (0 reviews)

    3 comments

    Updated

  23. Fixture Mundial Rusia 2018

    Hoy comenzó el mundial, hoy les comparto el Fixture Mundial Rusia 2018
    Podrás ver cada grupo, etapa final y la explicación de uso
    Solo de agregar el marcador por cada juego!
     
    Saludos!

    79 downloads

       (0 reviews)

    0 comments

    Updated

  24. CÓMPUTO DE SUFRAGIOS EN ELECCIONES

    Uno de los principales problemas que tienen los comandos de partidos políticos, al momento de llegar a una elección, es llevar los cómputos.
    Por lo que propongo una idea.  Obviamente esta puede ser mejorada; es la primera idea, al respecto, que desarrollo.
    Esta basado en el sistema de cifra repartidora que se usa en Chile y que en su última hoja muestra quienes resultan electos.
    Espero que sea de utilidad para alguien o al menos para inspirarse en al mejor.
    Finalmente, como es una idea espero me hagan saber sus mejoras.

    35 downloads

       (0 reviews)

    0 comments

    Submitted

×
×
  • Create New...

Important Information

Privacy Policy