Hola: La posibilidad de visualizar información mientras se ejecuta una macro es mas bien escasa, o utilizamos la barra de estado de Excel o utilizamos celdas. ¿ Porque no utilizar un formulario VBA ? En principio por dos motivos 1) Los resultado en un formulario se visualizan al terminar el procedimiento que provoca los cambios 2) Una vez visualizado el formulario, se requiere la intervención del usuario para continuar. Ambos inconvenientes se pueden subsanar, el primero con la instrucción DoEvents. Cuando se detecta esta instrucción, se completan todos los cambios efectuados hasta el momento. Si ponemos el código de nuestra macro dentro del evento Activate del fo…

Hola: Tras leer este artículo ByVal or ByRef Parameters proporcionado por nuestro amable "BigBoss" Proper, me he puesto a jugar un poco, y se me han puesto los pelos como escarpias. Ya tenía mas o menos claro la diferencia entre pasar los parámetros como ByRef o pasarlos como ByVal. Pero lo que no tenía nada claro es que los parámetros son posicionales. Pero lo mas terrorífico que he descuebierto es que, al ser los parámetros posiciones, los nombres de las variable no se utilizan absolutamente para nada, y por ello si dentro del procedimiento Llamado modificas el valor de uno de los parámetros por ejemplo el nº 3, quedará modificada la variable que pasamos en tercer l…

Hola, Quizas sea algo demasiado obvio para muchos, pero recuerdo mis primeros días insertando botones en una hoja teniendo que adaptar el formato a la pobre lista que ofrecian las opciones a la hora de cambiarles el BackColor a los shapes. En muchos casos, hasta terminaba poniendole fondo transparente para usar el color de fondo de la celda. Si queremos algun color que no está en la lista de arriba, podemos modificar directamente el valor "&H00000000&", usando los valores RGB en hexadecimal pero en orden inverso desde el último cero: &H00BBGGRR& Con macros se podría asignar tambien un color RGB mediante: NombreControl.BackColor = RGB(255, 255, 255)…

Hola: He decidido dedicarme unos días a investigar propiedades y métodos poco usuales de los objetos Excel. Hoy he descubierto la propiedad VisibleRange del objeto Window. Esta propiedad te devuelve, como su nombre indica, el rango visible de una ventana, incluso si variamos la dimensión de la ventana. En el adjunto encontrareis una aplicación de esta propiedad. Posicionaros en cualquier celda del libro, y vereis como la imagen siempre aparece en la parte superior derecha. Variar el tamaño de la ventana y al seleccionar cualquier celda volverá a aparecer la imagen en la parte superior derecha de la ventana incluso en un rango distinto. Enjoy it ! TopRightImage.zip

Hola familia! Queriendo aportar algo a esta comunidad que me has dado tanto, les dejo esta plantilla en la cual puedes tener control de tus ingresos y egresos, ya sea personalmente o en un pequeño negocio. Está diseñada para los 12 meses del año, así como ver en gráfica como van evolucionando tus ingresos y egresos; del mismo modo, un termómetro va midiendo la temperatura de dichos ingresos y egresos comparados, desde luego, con los del año anterior. Está protejida, pero aquí te dejo el password (123) por si tienes que adaptarla a tus necesidades. Es bueno que la tengas protegida una vez hecho cualquier cambio para evitar que puedas perder cualquier fórmula o diseño de…

En el post 10 de este hilo, teneis los dos archivos con la solucion al problema que se plantea abajo y ademas un video donde se explica como han de montarse los archivos para que funcionen correctamente a traves de la red. Ir al POST 10 Hola, Hacia tiempo que no me encontraba con un problema que no se ni por donde cogerlo. - Tengo un libro que se guarda cada 15 segundos con "thisworkbook.save", el libro ejecuta una macro infinita y debe estár siempre funcionando. - El libro está compartido en red, dicho libro es copiado desde otros equipos cada X segundos a traves de la red. Todo el montaje funciona aparentemente bien y puede estár horas funcionando como debería…

Hola compañeros Aquí acompaño un repertorio de cosillas relacionadas con fechas, para quien pueda resultar de utilidad. Un saludo FECHAS.zip

Hola: A raíz de una solicitud de Julio Cesar se me ha ocurrido hacer una pequeña aplicación para etiquetar zonas de una imagen de forma parecida a como se hace en Facebook. El aporte va a constar de 2 envios: 1) El etiquetador 2) El visor De momento os avanzo el primero. El libro consta de dos hojas: 1) "Imágenes", es el índice de las imágenes que tenemos, consta de un nº generado al azar que identifica la imagen, el path completo con el nombre de la imagen, y el formato de la visualización. Contiene un control Image que nos muestra la imagen al seleccionar cualquier celda de la fila que contiene la imagen. 2) "Etiquetas", contiene las etiquetas de cada imagen, po…

