Hola, ante nada buenas tardes. Me comunico con ustedes para ver si me pueden ayudar. Cuento con una serie de libros de excel de gestion de resultados de futbol. los mismos cuentan con una macro auto open que actualiza los ultimos partidos del equipo correspondiente y lo indexa para ser tenido en cuenta en futuras estadisticas. El problema es que luego de "indexar" una serie de resultados al cabo de algunas semanas el archivo se corrompe, mostrando un error que dice "No se puede encontrar el proyecto o la biblioteca" generando que el excel se cierre. Por suerte tengo backup de todo, y les voy a dejar adjuntos en este mensaje 2 archivos iguales, nada mas que …

Qué tal, estoy teniendo problemas nuevamente queriendo copiar la misma hoja de diferentes archivos almacenados en una carpeta, lo que hace la macro es encontrar la última fila disponible para pegar la info del archivo 2, y así sucesivamente pero me aparece el error "1004" de que la hoja en la que quiero pegar el archivo no tiene el mismo número de celdas. Mi objetivo es hacer un archivo Master con la información de la primera hoja de todos los archivos dentro de la carpeta. Este es mi código: Sub MasterSTS() Dim Carpeta As String Dim Examinar As Object '-- Application.ScreenUpdating = False Application.DisplayAlerts = False Set Examinar = Application.FileDia…

En un trabajo anterior que me ayudo [uSER=188524]@Marco Antonio[/uSER], Control horas de vuelo pilotos, el cual es un gran trabajo, habia un control de horas de 45 en 15 dias y de 75 en un mes, he llenado estas hojas y no me sale mensaje o alerta o condicional de esta parte aunque en el codigo esta la parte de control 45 horas en 15 dias, este no ha operado, que hace falta?, adjunto el archivo final que subio Marco Antonio. Mil gracias de antemano HORAS_HELICOPTERO_MA_II.rar

modificar elementos de un listbox y que al mismo tiempo se modifique la fuente de ello(tabla de excel) hola a razon de mi antoguo tema que nadie me pudo o intento responder, tengo otra pregunta un poco mas razonable, tengo un form1 con un listbox y un boton, este listbox se autollena con los datos de una tabla,,, la pregunta es como puedo llenar ese listbox con los datos de esa tabla y una vez que se llene pueda modificarlos desde otro form2 con varios textbox(segun la cantidad de campos) y que me los muestre para poderlos modificar con un boton de aceptar ,,,obviamente con la accion del mismo boton modifcarlo tambien en la tabla, espero haberme dado a entender y puedan …

Hola, saludos a todos. Necesito ayuda (he empezado hace poco con VBA), quiero extraer el valor de la celda de una tabla que tiene en la fila superior nombres y en la columna izquierda numeros. Como ejemplo la imagen Busco la letra B1 y el numero 6 y me tiene que devolver el valor 48. Muchas gracia por vuestra ayuda.

Buen Día Amigos: Tengo la siguiente inquietud: existe algun macro para separar rangos numericos del tipo: "1-5, 7, 9-11 " si este estuviese en la celda A1 convertirla en la celda A2 en: 1,2,3,4,5,7,9,10,11 para que quede algo como la imagen adjunta. saludos [ATTACH]36372.vB[/ATTACH]

Estimados amigos del foro tengo dos formularios para una base de datos de preguntas. En el primer formulario selecciono las preguntas que al hacer click en el botón seleccionar aparecen en el segundo formulario. En este segundo pretendo usar el modo de selección único en el listbox pero deseo que al hacer click en cualquiera de las preguntas se vaya viendo las opciones y respuesta correcta en textbox. Actualmente las opciones están en listbox que cambian si uso un spinbutton pero eso es lo que deseo dejar de usar. Me gustaria usar solo textbox que cambia su contenido correspondiente al seleccionar en la pregunta en el listbox de arriba. Quedo muy agradecido por la co…

Como puedo hacer para que mi fila insertada se copien las formulas de la celda superior o inferior. Saludos, Selecciona propuesta.xls

Hola buenos dias estoy comenzando en la programacion de macros, pero aun no soy muy bueno por lo que trabajo con la opcion grabar de macro y en este caso la macro que grabe fue copiar el formato de una fila a otra lo cual me genero el siguiente codigo: Rows("6:6").Copy Rows("5:5").PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Application.CutCopyMode = False aunque cuando ejecuto la macro esta tiende a demorarse y he visto que es debido a esta parte de la grabacion, por lo cual me gustaria contar con su ayuda para poder hacer este codigo mas simple y que se ejecute mas rapido, gracias.

