Hola a todos, después de un comentario y solicitud de ayuda para un tema, he estado trabajando en esto mismo, y además de dárselo al compañero que preguntó, deseo dejarlo aquí por si alguien más tiene niños pequeños y lo quiere, simplemente se trata de sumas con dos, tres, cuatro y cinco filas y una, dos o tres cifras y restas de una, dos y tres cifras, donde el niño tiene que poner el valor correcto, si no dará error y no le dejará continuar, y una vez terminadas haciendo click en un botón le cambiará a nuevas cuentas borrando las anteriores. Lo he estado probando y no he detectado errores, pero por favor si alguien detecta alguno, que lo comente para solucionarlo, ok? …

Hola amigos: Les dejo un aporte, es una hoja de cálculo que traduce números a letras, quiero saber si la idea podría funcionar para otros idiomas. Saludos desde Perú. Numeros a letras.rar

Hola a todos. Este post va en referencia a una pregunta que me hizo mi hijo el domingo pasado sobre que eran los números capicuas. Después de explicárselo, empece a pensar en Excel (vicio que ya tiene uno) y de como podría averiguar si un numero era capicua o no solamente con ponerlo en una celda. Bueno después de unas cuantas pruebas y comerme un poco la cabeza, di con una forma de hacerlo, seguramente no haya descubierto la polvora, pero me pareció interesante compartirlo. Lo que no se es si se podrá hacer sin uso de auxiliares. Un saludo amigos. Libro1.zip

Hola a todos: Os dejo un complemento para pegar un rango con formato condicional eliminando dicho formato, pero respetando los colores. Supongo que todo el mundo sabe instalar un complemento, pero por si acaso: Botón de Office\Opciones de Excel\Complementos\Ir a....\Examinar Seleccionar el complemento y pulsar Aceptar. Funcionamiento: Copiar el rango, con o sin formato condicional, no importa, Click derecho y pulsar sobre la opción " Pegar eliminando formato condicional". Si el rango copiado, contiene celdas con formato condicional y sin formato condicional, se producirá un error. Si el rango seleccionado no contiene celdas con formato condicional, se efectuará un…

Hola de nuevo: Mi constante labor de "evangelización macroniana" me ha llevado a este aporte. Después de analizar en profundidad las posibles causas por las que no se utilizan las macros, llegué a las siguientes conclusiones: 1) Pánico y desconocimiento del inglés. 2) Pánico a pulsar Alt+F11 y ver lo que pasa 3) Pánico a no ver la hoja Excel delante de los ojos 4) Pánico al uso de la grabadora de macros En fin, resumiendo todas las causas en una: PÁNICO Pues he intentado que ese pánico desaparezca, he desarrollado una nueva forma de escribir macros: . FórmulaExcel FórmulaExcel es un "lenguaje" que se escribe en la hoja, en ca…

Hola: A raíz de la respuesta a este post, se me ha ocurrido que podría ser interesante. https://www.ayudaexcel.com/foro/showthread.php?t=16247 En el adjunto encontrareis un formulario en el que destaca un control Web Browsser. En el visualizaremos los archivos .pdf escogidos de una lista (listview) seleccionada a través de un cuadro de dialogo para la elección de carpetas. Vereis que hay un botón, con el abrimos el cuadro de dialogo de selección de las carpetas. Se pueden escoger todas las que se necesiten. Una vez cerrado el cuadro de dialogo, aparecerán los .pdf en la lista. Con un doble-click en cualquiera de ellos, se visualizará en el control Web Browsser E…

Buenas noches, aqui os dejo un aporte de menu contextual, espero que les pueda servir de ayuda Saludos menú contextual personalizado.zip

Hola amado pueblo macroniano: Aquí os dejo una vez mas el producto de una aburrida tarde de domingo. Se trata de una barra de herramientas en los que he utilizado un control Toolbar y un control ImageList. También puede ser interesante como mover el formulario y como cambiar el puntero del raton a medida que nos desplazamos por el control Toolbar. Saludos a to2, to2. PD. Se me olvidó decir que este aporte, está basado en uno anterior de p@li. A cada uno lo suyo. Toolbar flotante.zip

