Estimados. Ha sido muy fructifero haber encontrado este foro, por lo que vuelvo a las consultas. Resulta que estoy programando una macro que consiste hacer un filtro de una cantidad grande de datos, seleccionar solo algunos, copiar y pegarlos en otra hoja. Ahora bien, he logrado el codigo para filtrar un arreglo de datos a partir de una tabla que tiene los nombres o id a buscar: nf = numerofilas 'obtener arreglo de nombres de cellid CELLID_Array = Range("C2:C" & (nf - 1)) 'selecciona planilla de CNA Windows("Libro_Muchosdatos.xlsx").Activate 'selecciona de CNA los cellid a modificar de planilla CNA ActiveSheet.ListObjects(…

Buenas tardes a todos: Utilizo actualmente la funcion "SI" de comparación lógica y me obliga a escribir y llenarme de formulas. Estoy seguro que se puede mejorar esto con VBA pero soy totalmente inexperto, más aún tratándose de eventos. Desde ya, agradezco cualquier ayuda ó consejo que puedan darme. Rubén NumeracionAutoincrementada.xlsx

Hola, he estado buscando alguna macro que me ayude a hacer una conciliacion rapida por lo tedioso que es y no he encontrado nada bueno.... Encontre este archivo que adjunto que esta buena pero mal hecha, los resultados que lanza no son correctos. Alguna ayuda.. Macro-excel-Conciliacion-Bancaria-2013.zip

Hola a todos! como estan? Nuevamente yo aqui, construyendo otro proyecto y trabada hace varios dias en un punto de un userform En mi userform1 cuando se inicia me muestra la multipage index 0, la cual me busca en una base de datos colaboradores y volunntarios. Logre que los combobox de arriba, se carguen con valores unicos obtenidos de la tabla que esta en la Hoja2. Lo que no se como hacer, es que cada combobox me funcione como un filtro... por ejemplo si elijo el cBoxPais= Argentina, que el cBoxProvincia me traiga en la tabla todos los registros en provincias que sean de argentina o lo mismo con los otros combobox. no se si esta es la forma con…

Hola, Tengo una duda con Excel que no sé cómo resolver, y aunque llevo varios días buscando por internet, no encuentro la solución, espero que alguien pueda ayudarme. Tengo un libro de Excel con los datos de nuestros clientes (nombre, dirección, código postal y población) y tengo varios libros donde tengo que rellenar los datos de cliente. Quiero saber cómo puedo automatizar este proceso, ya que tengo muchísimos clientes y quiero saber cómo rellenar estos datos sin tener que teclearlos cada vez. Me han comentado que se podría hacer con una macro, pero yo no tengo ni idea de macros. Lo único que he conseguido es crear una lista desplegable por cada campo, una para nomb…

Hola compañeros, Cuál es el método que me permite quitar la ventana de alerta al cerrar un libro (ver imagen adjunta)? Estoy probando con este código, pero no me funciona... guardar = MsgBox(Prompt:="Gracias por usar la aplicación ofimática, " & tbNombre & "." & vbCr & _ "¿Desea guardar los cambios antes de salir?", _ Buttons:=vbYesNo + vbCritical, _ Title:=" SALIR DE LA APLICACION OFIMATICA") If guardar = vbYes Then ActiveWorkbook.Save Else Application.DisplayAlerts = False ' No mostramos la ventana de alerta para guardar manualmente l…

Buen dia Deseo me ayude alguien con una macro siguiente: Deseo que me guarde los adjuntos de un correo de outlook guardado en una carpeta (archivos .msg en carpeta en mi pc) y los guarde en otra carpeta sus archivos adjuntos (pdf y XML), sin tener que estar abriendo uno por uno. Agradezco su ayuda, ya que me marca el siguiente error "User-Defined type not defined" y no entiendo porque. Sub SaveMSGAttachments() Dim olItem As MailItem Dim SH As Object Dim msgFolder Dim saveFolder Dim strFilesFldr As String Dim strSaveFldr As String Dim objAtt As Outlook.Attachment Dim strFilename As String On Error GoTo Cleanup Set SH = CreateObject("SHell.Application") Se…

