Hola a todos; me he topado con una pagina, que nuestros senseis del vba podran sacarle partida, eso claro, si no la conocen , espero que no he visto cosas muy apañadas. AJP Excel Information AJP Excel Information - Clocks la conociais? Un Saludo. Jose Maria.

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…

Estimados, hoy aprendí un poco de selecciones multiples aqui les dejo algo aprendido,, talves esto pueda evolucionar en algo.. saludos, multiples selecciones..rar

Saludos a todos. Me e topado con el inconveniente de utilizar el formulario de calendario que utiliza vba, ya que no todos tienen instalado este control y no saben como instalarlo o tienen problemas para instalarlo al menos yo era uno de ellos, buscando hace algun tiempo en la red me tope con esta magnifica opcion a esta problematica lo comparto con ustedes esperando les sirva en algo. Atte. joshua Calendario.zip

Hola people: Aquí os dejo un cálculo sencillo de nómina adaptado al quehacer español. Si alguién demuestra algo de entusiasmo igual le añado lo que falta. Paz y amor Nómina simple.xls

Hola compañeros Como por estos lares se aproximan fechas vacacionales, será bueno conocer a priori un presupuesto aproximado de los gastos que vamos a afrontar. Así que me hice este programilla que comparto con todos. Está hecho un poco "a mi medida", pero puede servir de pauta para que cada uno le añada sus preferencias. Un cordial saludo Vacaciones.zip

Hola a todos amigos exceleros: En esta oportunidad les comparto una aplicación en vba la cual va a transformar parte de una información que se encuentra de manera horizontal a vertical. No supe que nombre ponerle, me la pase pensando todo el dia. Pero bueno para que entiendan mejor de que se trata les comparto el videotutorial. También adjunto el archivo Saludos Transformar_data.zip

Este es mi primer pequeño aporte, de una solución que necesitaba por la que llegué a este foro. Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo ErrorTarget If Target.Cells.Count > 1 Then Target.Interior.Color = xlNone Target.ClearComments Exit Sub End If If Target.Value = "" Then Target.Interior.Color = xlNone Target.ClearComments Exit Sub End If If Intersect([A1:P10000], Target) Is Nothing Then Exit Sub For r = 2 To 10 If Target.Value = Sheets("Codigo").Cells(r, 1).Value Then Target.Interior.Color = RGB(192, 192, 192) …

Hola a todos, Pues esta vez tengo un aporte simple pero muy útil, adjunto un ejemplo de como podemos decirle a excel que al presionar alguna tecla realice una acción determinada, por ejemplo podemos decirle que al presionar la tecla "F2" abra un formulario o con "F1" ejecute una macro, hasta podemos decirle que si presionamos la "A" no haga nada, etc. Dejo un ejemplo de lo hablo, el código esta en ThisWorkbook y el Modulo1. Saludos Configurar teclado.zip

Hola: Seguramente si hiciéramos un inventario de consultas, este sería uno de los temas estrella: Como actualizar una hoja a partir de información entrada mediante TextBox desde un formulario. Normalmente se plantean dos preguntas: ¿ Como obtener la primera fila disponible ? ¿ Como tratar los TextBox como si fueran uno solo (Array) ? En el adjunto encontrareis una función que es capaz de de contestar a esas preguntas con una sola línea de código. Solo requiere una sencilla norma a la hora de darle nombre a los TextBox, que tengan un prefijo común y a continuación el Nº de la columna a actualizar. En el ejemplo del adjunto se actualizan 10 columnas, pero pueden se…

Hola: Ni el mismísimo profesor Franz de Copenhague inventaría semejante engendro. Aquí os dejo un "History sheet navigator", lo pongo en inglés para que Germán tenga que buscar en el diccionario...jejeje. Salu2 a to2 to2 Sheet Navigator.zip

Os traigo todas las commandbars y sus ids para poder implementarlo en nuestras macros cuando sea necesario. Un Saludo FernandoML Pruebas.rar

Hola: Se me ha ocurrido que a lo mejor le interesa a alguien este formulario que subo. El formulario, permite imprime las hojas de un libro a dos caras. El procedimiento de impresión es el siguiente, se imprimen primero las hojas que ocupan un lugar impar en la colección Worksheets, de menor a mayor, luego, y una vez finalizada esta impresión, debe procederse a girar, en bloque, las páginas impresas, luego se imprimen las páginas que ocupan un lugar par en la colección Worksheets, de mayor a menor. Ejemplo 11 hojas: Se imprimen las hojas 1,3,5,7 y 9 giramos en bloque las 5 hojas impresas Luego se imprimen las hojas 10,8,6,4,2 y en último lugar la hoja 11 Limitació…

Saludos a todos! Por alguna razón, pensé que este aporte ya lo había compartido en el foro, pero dado que estaba equivocado, lo comparto con ustedes Sin mas que detallar, en el archivo van incluidos los tres métodos, por favor tomar en cuenta a la hora de probarlo en sus archivos originales, si la BD es muy extensa, tener mucha precaución (se puede congelar Excel) Sin ninguna duda el método por el cual he apostado es el primero, los otros dos son son para mostrar las diferentes formas de hacer lo mismo, pero no con la misma eficiencia Según mis pruebas los he jerarquizado asi: Super Mega Eliminador Filas Super Eliminador Filas Eliminador Filas Cualquier d…