Para saber cuántos años tengo sin la función SIFECHA uso un formato de celda personalizada incluyendo varias líneas con Ctrl+J como se explica en: El resultado es razonablemente aproximado siendo que se aplica el formato a un número decimal de días. Años_PW1.zip

Esto sirve para que no se pueda teclear nada (aunque sí se puede borrar contenido con SUPR o RETROCESO), y es útil si tenemos en un formulario, como en mi caso, una combobox pero no queremos que el usuario escriba lo que le venga en gana. Si queremos que esta combobox tenga el mismo valor de inicio que una celda (un texto o lo que sea), no puede estar como dropdownlist, porque da error de propiedad, y como dropdownbox el usuario puede escribir lo que le venga en gana. Para evitar eso, es "tan sencillo" como poner esto: Sub combobox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) 'Evitar escribir If KeyAscii > 0 Then KeyAscii = 0 End Sub[/CODE] Así, el "efecto"…

Hola a todos, Se trata de una hoja que te avisa cuando ha pasado cierto tiempo de inactividad, esta establecido a 6 segundos pero podeis cambiarlo desde el codigo, cada vez que se selecciona una celda se resetea el contador. Es una modificacion de un aporte que hice por aqui hace algun tiempo en el post #6 de este hilo (ENLACE), inactividad3 es una version modificada del archivo inactividad2 que podreis encontrar en dicho enlace, a diferencia de inactividad2 que avisaba mediante mensaje, este avisa con un sonido por si no estais delante de la pantalla. (No le he puesto autoarranque, por lo que para iniciar el contador por primera vez teneis que seleccionar cualquier…

No es gran cosa, pero ahí lo dejo. He puesto en un formulario un textbox limitado a 650 caracteres. Mi idea es poner un contador de caracteres restantes para saber cuándo se va a llegar al límite. Aporto la solución que he encontrado a ello: Crear el textbox donde escribiremos, ej. Textbox1 Configurar MaxLength del TextBox1 (.MaxLength=650 en un WITH, o desde el menú de la izquierda) (650 es mi límite, cada uno pone el que quiera; no recomiendo 0) Crear un textbox que nos hará de contador ej. TBContador Configurar TBContador sin texto (.Text="" en un WITH, o desde el menú de la izquieda), con color de fondo "Cara de botón" (H8000000F) y SpecialEffects ponerlo a Fla…

Hola amigos mi nombre es Rony y encontre una funcion creado por un autor desconocido que funciona para el literal de cualquier numero en mi caso es para indicar a cuantos Bolivianos (moneda en mi pais) equivale un numero. Espero que le sirva y pueden mejorarlos para que acepta un numero mayor pues se los agradecere mucho. Dese Bolvia saludos a todos y soy fanatico de esta pagina que me ha ayudado muchisimo N-Letras.zip

Hola amigos: Quiero compartir este archivo con vosotros que aunque no es de mi propiedad si lo he trabajado y lo he modificado para que sea operativo. El archivo se compone de 5 hojas: MENU, CLIENTES, PROVEEDORES, FACTURACION Y COBRO Y LIQUIDACION DE IMPUESTOS. Hay 2 hojas ocultas: AUXILIAR Y CALCULOS. No hay nada protegido. Espero que sea de vuestra utilidad y si por otra parte podéis hacer algún tipo de mejora, mejor. Como ocupa más de lo permitido está en el enlace de abajo. Saludos para todos. LIQUIDACION IVA E IRPF.part02.rar LIQUIDACION IVA E IRPF.part01.rar

Hola a todos, He estado pegándome con un selector de fechas manual, artesano, sacado de ESTA WEB que he tenido que retocar varias veces para hacerlo funcionar, además de cambiar la variable weekday a lunes para que tengamos un calendario que empiece por lunes. Testeado y funciona muy bien, no requiere ningún tipo de ocx, controles dependientes de otros programas, ni nada externo. Empecé preguntando por algún problema, pero ahora que está todo solucionado, os lo dejo como aporte. Me tocaba contribuir en algo a la causa tras toda la ayuda recibida Os dejo el selector en un libro habilitado para macros. Deja la fecha en la celda activa y le cambia el formato a [Fecha], li…

Para calcular lo que nos cuestan las vacaciones de Semana Santa subo una Calculadora táctil con teclas flotantes Se pueden configurar tantas disposiciones de teclado como se quieran (máximo 100) y viene preconfigurada con 4 más la primera de ayuda. Si tienes una Touch Screen o Pantalla Táctil serás un aventajado. Mándame un mensaje si encuentras un bug o errata para mejorar la calculadora. EDITADO: Subida versión 3 con mas calculadoras (Prueba la nueva calculadora sin teclas) CalculadoraTactilPW1.zip CalculadoraTactilPW2.zip CalculadoraTactilPW3.zip

Aqui os dejo un pequeño aporte de la funcion Ontime, que reproduce un efecto parpadeo de texto en una celda, el codigo esta en modulo, y tambien en thiswork, espero que os sirva de utilidad. P.D. Perdonar por la licencia de agradecer a todos los compañeros, y y maestros que nos ayudan a saber mas como hacer excel mas facil. Saludos Rafa Efecto parpadeo.zip