Hola. He estado investigando como hacer una macro para generar un reporte de salida de almacen, Resulta que tengo un archivo en excel llamado "almacen", en donde registro materiales que solicitan diferentes departamentos y necesito generar un reporte "vale de salida de almacen", pero solo utilizando ciertas columnas de este archivo. Lo que quisiera es una macro en la cual al generar un vale de salida y automáticamente aparezcan los articulos que solicitó cada departamento en el cual se pueda ingresar manualmente la cantidad a entregar y que a su vez se pudiera restar de su inventario. Adjunto el archivo en el cual estan mis datos y otro en el cual es el formato del val…

Buen día y con el gusto de saludarle nuevamente expertos recurro a ustedes para solicitar su valiosa colaboración en el mejor de los sentidos ya que tengo un textbox al que le quiero poner un formato de hora HH:MM para que al momento de escribir obligue al usuario final a poner ese formato de tiempo exactamente, he intentado hacerlo pero en mi programación veo muchos errores, por ejemplo cuando le doy con las teclas direccionales para seleccionar y me posiciono en el espacio 3 y le doy una letra este la acepta; bueno de antemano el textbox no debe aceptar letras, unicamente números y en el espacio 3 el signo de dos puntos (:) pero como lo digo al hacer eso lamentablemente…

Me gustaria hacer un recodatorio en excel y qu te lo muestre en un msgbox indicando esto puede darse el caso que sean varios datos que expiren el mismo dia recordatorio.rar

Hola de nuevo, tengo esta macro: Sub Inserta_foto() 'Renombramos archivo Name "C:\Seat\Fotos\foto.jpg" As "C:\Seat\Fotos\imagen.jpg" ActiveCell.Select ActiveSheet.Pictures.Insert("C:\Seat\Fotos\imagen.jpg").Select With Selection .ShapeRange.LockAspectRatio = msoFalse .ShapeRange.Height = 60.75 'Alto de la imagen .ShapeRange.Width = 84 'Ancho de la imagen .ShapeRange.Left = .ShapeRange.Left + 1 'Añadimos 1 para que se vea la línea divisoria de la celda (izquierda) .ShapeRange.Top = .ShapeRange.Top + 1 'Añadimos 1 para que se vea la línea divisoria de la celda (superior) 'Movemos archivo a la carpeta Historico Name "C:\Seat\Fotos\imagen.jpg"…

Macro que busque un valor en otra hoja en una columna especifica y copiar los datos que se derivan de dicho valor macro buscar.zip

Saludos Hay alguna forma en Excel de inmovilizar en una misma hoja diferentes filas, es decir inmovilizo la fila 3 y más abajo inmovilizo la fila 30

Buena Tarde Tengo una macro en la que tengo algunas variables, una de ellas string pero es para recorrer las celdas, la inicializo con E, la siguiente debe ser F, G, H, I asi consecutivo para que realice una suma al avanzar en la macro de cada una de las celdas, corriendo el filtro, pero esta variable no he podido, hacer que pueda decirle next y sea la siguiente letra del alafabeto, como podria hacer esto ? Gracias Esta es la macro Dim n&, cCriterio$, H&, LE As String j = 5 LE = "E" For H = 5 To 10 For n = j To 19 If n = j Then cCriterio = "<>0" Else cCr…

Buenas, Tengo una macro donde creo dos listas con random. La unión de las dos listas son pares de números que indican una determinada celda, y necesito que no aparezca dos veces la misma celda. He encontrado ejemplos de como evitar repeticiones de números con random, pero lo que yo quiero es que no se repita el par. alguien puede echarme una mano? Muchas gracias por adelantado!

Hola a todos, un cordial saludo... Nuevamente intentando "crear" alguna macro que me ayude en este caso, para el desarrollo de un Test, la idea es que cambien de color el contenido de varios rangos de celdas, (entre 16 independientes), en la medida que se ajusta el valor de otra (en mi caso algunas celdas de la Columna "O", de hecho 16 en total...) Cada fila tendrá un color para cada opción entre amarillo, naranja, azul, verde y rojo, dependiendo de la característica positiva o negativa registrada... en las columnas "D" y "J"... Adjunto un breve archivo Gracias a todos por sus aportes y ayudas... Javishalom... CAMBIO COLORES.xlsm

Hola foro, necesito ayuda para elaborar un macro para un informe, necesito que en el libro tenga un botón con el cual se haga una copia del libro y que sea nombrado con la fecha y hora en el momento que se utiliza el botón. Para así seguir utilizando el libro base y tener varios informes nombrados con la fecha y la hora. Estuve tratando de hacerlo pero como soy algo nuevo con los macros, no se como realizar el macro. Solo tengo un intento del mismo pero solo me guarda una celda seleccionada y no el libro entero. esto es lo que tengo: Option Explicit Public Sub crear() Dim fecha As String On Error Resume Next ActiveCell.CurrentRegion.Select Selectio…