Hola a todxs, Me gustaría que los filtros automáticos aparecieran siempre que se activa la hoja, tal y como aparece en la imagen adjunta. Para ello, he desarrollado el siguiente evento: Private Sub Worksheet_Activate() With Sheets("Hoja1") .AutoFilterMode = False ' Desactivamos siempre los filtros automáticos... .Cells.AutoFilter End With End Sub Sin embargo, no me funciona, porque la primera vez se activan los filtros automáticos, pero a la siguiente no. Es casi como poner lo siguiente: Private Sub Worksheet_Activate() Sheets("Hoja1").Cells.AutoFilter End Sub Es decir, se quitan y se ponen cada vez que se acti…

Para introuducir datos que se vuelquen cada vez en la fila siguiente como debería retocar esta macro? Con el diseño actual solo se ponen en la primera fila y despues no puedo seguir añadiendo más información en las posteriores filas. El código está vinculado a un boton ACEPTAR de un formulario. ahí va el archivo adjunto con el formulario Gracias x adelantado. Borja STAR.rar STAR.rar

Buenas Tardes, mi consulta es la siguiente ,tengo una secuencia en macros para que realize una copia de una hoja en otro libro y la guarde en una determinada ruta, este me funciona perfectamente con el boton de Formulario, pero al realizar este mismo macros en un boton Activex me lanza un error de compilacion. Por favor su ayuda , no puedo subir el archivo porque es demasiado pesado , este es el macros... Sub Macro1() Application.ScreenUpdating = False Range("D8").Select Selection.Copy Sheets("Liquidacion").Select Range("F11").Select ActiveSheet.Paste Sheets("Detalle").Select Range("E8").Select Application.CutCopyMode = False …

Buenos días, he diseñado una plantilla de excel para recoger estadísticas en tiempo real sobre un partido de fútbol sala. He creado una macro para cronómetro general, es decir, se inicia con el partido y se finaliza cuando termina, pero necesito saber el tiempo que participa cada jugador en dicho partido en relación a ese crono. Sería que cada vez que el jugador entra a jugar se empiece a sumar en su cuenta personal, cuando sale se pause el crono y se active cuando vuelva a entrar. Los cambios son ilimitados. tengo 3 "BOTONES" 1"TITULAR". Debe recoger el tiempo del jugador desde que se inicia el partido. 2"ENTRA". Debe registrar el tiempo del jugador …

Hola alguien me puede ayudar con esta fórmula en vba.. intento que la columna Ade la página 1, se devuelva a la página 2, columna A2. Básicamente así es como lo intento hacer. Set myrng = sheets ("página1").range ("a:a") Ser este = sheets ("pagina2").range ("A2") Myrng.advancedfilter actiom:= xlfilyercopy, _ Criteriarange:=myrng, copytorange:=rstd, Unique := true El problema con esto es que me devuelve el título de la página A y solo quiero el resultado.. alguien me puede por favor corregir?

buenas a todos, otra vez... en el negocio de mi mujer su sistema de cobros, me genera un archivo con la fecha y la hora con todas las ventas de la historia. pregunta yo separo las ventas x mes, a mano, pero me gustaria saber las ventas diarias hay alguna manera de usar la funcion SUMA, que me pueda dar esta opcion y no tener que hacerlo a mano? adjunto excel como siempre gracias a todos Libro1.xls

Adjunto un archivo zip con un formulario vba basico para enviar mail desde excel desde mi cuenta de gmail. En el botón "enviar" del formulario no sé como modificar el codigo de la macro para insertar una línea de código para permitir enviar archivos adjuntos. La idea es utilizarlo desde excel, no de otros programas predeterminados como outlook Con la macro actual sólo puedo enviar mails sencillos ¿Alguien puede ayudarme? Gracias por adelantado. Borja enviar email.zip

Buenas tardes. Gracias de antemano por la ayuda. Os explico mi problema. En la hoja 4 (Datos 2), quiero poner un pequeño buscador, lo más simple posible. He insertado un cuadro de texto de ActiveX con lo siguiente (llamado BuscadorPrueba); Private Sub BuscadorPrueba_Change() Dim DatoConsultado As String If Hoja4.BuscadorPrueba.Value <> "" Then DatoConsultado = "*" & Hoja4.BuscadorPrueba.Value & "*" Range("C10").CurrentRegion.AutoFilter Field:=1, Criteria1:=DatoConsultado Else DatoConsultado = "" Range("C10").CurrentRegion.AutoFilter End If End Sub No necesit…

