Hola que tal amigos, después de haber creado un sistema de inventarios automatizado con programación VBA, y claro con la ayuda de usuarios de este y otros foros.Me di a la tarea de crear otro sistema, pero a diferencia del primero lo quise crear sin macros.Espero les guste, más adelante subiré el archivo que contiene macros para que toda la comunidad pueda usarlo.Reciban un gran saludo amigos. P.D: Dejo archivo anexo en skydrive, por motivos de exceso de Kb. https://onedrive.live.com/?cid=da5587c9508bd4f0#cid=DA5587C9508BD4F0&id=DA5587C9508BD4F0%21239

Hola a todos Tiempo sin tener mucha actividad en esta comunidad. Sin embargo, la he visitado con frecuencia para no perderme de nada. Gracias Dios estoy de vacaciones y espero descansar para el nuevo año. No obstante, estaré presente para aportar, preguntar, ayudar en lo que pueda. En esta oportunidad les dejaré un pequeño ejercicio de acumulado en Excel en un vídeo que realicé. Cualquier novedad con la calidad de la imagen me avisan. De todos modos es mi primer vídeo y no conozco mucho el como hacerlo pero me orienté mucho y gracias al amigo [uSER=143023]@Riddle[/uSER] que me dijo cual programa usaba. Saludos.

Macro Antonio propuso explorar los archivos de directorios y subdirectorios con macros, como es su costumbre: [DBOX]https://www.ayudaexcel.com/foro/ideas-aportes-64/explorar-directorios-sus-subdirectorios-busqueda-archivos-hipervinculos-26455/[/DBOX] Yo me he propuesto explorar los primeros 256 archivos de un directorio sin escribir ninguna macro, con la ayuda de una vieja función de las macros de Excel 4.0: ARCHIVOS(directorio_en_texto) - FILES(directory_text) Introduce los datos de búsqueda en las celdas: C1 - Directorio de búsqueda. C2 - Nombre de los archivos, con * para todos los caracteres y ? para un carácter. C3 - Tipo de archivos, con * para todos los …

Que tal Excelianos Para que se relajen (cuando algo en Excel no los deje avanzar jeje:confused:) les recomiendo este enlace que espero lo disfruten, estan a mi gusto, buenisimos! Trivias en Excel;) Algo muy importante sigan ese post hasta el final... Saludos a todos y que esten bien

Como continuación al vídeo anterior, en este, mostramos tres ejemplos de como utilizar la "voz" con Excel mediante Application.Speech.Speak. Muy útil en algunos casos, sobre todos en aquellos para facilitar el acceso a nuestras hojas de cálculo a personas con discapacidad visual.

El Semáforo cambia de color para el siguiente rango: Verde: >= 66% Ámbar >=33% Rojo > 33% Explicaciones en archivo Link del archivo: Dropbox - Velocímetro con Semáforo incorporado.rar

Hola pueblo: A ver si hay suerte y vamos eliminando las consultas sobre el tema, ya que van apareciendo sistemáticamente en el foro. Se trata de un formulario que es capaz de crear un pdf con la hoja activa, seleccionando que páginas queremos. También es capaz de seleccionar un archivo, el creado por el propio formulario o cualquier otro, y enviarlo por correo (Outlook), a uno o varios destinatarios, ya sea informados manualmente o seleccionados de la lista de contactos de Outlook. Espero que os guste. Paz y amor Crear PDF + enviar por email.rar Crear PDF + enviar por email.zip

En este vídeo vemos como utilizar, con código VBA, las herramientas más básicas de Excel como son el copiar, cortar y pegar. Un consejo: "Aprende VBA, ¡no te arrepentirás!"

Hola compañeros: Este aporte se trata sobre una macro que realiza el filtro de datos que contienen letras con tildes. Esto nació de un aporte que hice a un usuario del foro. Le dan clic al botón Filtrar y pueden ver el resultado Saludos filtros_multiples_tildes.zip

En este vídeo vemos un ejemplo de lo poderosa que es la técnica denominada Web Scraping. ¿La conocías? Un consejo: "Aprende VBA, ¡no te arrepentirás!" Saludos. José Santos

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

Hola, dejo aquí un ejemplo de como crear juegos de cartas ,tanto de la baraja Española como la Inglesa(Poker) . En el documento hay cuatro hojas en donde detallo por separado como crear la carta mediante un objeto Shape, después esta en ustedes programar el resto juego, vale decir esto es solo una herramienta para facilitar la parte gráfica. En la hoja1 esta la baraja de poker, en la hoja2 la baraja Española en la hoja3 y aqui quiero resaltar algo muy interesante un truco de como arrastrar un shape/Imagen con el mouse teniendo la hoja bloqueada y que no aparezca seleccionado. y por ultimo en la hoja4 un ejemplo de como crear una animación de mover la carta como si se …

Que tal amigos del foro, aquí les dejo la función de Numero a texto por si a alguien le interesa y esperando no este repetido este tema,.. saludos Option Explicit Dim cTexto As String 'Variable para las funciones Public Function Numletras(ByVal Numero As Double, ByVal Mayusculas As Integer) As String Dim NumTmp As String Dim c01 As Integer Dim c02 As Integer Dim pos As Integer Dim dig As Integer Dim cen As Integer Dim dec As Integer Dim uni As Integer Dim letra1 As String Dim letra2 As String Dim letra3 As String Dim Leyenda As String Dim Leyenda1 As String Dim TFNumero As String If Numero < 0 Then Numero = Abs(Numero) NumTmp = …

