Hola No quiero que se vaya el 2011 sin aportar algo mas...! Solo debemos escribir en A1 y las coincidencias (del reango usado en la hoja activa) se van a subrayar Espero a mas de uno le guste/funcione y lo mas importante que sea de utilidad! Saludos desde Honduras Subrayar texto buscado.zip

Hola! A veces nos encontramos con pequeñas cosas en los "baules" de los recuerdos o navegando en el internet, y sentimos pena al no querer mostrarla, porque talvez consideramos que no va a ser de utilidad a alguien. "Lo que a uno le sobra, a otro le falta". Este es el caso de este formulario con el cual puedes ver varias gráficas con la ayuda de dos botones, que te dan la oportunidad de avanzar o retroceder de gráfica a gráfica. Esperando pueda ésto ayudarle o darle una idea de como poder resolver algo con lo cual estuviste confuso. Saludos, JULIO Ver Grafica en un Form.rar

Hola a tod@s, acabo de ver un tema que pregunta sobre ésto mismo, pero en vez de colocarlo en ese post, lo pondré en los archivos de "APORTES" así lo podrá encontrar cualquiera que necesite algo así más facilmente, con éste archivo tan solo poniendo el número de los equipos o jugadores participantes, escogiendo si la liga será solo de IDA o IDA y VUELTA, y ejecutando una macro, se repartirá la liga completa, ya solo quedará poner en las casillas correspondientes y solo una vez los equipos o jugadores participantes, y automáticamente aparecerán en las jornadas. Espero que os guste y sea provechoso, eso sí seguro que ahorrará muchísimo trabajo. Un saludo, Germán. REPARTO…

Hola familia, aquí les dejo un pequeño utilitario que puedes usar en tu pequeño negocio, club, sociedad, base de datos de tus películas, etc, etc. Solo tienes que ajustar los diferentes campos a tus necesidades y dejar correr la imaginación. Pude poner unos gráficos más bonitos en el menú, pero fruto del tamaño del archivo que es aceptado por el foro, pues me tuve que conformar con esos que no ocupan mucho espacio (Administradores, no sean "tacaños" y subanlo un poco). Pues bien, esperando sus comentarios, aportes o ayuda para mejorarlo. Saludos, JULIO Extraer reporte con fotos.zip

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…

Saludos a Todos. Subo el presente archivo cuenta con dos macros para el mismo encabezado y pie de pagina en todas las hojas, y un form para seleccionar mediante un list las hojas a las cuales quieres aplicarles el encabezado y pie de pagina, espero sea de utilidad. Atte. joshua Encabezado y Pie de Pagina.zip

Hola: Respondiendo a este post: https://www.ayudaexcel.com/foro/threads/importar-los-datos-adquiridos-de-la-consola-de-windows-a-excel.40756/ Adaptado papelera vacia por @jonetoja Declare Function OpenClipboard _ Lib "User32.dll" _ (ByVal hWndNewOwner As Long) As Long Declare Function EmptyClipboard _ Lib "User32.dll" () As Long Declare Function CloseClipboard _ Lib "User32.dll" () As Long Sub muestra_cmd1() Call ClearClipboard Dim objWshell As Object Dim miPortapapeles As New DataObject, Contenido As String Set objWshell = CreateObject("Wscript.Shell") objWshell.Run "cmd /k " Application.Wait Now + TimeValue("00:00:01…

En este vídeo vemos como añadir BETWEEN y NOT BETWEEN a nuestra sentencia SQL para extraer registros de una BD Access a través de Excel y con VBA. Espero os guste y os sea útil.

Estimados, hoy día dí por solucionado un tema que levanté llamado "Color en el Filtro", gracias a la ayuda de Ama, Gerson e ioyama. Por lo pronto observando un aporte de Macro Antonio, observé y modifiqué el código. Esto permite dar color a los nombres de las celdas que se estan utilizando para efectuar un filtrado, así puedes ver rapidamente con claridad qué columna(s) estás utilizando para buscar la información: Private Sub Worksheet_Calculate() Dim af As AutoFilter Dim fFilter As Filter Dim iFilterCount As Integer If ActiveSheet.AutoFilterMode Then Set af = ActiveSheet.AutoFilter iFilterCount = 1 For Each fFilter In af.Filters If fFilter.…