Hola. Es la primera vez que escribo en esta sección del foro, lo hago ahora porque he visto varias respuestas de Gerson (al cual estoy muy agradecido por todo lo que se aprende de él) en el foro con el uso de la función indice usada como referencia, y me ha picado la curiosidad. Me he puesto a buscar un poco de información sobre esta funcion y tiene dos formas: matricial y de referencia. La matricial la conocía, la otra no. Me he permitido hacer un pequeño ejemplo con su ultimo uso, espero se entienda y sobre todo que vaya bien encaminado. Un saludo a todos. rango dinamico con funcion indice.zip

Buenas con todos: He creado una manera sencilla mediante una funcion UDF la cantidad de dias que tiene un año. De seguro hay muchas maneras mas sencillas de realizarlo. Lo primero que vamos a hacer sera... Crear un modulo y pegar el siguiente codigo Public Function DiasAño(Anio As Integer) As Integer If IsNumeric(Anio) And Anio > 0 Then DiasAño = DateDiff("d", "01/01/" & Anio, "31/12/" & Anio) + 1 End If End Function [/CODE] Luego en una celda de excel poner la funcion =DiasAño(2015) Espero les haya sido de utilidad, y los comentarios para alguna mejora seran bienvenidos. Saludos DiasAño.zip

Algunos programadores siempre están buscando la manera más óptima de crear código VBA el cual haga uso de los recursos de manera más eficiente (como la memoria, almacenamiento en disco duro) y a su vez se ejecute en el menor tiempo posible (uso de CPU). Lo más habitual es estimar cuanto tiempo le tomara a nuestro script ejecutarse y para ello hacemos una comparativa en el proceso de ejecución del programa, para ello muchos se valen de las dos siguientes técnicas: Uso de la función NOW Uso de la función Timer En la primera ya muchos conocen la función Now la cual devuelve la fecha y hora actuales, la cual se podría usar de la siguiente forma: El resto del ar…

Hola Depende de si estás hablando de combinaciones o permutaciones con o sin repetición. Te pongo el ejemplo más sencillo, permutaciones con repetición, tomando la serie 3x5x3x5x3x5=3375 posibles permutaciones, es como contar normal y corriente solo que el tope no es siempre 10. Sub PermutacionesRepeticion() Dim a As Integer, b As Integer, c As Integer, d As Integer, e As Integer, f As Integer Dim Fila As Long, Palabra As String Dim Consonante(1 To 3) As String, Vocal(1 To 5) As String Consonante(1) = "k" Consonante(2) = "g" Consonante(3) = "l" Vocal(1) = "a" Vocal(2) = "e" Vocal(3) = "i" Vocal(4) = "o" Vocal(5) =…

Hola a todos aqui adjunto un archivo espero les sirva de algo como el mismo nombre lo dice Angenda y Control de Vacaciones saludos..... Agenda y control de vacaciones.xls

Estimados amigos por recomendación de Gerson me he encontrado con el uso de range para aplicar en varias necesidades, subo el archivo en el cual seleccione los códigos y algo de las explicaciones encontradas, para quienes les sea útil. USO de Range.rar

Siempre estoy buscando nuevas maneras de ampliar las posibilidades con VBA, ya sea combinándolo con otros lenguajes o herramientas, y en mi búsqueda he dado con una maravilla que será de gran ayuda en lo que deseo y estoy seguro que para muchos otro también. Había visto desde crear dll’s en visual studio, complementos como ExcelDNA, entre otras, pero esta última se me hace más práctica y con mayores posibilidades. ¡Hola, chicos del scripting! Ahí se muestra como poder acceder a las estructuras de datos que brinda el .Net Framework lo cual supone nuevas posibilidades en el desarrollo desde VBA, el único inconveniente a primera vista es que hay que contar con el .Net Fram…

hola amigos despues de mucho tiempo vuelvo a subir este pequeño aporte que les puede servir a profesores o estudiantes solo deben digitar en "desde" el numero de la tabla inicial y en hasta el numero de la tabla final, finalmente ingresan el tamaño de la tabla (hasta donde se quiere multiplicar) por ejemplo si en "desde" ingreso 2, en "hasta" 9 y en "fin tabla" 12 se generaran las tablas del 2 al 9 multiplicadas hasta el 12. espero se entienda, dudas solo pregunten saludos desde santiago de Chile Tablas.rar

Hi: Lo que se intenta resolver, es que si estás dentro de una celda tecleando texto, no hay una manera de ejecutar una macro. No obstante, podemos recurrir a un procedimiento alternativo, en lugar de teclear en la celda, teclear en un textbox. Abrir el adjunto y pulsar ESC, vereis que aparece un textbox resaltado en azul sobre la celda activa, listo para introducir información. A medida que introducimos información, la celda activa se va actualizando. Ahí ya tendríamos un punto por donde "colarnos", ya que cada carácter introducido en el textbox desencadena el evento Worksheet_Change. No obstante, aprovechando el evento TextBox1_KeyDown del textbox, he habilitado la…

Estimados Excelianos: Les dejo esta macro que te adivina cualquier fecha (dia-mes) que estés pensando solo sigue las instrucciones y listo posteen si les adivinó la fecha que estaban pensando. Te adivina: Fechas de cumpleaños Fechas de aniversario Fechas de matrimonio etc.etc. saludos desde Chile. Adivina fechas.zip

Hola a todos,... si,si, a ti también: "Pos" os dejo un formulario que permite comparar que archivos hay en dos directorios. (No incluye los subdirectorios). Permite añadir los archivos de un directorio que no estén en el otro y sustituir los de fecha mas reciente. A ver si os gusta, y si no os gusta, pues,......mejor no digo lo que pienso :D Saludos a todos,.....bueno, pues a ti esta vez, no. Folder utility.xls