Buenas tardes con todos: En esta oportunidad les comparto una funcion udf la cual concatena varias celdas para formar una sentencia para SQL Server llamada Insert Into. Los funcion tiene la siguiente sintaxis: =GenerarSQL(Rango, Tabla) Rango: Rango de celdas que contienen datos la cual representara los valores de un campo. Tabla: Nombre de la tabla a la cual se le insertaran los registros. Luego que se haya generado la sentencia se puede pegar en el analizador de consulta del SQL y ejecutarlo. Espero me haya dejado entender. En este enlace pueden encontrarlo mas detallado. Saludos Funcion_Para_Generar_Sentencia_Insert_Into_SQL_Server.xls

Hola Sirve para mostrar la ayuda de nuestras macros o UDF, o sea la descripcion de su funcionamiento como tambien de cada argumento Para poder mostrar un ejemplo realice una UDF Columna de numeros a letras Espero que sea de utilidad PD: solo funciona a partir de 2010 Saludos Mostrar ayuda en UDF.zip

En este, interesante, vídeo vemos como utilizar la voz en Excel, pero esta vez, en inglés. Para ver todo los que se puede hacer con el Application.Speech.Speak, imprescindible ver los vídeos:

Hola: Respondiendo a este post: https://www.ayudaexcel.com/foro/threads/renombrar-archivo-word-con-macro-titulo-en-la-primera-linea.36187/#post-175982 Sub GrabarApdf() Dim titulo As Variant Dim intLineas As Integer Selection.HomeKey wdStory intLineas = Selection.HomeKey & Selection.EndKey For i = 0 To intLineas Set titulo = ActiveDocument.Range(Start:=0, End:=i) Next i titulo = Replace(titulo, Chr(13), "") ActiveDocument.ExportAsFixedFormat OutputFileName:= _ ActiveDocument.Path & "\" & titulo & ".pdf", ExportFormat:= _ wdExportFormatPDF, OpenAfterExport:=True, OptimizeFor:= _ …

Pues lo mismo que esto, https://www.ayudaexcel.com/foro/threads/constructor-de-formulas-si-con-el-operador-logico-o.39562/ , pero con Y en lugar de O. IF Generator AND.xls

Hola: En el adjunto encontrareis un formulario que os permitirá realizar filtros en cualquier columna de cualquier hoja. Hasta aquí, ya lo hace Excel y seguramente mejor. Lo que yo propongo es filtrar por partes del contenido de la celda, o sea, de tal posición a tal posición. Aunque pocas, yo lo he necesitado alguna vez. Saludos. Filtro por partes.xls

Buenos días a todos. Me permito aportar un calendario "quasi perpétuo" para disfrute general. Los festivos considerados son los nacionales y los de Madrid (seguramente algunos han cambiado). Saludos cordiales Calendario Auto.xls

En la Hoja: Base de datos, en columna D: imágenes Pueden cambiar las Fotos, reemplazándolas, e ir reduciendo el tamaño, que no interfiera con las mini-gráficas. Cambiar en columna E, los nombres de las personas Se cambian los valores en últimos 12 meses (Columnas I a T). Cambiar en columna V los nombres de los Productos. No cambiar demás valores de columnas: En Hoja: Tablero, seleccionar en columna B cada Producto y se generaran los Resultados Ir la Link: Dropbox - Tablero Productos con Puntajes.rar

Hola buenas ¿Cómo han estado? Les dejo el siguiente enlace para ver un tutorial en donde se explica mediante el uso de algunas formulas de Excel como hacer un ranking en una lista de datos. Como hacer un ranking en Excel | Excellentias.com - Excel, Infovis & BI Magazine Espero sea de su utilidad. Saludos, JuanM

Copiar un libro sin fórmulas ¡ Ave ! Copiar la macro en un libro nuevo y ejecutar la macro. Sub GuardarComoLibroSinFórmulas() If Not Application.Dialogs([COLOR=#0000ff][B]xlDialogOpen[/B][/COLOR]).Show = False Then For Each hoja In Sheets hoja.Activate hoja.UsedRange.Value = hoja.UsedRange.Value Next Application.Dialogs([B][COLOR=#0000ff]xlDialogSaveAs[/COLOR][/B]).Show End If End Sub [/CODE] Solo para el libro activo, copiar la macro en un módulo y ejecutarla. [CODE]Sub GuardarComoLibroSinFórmulas() For Each hoja In Sheets hoja.Activate hoja.UsedRange.Value = hoja.UsedRange.Valu…

Buenas, les dejo la version en Excel del popular juego 2048, la idea es lograr sumar 2048 puntos sumando casillas contiguas de igual valor. el funcionamiento es mu fácil, presionan las flechas de dirección que estan en la hoja y se sumaran los valores iguales contiguos. tienen un botón para reinciar la partida, hay contador para el número de partida, para los movimientos por partida, movimientos totales, puntos actuales y mejor puntaje y la duración de la partida también se puede jugar con las teclas de dirección del teclado, para ello simplemente colocan SI en la celda R1 de la hoja Config, igualmente pueden cambiar el color de fondo de las casillas según su número, e…

. Hola a todos: Todos los que habeis usado un formulario VBA sabeis que existe la propiedad TabStop, que combinada con la propiedad TabIndes, nos permite navegar por los controles de entrada de datos y de acción (Buttons, checks y options), sin embargo esto no es posible hacerlo con loas controles ActiveX dibujados directamente en la hoja ya que no existen estas propiedades en dichos controles. Aquí os dejo un sistema de como facilitar la navegación entre controles de la hoja. En el adjunto en contrareis una plantilla con 6 TextBox, pero puede adaptarse fácilmente a cualquier nº de ellos. Funcionamiento: Tab o Enter o Down =Siguiente control (Por ejemplo del TextBox…