Código Hoja: Dinámico (donde está la gráfica) Option Explicit Private Sub ScrollBar1_Change() ScrollBar1.Max = Range("chrtMaxScrollBar") 'para definir el valor máximo de la barra de desplazamiento. Para hacerlo programamos elevento ScrollBar1_Change() End Sub Código Módulo 1 Option Explicit Sub animate_Chart() Dim iX As Integer, Delay As Single, Start As Single 'fijar valores del eje Y del grafico Call fix_Y_Values Range("chrtCounter") = 0 For iX = 0 To Range("chrtMaxScrollBar") Range("chrtCounter") = Range("chrtCounter") + 1 Delay = 0.1 Start = Timer Do While Timer < Start + Delay DoEvents Loop Next iX End Sub Sub back…

He encontrado un par de referencias que me parecen muy útiles para quienes, como yo, en materia de programación no saben hacer la "O" con un canuto. El "abc" de Visual Basic: explica de forma muy sencilla las bases de este lenguaje. Enlace "Manual de Macros en Excel": El "abc" de las macros en Excel, para hacer los primeros pinitos y ayudarnos a entender (y a adaptar) lo que se escribe en el foro de Macros. Saludos cordiales.

Enlace del archivo en Dropbox (Por Tamaño: 2.36MB): https://www.dropbox.com/sh/ulkaemobligspzv/AAAW263LWiQ1WNVVLnYpw9Gta?dl=0 Es la 1a vez que remito por este medio, ojalá resulte. Es muy práctico en la " VIDA REAL, funcional al 100%" para cualquier tipo de proyecto: Obra Civil, Eléctrica Pasos: 1) Ir al Tablero Avance de Obra, que reparte con vínculos al Cronograma y Fotos y a la Bitácora ( que no la incluyo en esta ocasión) El Cronograma es de lo mejor, muy útil en la vida real y genera a) Gantt, Avance Físico y Financiero c) Gráfica e avance

Buenas a todos. Me toco crear un calendario que se genere automático con las fechas de la comunidad Autónoma, en este caso, las de Asturias. Peros se pueden cambiar con las de vuestra comunidad. Cuenta los días de guardias festivos y laborales x trabajador tiendo en cuenta los colores asignados a cada uno en el calendario. Lo comparto con vosotros por si os hace falta. Un saludo a todos. Calendario.zip

Hola a todos, espero que este recurso les sea útil. Se trata de una función construída para extraer la parte numérica de un domiclio. (Quise subir el archivo, pero siendo con extensión .xlsx, me lo ha rechazado) Puede copiarse y pegarse en un módulo nuevo. La función es la siguiente: Function Numero(domicilio As String) As Integer 'EXTRAE DE UN DOMICILIO SU PARTE NUMÉRICA (numeración de la Calle) Dim pos As Byte ' variable que representa cada caracter en el domicilio Dim texto As String texto = Replace(domicilio, " ", ",") 'Al reemplazar espacios por comas (o cualquier otro caracter) 'se evita que el nro d…

Hola: Ya nos hemos comido Julio, y a los mortales que tenemos todo el año de vacaciones nos da lo mismo, otros por el contrario hoy disfrutareis de vuestro primer día de trabajo una vez terminados esos "maravillosos" días con la mujer, los niños, la suegra, el calor, los mosquitos, los atascos, el precio de la gasolina y esas pequeñas cosas que nos acercan cada vez mas a la felicidad...... jejeje. He hecho un pequeño descanso de mi descansada vida para dejaros una muestra de mi insuperable ingenio. En mi constante búsqueda del nirvana de la inutilidad, he creado el juego de "El Buscaminas". La diferencia con el clásico de Windows, es que si jugais con el mío, siempre …