Buenas tardes , aqui os dejo una pequeña utilidad para poder añadir caracteres a una cadena tanto por delante como por detras, a traves de un formulario. Su funcionamiento es muy simple los caracteres que se pongan en cualquiera de los textbox, os saldran previamente en el frame de resultado y aceptar y se coloca en la celda activa. Espero que ayude, gracias añadir antesdespues.zip

Subo adjunto con el que he pasado las horas porque quiero saber, de un vistazo, a qué horas se levantan y se acuestan mis amigos, en particular los amigos del foro. Lo que me ha costado unas horas más es conseguir meter un fichero de 6 megas en un zip de menos de 97.7 KB. Al final ocupa 78.4 KB a base de crear dinámicamente los relojes, las ciudades y conectarse a Internet para descargar el mapa mundial. Tengo que dar las gracias por la inspiración a George Lungu y su tutorial de cómo hacer un reloj analógico en Excel: En alguna hora de estas vacaciones explicaré en mi blog cómo lo hice. Felices Fiestas a tod@s. EDITADO: Adjunto 2ª versión del Mapa con reloj…

Aqui os dejo una pequeña utilidad para listar archivos, que encontre en el baul de los recuerdos, funciona con excel 2010. Espero que os sirva de utilidad Un saludo. listar archivos.zip

Hola Si! podra ser algo contradictorio el titulo del tema, pero es algo asi:) Suponiendo que somos digitadores de algun inventario y que ciertos codigos/numeros (de materia prima o prendas terminadas o lo que sea...), comienzan con el mismo caracter o caracteres, pues bien elabore (se me ocurrio) esta pequeña macro de evento para que puedan probarla y pues hacer cambios a conveniencia y uso Se puede usar en todo el libro o una hoja en especifico Para todo un libro Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) On Error Resume Next 'If Target.Column = 3 Then If Not Intersect(Target, Range("A3:A12")) Is Nothing Then If VBA.Is…

Para conocer el estado de los proyectos o anteproyectos se necesita una Hoja de Firmas que indique quién y cuándo ha firmado cada uno de los hitos. Adjunto Hoja de Firmas, sin macros ni VBA, con la siguiente fórmula iterativa en la celda C8: =SI(C9="";"";SI(Y(B8<>"";C8="";C9<>"");AHORA();C8))[/CODE] Para que funcionen estas fórmulas, con cálculo circular, en [b]Opciones de Excel[/b], en la ficha de [b]Fórmulas[/b] marca la casilla [b]Habilitar calculo iterativo[/b] y en [b]Iteraciones máximas[/b] pon al menos un 1. Esta hoja puede servir de ejemplo para guardar las fechas de cambio de estado de cualquier evento, mediante una marca, que en este caso es l…

Hola, Os dejo aqui un archivo auxiliar que hice por necesidad de crear una animacion de casilla en un programa de ajedrez que ando haciendo en C++, como ya esta terminada esa fase de animacion, lo iba a guardar en el baul y me acordé de vosotros, quizas os guste para tener mas flexibilidad a la hora de pintar del color que mas os interese el color de fondo de las celdas. Aqui la formula, donde Pix.R, Pix.G y Pix.B han de ser sustituidos por el valor ROJO, VERDE, AZUL que os interese en un rango entre 0 y 255, habrá otros metodos pero este es el mio: Dim P8 As Double: P8 = 2 ^ 8 'potencias de colores Dim P16 As Double: P16 = 2 ^ 16 'potencias de colores …

No se como se llamara en otros lugares,en mi zona se llama PORRA. Se trata de acertar los resultados de unos partidos de futbol elegidos de la liga. La formula es simple,nombre del jugador y goles en cada partido.Valor apuesta. Se seleccionan los equipos que van a jugar y por ultimo los resultados. Porra_3.rar

Esta es la versión para 2011 del Calendario Laboral y distribución de la Jornada anual. CALENDARIO LABORAL 2011.rar

He preparado un aporte a raíz de contestar a varios temas relacionados con la conversión de divisas, como: Adjunto un Conversor de Divisas sin macros ni VBA que consulta la página Web: Obteniendo cualquier cambio de divisas que seleccionemos (editando las celdas en amarillo) en tiempo real con la fecha y hora de sus últimas variaciones, con sólo habilitar las conexiones de datos. NOTA: El separador de decimales debe ser el punto (.) y el de miles la coma (,) como se explica en el Post #3 NUEVO ARCHIVO: ConversorDivisasPW2 puede usar también el separador de decimales coma (,) ConversorDivisasFinanzas.zip ConversorDivisasPW2.zip