Hola, estoy buscando generar una macro con la cual pueda hacer que las celdas tengan un criterio de 34 días en los cuales si no se cumplen los pagos dentro de esos 34 días, automáticamente las celdas cambien de color y de nombre, digamos que al pasar los 34 días días, cambiará a color rojo con el nombre de celda F, si esta cumpliendo los pagos dentro del tiempo deberá estar en color verde con el nombre de celda P. Agradezco de antemano su apoyo, porque en verdad que no sé bien cómo lograrlo, soy muy nueva manejando macros.

Buenas noches, Colegas. Espero se encuentren bien de salud. Antes que todo disculparme por estar ausente todo este tiempo, pero a mi amigo, el cual uso su ordenador, se volvió a romper y todo parece indicar que es un problema con la Board y eso por acá está a un precio de alrededor de $ 50 000.00 pesos cubanos, o sea, inalcanzable y un vecino que comenzó un negocio me pidió que le ayudara con algo para llevar sus inventarios y cuentas y me prestó su LapTop (muy vieja, lenta y con teclas que no funcionan) y en eso estoy. También los apagones por acá son de más de 12 horas al día todos los días y se hace muy difícil de trabajar, entre otras cosas. Voy al tema; en …

Hola Como se puede hacer en esta macro para que me avise que ya existe el documento y que si lo quiero grabar With Application.FileDialog(msoFileDialogFolderPicker) .InitialFileName = Application.DefaultFilePath & " \ " .Title = "PROYECTADOS SEIXO - Seleccionar carpeta" .Show If .SelectedItems.Count = 0 Then Else Ruta = .SelectedItems(1) MsgBox "Guardando en PDF Factura '" & NumFactura & "'. Presione Aceptar para continuar...", _ vbInformation, "PROYECTADOS SEIXO" …

Hola buenos días, Todavía soy novato con las macros, os comento para ver si me podéis ayudar. Lo que quiero conseguir es mostrar una imagen, que se pueda quitar dando en aceptar, desde una lista. Por ejemplo en la fila C si escojo de la lista "2x2" me tiene que enseñar la imagen "2x2" si escojo "2x3" que me muestre la imagen"2x3". Adjunto el Excel y las imágenes. Muchas gracias por vuestra ayuda Libro1.xlsx

hola buen día se me olvido mencionar un tema en el foro anterior que me puede ayudar a resolver el inconveniente pero no se como hacerlo enserio agradeceria mucho la ayuda deseo programar una macro en excel para hacer el siguiente ejercicio: Hoja 1: [TABLE=class: cms_table_grid, width: 500] [TR] [TD][/TD] [TD]fecha[/TD] [TD]cola[/TD] [TD]colb[/TD] [TD]colc[/TD] [/TR] [TR] [TD]fila1[/TD] [TD]01/ene/2013[/TD] [TD]a[/TD] [TD]1[/TD] [TD]1[/TD] [/TR] [TR] [TD]fila2[/TD] [TD]01/ene/2013[/TD] [TD]b[/TD] [TD]1[/TD] [TD]0[/TD] [/TR] [TR] [TD]fila3[/TD] [TD]01/ene/2013[/TD] [TD]c[/TD] [TD]1[/TD] [TD]1[/TD] [/TR] [TR] [TD]fila4[/TD] [TD]01/ene/2…

Hola ¿cómo estáis? ¿Alguien sabe si es posible deshabilitar este botón mediante una macro o con el editor de UI? ¡Gracias!

Hola a todos! buenas tardes:) Les propongo una consulta para ver si me pudieran echar una mano He creado una tabla dinámica a partir de una hoja llamada ventas, pero necesito al mismo tiempo una dos columnas de la hoja Costes, en principio los nombres coinciden entre ellos para que la tabla los encuentre automáticamente de este modo coloque los datos de la casilla coste automáticamente en la fila del producto correspondiente. En segundo lugar me gustaría saber si es posible crear un botón o que la tabla dinámica se me actualice automaticamente cada vez que se añada una nueva venta que muy probablemente estará fuera del rango inicial de la misma. Muchas Gracias una v…

disculpen amigos un macro que me arroje la diferencia de dos o mas carpetas que tienen 2 o mas archivos iguales, de hecho lo vi en un ejemplo del señor macro antonio, un comparativo de todos los archivos faltantes o iguales ? gracias.