Hola: Aquí estoy de nuevo con mi aporte mas friki. Se trata de una especie de SpreadShed/Grid de datos/Listbox construido a base de controles Label y TextBox. En este aporte se reune todo lo que he aprendido sobre añadir controles en tiempo de ejecución y de generar eventos a partir de una clase. Vale para cualquier hoja con formato tabla, es decir, cabeceras en la fila 1 y datos sin vacíos en la columna 1. Al arrancar el formulario vereis una especie de hoja Excel, en ella se mostrará una copia de la hoja activa. Los celdas pueden modificarse directamente sobre el Grid o seleccionando las celdas con un doble-click, en este caso el valor de la celda pasa a un textbo…

Bueno, como dice el encabezado creo que esta terminado por mi parte, seguramente se le podria imcorporar más funciones pero yo no llego a más. Subo el archivo para que los que me han ayudado (sin ellos no podria) lo repasen y si alguien lo quiere usar ó mejorar esta a su disposición. Nota: si se me ocurre algo que añadirle ya mandare un SOS. Gracias a todos Luis Propuesta de Pedido2.rar

Hola: Antonio Aunque no es la primera vez que se suben teclados, esta vez he querido hacer uno lo mas compacto posible. Se puede hacer mas grande o mas pequeño a voluntad y se puede posicionar en cualquier lugar de la hoja. Escribe directamente en la celda activa. La tecla Enter avanza a la siguiente celda en función de como esté configurada en Excel. Paz y amor Vuelto a subir el archivo el 04/04/2015 a las 12:00 UTC. (problemas con el separador decimal) Vuelto a subir el archivo el 06/04/2015 a las 17:17 UTC. (problemas con el avance de celda. Tecla Enter.) . Teclado virtual.zip

Hola! Les comparto el siguiente link en el cual se pueden decargar un ejemplos de codigo para la creacion de graficos y como exportarlos como imagen: Creación de gráficos con VBA/Excel « MeXcel Plus Principalmente se ve como modificar el chartarea, plotarea, series, algunas de las propiedades de los graficos. Saludos!

Saludos Mi nombre es Svalin Mis conocimientos sobre Excel son prácticamente nulos, comencé a aprender ayer. Mi idea es hacer una ficha de personaje para 'Vampiro: Edad Oscura' y 'Vampiro: La Mascarada'. Tengo prácticamente hecho todo, y estoy incluso copiando las tablas para que sirvan de referencia. El diseño está completo, pero faltan las fórmulas, y ya que no tengo ni pajolera idea al respecto (ya digo que empecé ayer a toquetear el Excel) me gustaría contar con ayuda en este pequeño proyecto Por mi parte aportaría el diseño del Excel y el copiado de tablas (que ya está prácticamente hecho), así que sólo harían falta las fórmulas. Si hay algún rolero por el foro y q…

Hola, Les anexo un archivo con un formulario diseñado como barra de progreso, este lo realicé ya que ejecutaba un proceso muy grande en la que necesitaba que el usuario pudiera ver en qué proceso va la macro y poderlo cancelar en cualquier momento, además de poder mostrar algún error en él, esto ayuda mucho ya que el usuario puede copiar el texto del mensaje y enviarlo por correo para su revisión. Aunque requiere un esfuerzo extra de programación me ha ayudado mucho, cualquier mejora que puedan aportar es muy bien venida!!! Espero los sea de ayuda Saludos! ProgresBar.zip

Elimina las filas o ítems de un ListView 4.- Eliminar Filas de ListView (2).xlsm 4.- Eliminar Filas de ListView (1).xlsm

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 compañeros. Aunque el tema está un poco socorrido, quizás le pueda servir a algunos compañeros. Un saludo EDITO: Con fecha 24-Junio-2014 he sustituído el archivo por otro ampliado. PROMEDIOS.zip

Excel, así como viene de fábrica puede hacer muchas cosas por si mismo. Aunque para hacernos la vida mas fácil en cosas difíciles están los complementos. Yo tengo instalado el ASAP Excel, ya lo he mencionado en otros temas. Nos ayuda a hacer una gran cantidad de cosas que el Excel, sin macros, no puede hacer por defecto. Que y para que sirve: http://www.asap-utilities.com/about-asap-utilities.php Pagina de descarga: http://www.asap-utilities.com/download-asap-utilities.php ¿Que otros complementos conocen que nos puedas recomendar?