Hola Excelianos y pueblo en general: En pleno delirio de una mente romana transtornada por la belleza egipcia, he creado el engendro de los engendros, jamas nadie inventará una cosa como esta, porqué hay que estar loco, y porqué no decirlo, disponer de mucho tiempo para pensar siquiera en tamaño desproposito. ¡¡ HE INVENTADO UNA CALCULADORA EN NUMEROS ROMANOS !! A partir de ahora no podreis prescindir de de esta versátil y útil herramienta. Alucinareis a vuestros amigos, a la vecina del 5º, al camarero y a toda vuestra famila, os la quitarán de las manos. Podreis presumir de algo exclusivo que ni siquiera tienen Bill Gates o Cristiano Ronaldo. QVE VSTEDES LO CALCVLA…

Hola: Os adjunto procedimiento para formatear un listbox de forma autómatica: Supuesto de partida: Lista en A1 de Hoja1 Se toman de la fila 1: .Fuente: Nombre, Tamaño, Negrita, Itálica .Columnas: Numero, ancho .Ancho lista: Sumatorio ancho columnas Private Sub DimensionarListbox() 'Rango inicio cabecera lista Sheets("Hoja1").Select: Range("A1").Select 'Fuente y tamaño ListBox1.Font = ActiveCell.Font.Name ListBox1.Font.Size = ActiveCell.Font.Size ListBox1.Font.Bold = ActiveCell.Font.Bold ListBox1.Font.Italic = ActiveCell.Font.Italic 'Dimensionamos el listbox ListBox1.ColumnWidths = "" Do Until ActiveCell = "" ListBox1.ColumnCount = ActiveCell.…

Hola: Tanto Excel me debe estar reblandeciendo el cerebro. Hubiese jurado que había un aporte de Toldeman sobre este tema y no consigo encontrarlo. Bueno, Toldeman lo había resuelto con fórmulas, y como no podía ser de otra manera a mi no me ha quedado mas remedio que salir al paso con una macro. Al margen del MCM y MCD, también se obtiene la descomposición de los números en números primos. ¡ Ale !, a pasarlo bien. Saludos. Falta el fichero porqué no me deja subirlo. Ya lo subiré mas tarde.

Hola: Pues eso, os dejo un formulario que genera un puzzle de 25 piezas a partir de cualquier imagen. No hace falta ajustar exactamente las "fichas", basta con que el extremo izquierdo este dentro de la celda, y a continuación, con Ctrl+a, se alinean automáticamente. Saludos. Puzzle.zip

Hola Hoy me he encontrado con un problema, jugueteando y jugueteando con las opciones del excel luego no me acordaba como estaba todo al principio. He intentado reinstalar, reparar, buscar por google y nada, seguian igual. Propongo un metodo modificando el registro de windows "regedit". NOTA: Se trata de eliminar un registro del regedit, por lo que debes antes hacer una copia de seguridad de lo que vas a borrar antes de borrarlo. Doy por sentado que los que se aventuran en este tipo de acciones ya saben como va el tema. Abrir regedit y seguir la ruta: 1) HKEY_USERS 2) [Cadena rara larga que no termina en "Classes"] en mi caso (S-1-5-21-57989841-1677128483-839522115-1…

Buenas noches, como la cosa va de juegos aqui os dejo un aporte de John Walkenbach, las macro me parecen muy interesantes, espero que os sirvan, y seguiremos buscando cosas interesantes, saludos a esos grandes maestros. video poker.zip

Hola: Como os prometí os he hecho un juego. Supongo que todos conoceis el juego de "Las 4 en raya", por si acaso os cuento la mecánica: Se juega entre dos y hay que conseguir colocar 4 fichas en horizontal, vertical o diagonal, el primero que lo consiga, gana. Hay dos tipos de jugada: 1) Introducir la ficha por arriba 2) Quitar una ficha por abajo, en este caso solo puedes quitar las fichas de tu color situadas en la línea inferior. Para realizar el tipo de jugada 1, podemos arrastrar la ficha de nuestro color hasta la columna deseada o pulsar la letra situada en la parte superior de la columna, Para realizar el tipo de jugada 2, desplazar la flecha amarilla hast…

Buenas noches desde México a todos. Les comparto una pequeña lista incompleta de tips para programar macros. Son algunos puntos que he ido aprendiendo con la marcha y con los años de utilizar tan bella herramienta que es Excel. [LIST=1][*]Primeramente se define si se solicitarán datos al usuario final, y en qué manera serán, medianto un formulario, mediante un cuando con opción SI / NO.[*]Nuestras variables deben estar correctamente definidas, con su tipo correcto, para no gastar memoria innecesariamente.[*]Si se harán muchos movimiento de datos y hojas, es recomendable la instrucción Application.ScreenUpdating = False, ya que permite detener la actualización de la p…