No es un Cronograma Pert Gantt, es un Avance con Barras y Porcentaje en una sola columna, complementado con un Dial, una Gráfica con movimiento y 4 Gráficas más. Escojan las gráficas que les satisfaga y elimina las que no creas apropiadas. Explicaciones en el archivo Avance de Obra con Barras, Dial y 4 Gráficas.rar

Buenas noches amigos Mis respetos para todos. Tengo tiempo en que no aporto algo en el foro por lo que en este momento doy un pequeño ejercicio de buscar dato en listbox y que espero les sea util en el futuro. Saludos cordiales. Listbox1.zip

Otra prueba más de lo que se puede hacer con VBA: A continuación muestro un fichero Excel que descarga, de Yahoo Finance, información bursátil del Símbolo que le indiquemos. Podemos obtener información de la última sesión que se esté negociando. Para ver el detalle de todo lo que se puede conseguir mejor abrir el fichero y verlo. La plantilla estará disponible hasta el 30-9-2015. Cuando alcancemos los 1.000 suscriptores en el canal de YouTube el acceso a la plantilla será totalmente libre. Adjunto podéis encontrar el fichero. Aquí acceso a todos los vídeos que tengo publicados en mi canal de YouTube sobre Macros en Excel con VBA, no olvides dejar un "Me gusta" o suscri…

Como dice el Maestro [uSER=46507]@Macro Antonio[/uSER] Un dia de aburrimiento Aqui te dejo un archivo, como el mismo titulo lo dice (animar commandbutton). al pasar el mouse en el boton se cambia de color. para los que son expertos de programacion a lo mejor tienen otras propuestas, a lo mejor pueden disminuir los códigos que yo utilizé. Y será bienvenida las propuestas. Saludos. Animar Boton.rar

Estimados, A la hora de armar equipos de futbol entre amigos: se acabo el pan y queso, o herir los sentimientos del ultimo jugador que nadie quiere elegir, Les paso una planilla sencilla que arma los equipos de forma aleatoria. Solo hay que completar, cantidad de jugadores por equipo y la lista de convocados... Abrazo, HACER EQUIPOS.rar

Hola Amigos ... Aquí les dejo este programa que solicita contraseña para iniciar de acuerdo a una fecha, el uso es muy sencillo para ingresar les dejo la contraseña en la hoja1, y esta fechado al 15 de septiembre de 2015 y lo único que hace es darte 2 avisos antes de borrar el archivo, se deberá de manejar precaución ya que si olvidan la contraseña se elimina el archivo ... La Macro se encuentra en "ThisWorkbook" Básicamente lo comparto para que exploren la programación, se que hay varias formas de hacer proteger datos pero esta se me hizo muy interesante y sobre todo espero les sea de utilidad. Saludos Max2005 Contraseña de Ingreso.zip

Franja del Termómetro y Cilindro cambia de Color según el valor: Rojo: 0%- 39%, Amarillo: 40% -79% Verde: 80% -100% Termómetro, Cilindro cambian Color.rar

Los Termómetros tienen agrupados todas sus partes que lo componen (al copiar en otro sitio, pasa completo)→ podéis Copiar y Pegar donde esté un valor que deseamos sea ilustrado → De nuevo: Clic al Termómetro/ Seleccionar datos/ Series1/ Editar/En Valores de la Serie: Nos situamos en Hoja donde está el valor, seleccionamos la celda del Valor en (%) El valor en círculo se conserva. Para cambiarlo: → Nos situamos dentro del valor, le damos =, nos situamos en Pestaña superior = escogemos el nuevo valor Mayor explicación en archivo Termómetro Negro.rar

Tercer vídeo del nuevo curso sobre "Financial Modelling" con Excel 2013. Espero, sinceramente, os resulte útil e interesante.

Hola: En otro foro, Héctor Miguel contesta a una pregunta sobre la transformación de archivos Excel en archivos .exe adjuntando la siguiente URL XL to EXE Converter - XLtoEXE Lo he probado y funciona. Curioso. PD. Quizás lo mas interesante es que parece que se le puede poner fecha de caducidad al archivo. ¡Cuidado! La conversión la realiza sobre el propio archivo, por lo que se recomienda hacer una copia del archivo previamente.

Ventaja: La Flecha de Autoforma incrustada en la Etiqueta generada→ se mueve con los cambios de valores Explicaciones en el archivo de Excel Nos colocamos en celda del % / Insertar/Gráfico/Línea con Marcadores/ Clic a la gráfica/ Seleccionar datos / Eliminamos la Serie Total, con Quitar / Serie: % Avance/ Editar / En valores de la Serie: colocamos celda del %/ Seleccionar datos/Borramos Formatos de leyenda / Seleccionamos el Eje Vertical/ Dar Formato a Eje/En Opciones del Eje→ Mínima: Fija=0, Máxima: Fija = 1/ Borramos el Eje Horizontal / Borramos Formato de Línes de división/ Creamos una autoforma: Insertar: Formas: Flecha a la izquierda/ Le damos copiar: Ctrl C/…

En algunas oportunidades al consultar en Internet encontramos formulas en Ingles y para aplicarlas en nuestro Excel es necesario pasarlas a Español. Por ejemplo: =IF(OR(MOD(A1,400)=0,AND(MOD(A1,4)=0,MOD(A1,100)<>0)),"Año bisiesto", "No es un año bisiesto")[/PHP] Hice una pequeña macro (de solo una linea), para realizar esta tarea, les adjunto el archivo. En una celda se copia la formula en Ingles, en formato texto o precedida de apostrofo, solo se necesita pulsar un botón para la traducción a español. Seguro se le pueden hacer mejoras, les dejo este aporte. Bienvenidas las mejoras. Traducir formula.xlsm.zip