Saludos compañeros de foro, aqui os dejo una pequeña solucion para poner superindices en una cadena por ejemplo cm3. La cadena que se ponga en a1 el ultimo caracter sera el superindice en cualquier celda activa, por cierto solo lo he probado con cadenas no con numeros pero seguire investigando Saludos CADENA.zip

Hola: Esta macro rellena/quita relleno, a las celdas con fórmula. También es un ejemplo de como aplicar SpecialCells. Sub AlternarResaltarFormulas(Kolor) On Error Resume Next If ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas).Interior.ColorIndex = Kolor Then ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas).Interior.ColorIndex = xlNone Else ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas).Interior.ColorIndex = Kolor End If MsgBox "Total celdas con fórmula: " & ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas).Cells.Count End Sub [/CODE] Podeis variar Kolor entre 0 y 55. Saludos. PD: Como he leído por ahí, a mi también se me están alinean…

Hola! Esto es un tanto más complicado, pero les será fácil entender la idea!!! Este ejemplo crea un menú inicial (MiMenuExcel) en cual tiene 2 opciones 1. Actualizar módulos - Dependiendo de los datos que se anexen en la Hoja1 en la columna A genera una macro para cada opción 2. Actualiza Menú - Esta lo que hace es crearte un botón en el menú por cada celda con datos en la columna A Lo importante de este ejemplo es que se agregan procedimientos y opciones en el menú dependiendo de las celdas con datos en la Hoja1 Algo importante, para poder ejecutar la primer opción en la seguridad de las macros en excel debe estar habilitada la opción de Acceso a Proyecto de VB ya …

Hola! Les dejo un aporte para importar datos de Access a Excel! Primedo deben de agregar la referencia "Microsoft ActiveX Data Object 2.8 Library" Esto es en la opción Referencias del menú Herramientas en VB. Sub importarDeAccess() 'Variables de la conección Dim miConn As ADODB.Connection Dim miRset As ADODB.Recordset Dim miBase, miSQL As String Dim miTabla As String Dim misCampos As Long Dim i As Long 'Colocar la ruta del archivo, en este caso la base 'Esta en la carpeta donde esta el archivo miBase = ThisWorkbook.Path & "\" & "db.mdb" 'Nombre de la tabla del archivo Access miTabla = "salarios_2003" 'Se crea y abre la conección Set miCon…

Hola! Les dejo un aporte que puede que les interese. Cuantas veces no he querido colocar en mi macro un formulario parametrizable por el usuario si que él pudiera ver dónde se guarda esa información, después de pensar un poco me dí cuenta que no era tan difícil. Este método sólo funcionaría si se guarda el libro como un complemento (xla), tal como el ejemplo que les anexo! La idea es guardar el parámetro en el complemento, en una hoja del mismo! En el ejemplo hay 2 macros que pueden ejecutarlas con Alt+F8 Configurar: Abre el Form para configuración generaRepeticiones: Genera las repeticiones en el libro abierto Lo que hace es generar repeticiones de una palabra de…

Aqui os envio una mejora de un progama de control de horas que me se soluciono un pequeño gran problema, espero que le pueda servir de referencia a los compañeros del foro. http://cid-63c27bca84f44fba.office.live.com/self.aspx/P%c3%bablico/choras.zip Gracias a todos por vuestra ayuda

Hola compañeros Aunque el tema está ya muy tocado, acompaño un archivo por si aporto algo que resulte útil. En él se recogen dos soluciones en función de que los sábados se consideren hábiles o inhábiles. Saludos EDITO: He suprimido en el encabezamiento de la columna K el texto: "hasta 31 de marzo" DÍAS HÁBILES. Más completo.zip

Hola Si eso, ocultar el menu y barras de excel (por el foro hay unos similares, pero no cae mal verlo de diferente forma:)) Espero que sirva... Saludos desde Honduras Ocultar Menu-Barras.zip