Hola a Todos, consulta, tengo este archivo adjunto, el cual tiene un botom para guardar en una ruta especifica, pero al momento d eguardar lo hace, pero sin el formato original, como podria hacer para que se mantenga el formato de todas las celdas tal cual? Muchas Gracias, Fact Model 2.xls

Hola a todos; -Adjunto macro vba Excel con un formulario y un botón que ejecuta una consulta sql a una tabla de Access y devuelve el resultado según el valor que he puesto en el Where. Hasta este punto todo bien. Ahora bien, se me ocurre lo siguiente si a la hora de hacer la consulta hay varios registros iguales, ¿se podría configurar la macro para que a medida que vaya pulsando el botón me muestre los siguientes registros?. ¿Es mucho pedir, o es factible? Saludos y buen día a todos VIDEO: BuscarValoresRepetidos BRepetidos.zip

Buenos dias: Es sorprendente el buscador, me gustaria poder adaptarlo a mi base de datos, pero en el codigo no encuentro ninguna referencia a celdas ni nada por el estilo, por lo cual me es imposible adaptarlo. Subo un ejemplo de data base y si me podes explicar por favor el procedimiento te lo agradeceria mucho. Es por el buscador tipo Google II. PERSONAL.xls

Saludos a todos Tengo un archivo de excel con la macro para exportar a access funciona bien, pero gustaría que antes de que grabe los datos en access, vefique 3 campos (Id, Nombre, Codigo) si ya existen que no los inserte, sería genial que en una columna "E" si ya existe el registro en la tabla de access ponga "Ya existe" y grabe solo los nuevos registros. Agradezco de antemano su apoyo y/o sugerencias Saludos -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------…

Saludos gente, soy nuevo por aca y tambien nuevo en esto de macros en excel. para ir directo al problema, mi jefe me ha dejado hacer una hoja de calculo en el cual el ingrese cierta información y la hoja se permita exportar a un archivo de texto plano con un formato especifico. en internet encontre este codigo: Sub GeneraTxt() Dim MiRango As Range, Largo As Integer, FilaActual As Long On Error Resume Next Set MiRango = Application.InputBox("Seleccione rango a exportar", Type:=8) On Error GoTo 0 If MiRango Is Nothing Then Exit Sub Open "C:\TEXTO.txt" For Output As #1 For Each Celda In MiRango If Largo <= Len((Celda)) Then Largo = 1 + Len((Ce…

Hola , Buenas Tardes , agradeceria cualquier ayuda para automatizar este problema Con la planilla lo que obtengo es el directorio de trabajo que se llama originales para efecto de este ejemplo Datos Tengo una cantidad no definida menor que 40 de archivos pdf en carpetas FA,FB, para este ejemplo,pudiendo ser más FC,FD etc. Necesito introducir numeros correlativos en cada pdf partiendo de 01FA hasta 40 FA (05FA en este ejemplo) , pero no tomando el 00FA , el resultado de esto seria mover 00FA a la Carpeta FAN y ahi poner todos los archivos de 01FA hasta 50FA o menor con el numero coorrelativo dentro de cada archivo y que…

Hola buen dia. Es priemra vez queparticipo en algun tipo de foro. Busco ayuda con un formulario, que diseño uno de los botones no hace loque deberia segun yo. Explico: Una vez Abierto el archivo filtro en la celda T con titulo Assigned to El nombre de Nancy Urrieta. Selecciona la celda A7 y doy clic en boton Details Oprimo boton Nex Inv > esto despliega la info de la misma persona de las celdas activas y funciona bien Cuando oprimo el boton Assigned to, no regresa Deseo que cuando oprima Nex Inv haga lo que ya hace pero de donde se quede la celda activa pueda con el boton < Prev Inv regresar y despliege los datos. He utilizado Range(Selection, Select…

Tengo en un libro un cuadrante que utilizamos para contar jornadas de trabajo, vacaciones, etc.. como no tenemos vacaciones colectivas estoy intentando que con una macro al apuntar V o EJ en otra hoja me salga el dia y el nombre de la persona en su semana correspondiente, dejo un ejemplo Vacaciones2015.rar