Utilidad: · hacer una entrada en nuestras presentaciones El título de presentación de nuestra exposición se muestra por unos breves segundos creando un efecto especial como antesala a lo que vamos a exponer, después se oculta, así está configurado en el Módulo 1 Sub Oculta() Unload FormPresentacion Application.Visible = True End Sub Sub Mostrar() Load FormPresentacion FormPresentacion.Show Exit Sub End Sub Podemos alargar nuestro tiempo en que se muestra nuestro Título de presentación en el Código del UsrForm¸ para este caso son 5 segundos Const tiempo = "00:00:05" '= 5 segundos Los textos → Etiquetas y la Imagen que está en este mismo archivo deben…

Buenos dias mis amigos, aqui les comparto un archivo de funcion concatenar, de repente les sirva:D. Para_Alba_.rar

Enviar una hoja por Email Public Sub EnviarHojaPorCorreoElectrónico() Dim strNombre As String ActiveSheet.Copy With ActiveWorkbook .SaveAs "C:\ Admon y Economía con Integrales.xls" .SendMail Recipients:="ejemplo@correo.com", Subject:="Envío libro de Excel" strNombre = .FullName .Close End With Kill strNombre End Sub 'En .Save AS “ cambiar la ruta donde se encuentra el archivo con su nombre 'En SendMail Recipients: = cambiar el Email ejemplo@correo.com 'Aparecerá un aviso de Microsoft Outlook → Permitir 'y se remite al Email indicado Editado por moderación para insertar etiquetas al código y eliminar direcciones de correo... Agradezco aclarar las reglas. Remito a…

Macro se llama: Registro. Solicitar a través de un inputBox el ingreso de los registros de la Tabla hasta que el usuario decida no ingresar más registros. Usar estructura While...Wend. El disparador permite Repetir todas las instrucciones hasta que usuario desea no ingresar más datos, hasta que respuesta sea: No → Disparador toma el valor de 0 y sale del ciclo repetitivo While Módulo 1: Sub Registro() disparador = 1 While disparador = 1 [A1048576].End(xlUp).Activate Fila = ActiveCell.Row + 1 Nombre = InputBox("Ingrese el nombre:") País = InputBox("Ingrese el País de origen " &amp; Nombre) Ciudad = InputBox("Ingrese la Ciudad de procedencia " &amp; Nombre) T…

Hola pues la verdad nunca había tocado un "ListView" y me dio curiosidad y pues e terminado creando como dice el titulo un Explorador de archivos con 2 ListView, en si no es nada del otro mundo el 1° ListView es para ver los archivos con algunos iconos dependiendo de la extención y el 2° es para agregar carpetas a "Favoritos" para acceder a ellas rápidamente. Si das doble Click sobre el archivo este se abre, o y ademas tiene un buscador. Se deriva de este otro aporte que ya había compartido https://www.ayudaexcel.com/foro/ideas-aportes-64/organizador-archivos-por-carpetas-categorias-31876/ Como dije este archivo lo hice para experimentar con este control que por cierto …

Voy a tratar de ser lo mas claro posible. Supongamos que en nuestro trabajo estamos conectados a una red local y hemos realizado un archivo con macros para varios compañeros (el mismo para todos), resulta que encontramos un error en nuestro código y debemos empezar a actualizar cada uno de los archivos a nuestros compañeros, esto tomara algo de tiempo y tal vez a alguno no podamos actualizarlo porque no esta o etc, el departamento va a quedar con diferentes versiones del archivo. Con el código que les facilito podemos actualizar todos los archivos de nuestros compañeros automáticamente sin necesidad de nosotros intervenir ya que solo debemos crear un archivo txt con el…

Hola a todos! Esta vez mi aporte va enfocado al tipo de usuario que existe sobre el uso y manejo de Excel, el contenido a continuacion fue tomado del blog de un gran usuario de Excel JLD Excel en Castellano Espero puedan sacar conclusiones y comentarios constructivos... Saludos desde Honduras:)

Me gustaria aportar un vídeo para aquellos que se estan iniciando en Excel. Os dejo un vídeo de Youtube donde se resuelve un ejercicio que consiste en una pequeña factura. Espero que os sea de utilidad.

Explicación: Comentarios en Gráfica Calificar_Tipo_de_Empresa.rar

Sencillo, pero puede ser útil Código_de _Barras.rar

Obedece a una segunda solución que dí en Macros Los pasos están explicados Gráfica Sumar números.rar

Al darle solución en Macros, lo paso ya solucionado a este campo de Ideas y aportes Le dí solución al darle a todas las agujas de los 6 velocímetros el mismo nombre: Gráfico 5 Añadí al final el siguiente código en Módulo 1: Range("Datos!E2") = Range("Datos!D2") Range("Datos!E4") = Range("Datos!D4") Range("Datos!E6") = Range("Datos!D6") Range("Datos!E8") = Range("Datos!D8") Range("Datos!E10") = Range("Datos!D10") Range("Datos!E12") = Range("Datos!D12") Funciona perfectamente para cualquier datos a cambiar en la Hoja: Matriz evaluación Alternativas Solucionado 6 Alternativas producto con Velocímetros.rar

Hola "pipol": En vísperas de la fiesta mas señalada después de Navidad, os dejo un cronómetro en milésimas. Paz, amor, salud y libertad. . Timer.xls