SALUDOS AMIGOS DEL FORO HABER SI ME HECHAN UNA MANITO NO PUEDO VALIDAR AL BUSCAR UN DATO NO ENCONTRADO AL INTRODUCIR CODIGO EN TextBox1 ME LANZA UN ERROR 1004 EN LUGAR QUE ME LANCE UNA ADVERTENCIA "Producto no Encontrado" AYUDENME A SOLUCIONAR mi MsgBox PORFA LES ADJUNTO EL ARCHIVO ayuda_MsgBox.rar

Hola a todos. Estoy creando una tabla que me permita filtrar su contenido utilizando una lista desplegable para seleccionar la columna a filtrar y una caja de texto para el criterio. Hh logrado que funcione para todo menos para fechas y números. Lo de las fechas entiendo que puede deberse a la forma que excel las almacena, pero lo de los números me tiene confundido. He intentado definir la variable para el criterio (crit) como variant o sencillamente no definirla, pero el problema persiste. Este es el código que tengo para filtrar (Corre cuando se le da a enter en la caja de texto) Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Inte…

Hola buen día a todos, Quisiera automatizar una serie de tablas las cuales tienen un nombre y un costo$, la idea es clasificar de mayor a menor TOTAL$ en una o unas tablas automáticas dependiendo del nombre, en este caso carros. Son 4 tablas(3 de costos y una de recompensa la cual se debe restar a esa de 3 costos para que dé el total). Gracias de Antemano Libro.xls

Buenos días, continuo con las pantillas para mejorar la calidad del servicio, en mi trabajo, y la comodidad para mi y mis compañeros, a la vez que la fiabilidad del resultado final. El ejemplo, es una plantilla de novedades diarias en la cual, si se puediera, me gustaría implementar algunas mejoras: La celda G3, e sla que contiene la fecha y actualmente tengo la posibilidad de que una vez escrita la fecha no se modifique. Lo hago cn esta macro: Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("G3")) Is Nothing Then Exit Sub Else If Target.Value <> "" Then Target.Select ActiveSheet.Unprotect "0000" Selection.Locked = True E…

Buenas tardes a todos, quisiera que me dieran una ayuda porfavor les explicare mi duda, gracias ante todo: Tengo mi aplicación multi páginas, la cual en la pagina 1 se encarga de filtrar datos: La página 1 cuenta con 1 combobox el cual me filtra el tipo de personas que hacen una función determinada, y me lo lista en la pagina 2 . En la página 2 tengo 2 Listbox la primera es donde he filtrado anteriormente el personal encargado de hacer la función determinada y la 2nda lista es para pasar los items seleccionados de la primera lista a esta segunda lista. Lo que deseo es filtrar lo siguiente: En la página 3 tengo una BD de Insumos la cual deseo filtrar la primera column…

Hola a todo el mundo Os comento, tengo que escribir un ensayo de practicas en excel y tengo una duda: me gustaría crear una macro que actualizara los datos cada vez que escribo "Prueba". en las prácticas tengo que hacer varias pruebas, y estar pendiente de una u otra es un martirio. en el ejemplo que os dejo adjunto viene pensado de la siguiente manera: En la hoja1, hay 10 pruebas, la hoja 2 y la hoja 3 son los resultado de restar o sumar respectivamente esas hojas gracias por el cable Actualizar.xls

Buenos dias: Estoy tratando de generar una macro con un tabla dinamica, pero al ejecutarla me sale el siguiente error: "Se ha producido el error 5 en tiempo de ejecucion - Argumento o llamada a procedimiento no valida" Me señala en amarillo el error: ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ "Sheet1!F1C1:F4916C10", Version:=xlPivotTableVersion12).CreatePivotTable _ TableDestination:="Sheet1!F1C12", TableName:="Tabla dinámica1", _ DefaultVersion:=xlPivotTableVersion12 Agradezco me indiquen como debo proceder para la generación correcta de la macro. Muchas gracias. Saludos

Hola Tengo que sacar de unos 500 libros cerrados algunos valores de celdas. Encontre un código que se adapta casi al 100%. Mis libros en su (hoja1) sus nombres son diferentes y quisiera encontrar el código adecuado para que lea cada libro cerrado sin importar como se llame la hoja1. Magnifico y práctico código. La parte del código motivo de mi mensaje es: CStr(NombreHoja). Sub RecuperaDatoA2_y_I2_Opcion_1() 'Usando función de Macro de Excel4 (predecesor de VBA) [Macrofucion] Dim ruta_directorio, Archivo As Application, NombreArchivo As String, NombreHoja As String Dim n As Long 'Indicas la Ruta base, estoy suponiendo que los 4000 archivos estan e…

Hola! Estoy intentando hacer lo que explico en el adjunto. Ojalá me podáis ayudar Saludos Pregunta.rar

Buenos días,Amigos(as) quisiera solicitar la ayuda a mi problema, estoy intentado crear un formulario que contiene 2 listbox, pero necesito que el resultado de la columna# 3 se exprese en formato hora(hh:mm) en cada listbox para mi ejemplo serian 2.Agradezco la ayuda que me puedan dar.Saludos Jose Consulta foro.xlsm

algun codigo que busque el numero de la hoja en los cuadros y lo coloque debajo de donde se encontro ese dato ejemplo2.xlsm

saludos estimados masters por favor me pueden indicar como debo ingresar el rango en el que se debera actualizar las formulas del calculo respectivo. Para este ejm tengo el rango C5:C10 al ingresarlo asi me da el objeto no admite esta propiedad o metodo, informo que es para excel 2003. Gracias Actualizar con F2+enter.xls

Buenas!! ? A ver quién puede ayudarme, tengo un libro con más de 100 hojas y quiero que se borre el contenido de todas, menos de dos hojas concretas ("GS" y "Macros") a partir de la celda A3. Me parece que debería ser muy sencillo, pero el código me da error 13 no coinciden los tipos (línea 5? Sub Botón4_Haga_clic_en() Dim hoja As Worksheet For Each hoja In Application.Worksheets If hoja.Name <> "GS" Or "Macros" Then hoja.Range("A3:G6000").Clear End If Next hoja End Sub He probado declarando las hojas que quiero proteger como worksheet y comparando con If hoja.Name <&g…

Hola buenas noches, un cordial saludo y agradecimiento anticipado a todos aquellos que participan con sus aportes, gracias a ello estamos aprendiendo y avanzando en este tema de las Macros que todavía no dominamos.... Hoy deseo presentarles una Macro para imprimir varias hojas de excel (con rangos ya definidos), desde un formulario con varios CheckBox.. La idea es que al seleccionar diferentes Checkbox en el formulario, me imprima las hojas correspondientes, al mismo tiempo que guarde en la carpeta llamada "C:\RRHH", Y en un solo archivo en PDF.... La Macro estaba funcionando perfectamente, ahora me está saliendo el "ERROR, que la carpeta en mención …

Hola amigos de AE, quería hacer una consulta por favor. Tengo una hoja oculta con 1000 filas y 16 columnas (A1:P1000) que se actualiza de otras hojas a través de fórmulas y macros. Nunca se mete dato manual. ¿Es posible ejecutar en dicha hoja una macro, cada vez que se actualice el valor de una celda del rango indicado? He intentado por el evento Change pero no lo logro. Agradecido de antemano.

Buenas tardes a tod@s. Adjunto un archivo que registra Entradas y Salidas de material de obras. En la parte del registro de ese mismo archivo tengo persona que entrega y persona que retira en la que aparecen unos desplegables de usuarios. En esos desplegables pues elegimos al usuario que sea . Pero, necesitaba saber si hay posibilidad de que al introducir un usuario, solicitase una contraseña y según la contraseña aparezca el nombre del usuario que le corresponda nada mas. O sea, que filtre por usuario según la contraseña que se indique en la celda y oculte los demás usuarios. Si no es con desplegable me puede valer cualquier otra opción. …

Buenas tardes, expertos en la plantilla que adjunto de prestamos, cuando calculo el prestamo y los registro en la hoja estado me registra de la mayor a menor los registro, esto me podrian indicar que debo hacer para que se registre de forma ascendente Por otro en la hoja resumen el porcentaje me muestra muy elevado, ejemplo si es 20% aparece 200% Por favor me puede ayudar, adjunto el archivo Planilla Prestamos 1.5Final.xlsm

Hola, estoy queriendo exportar una hoja del archivo como pdf pero al querer guardarlo en un disco compartido (server) me da error. Aclaro que al querer hacerlo en mi disco local C si me lo permite y tambien puedo exportar la hoja como xlsx en el disco compartido pero al querer hacerlo como pdf me lo impide. La linea que utilizo es Hoja2.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=RutaEnDiscoCompartido & "\" & NombreArchivo & ".pdf", Cuando remplazo la RutaEnDiscoCompartido por una en el disco local si me permite exportarla Muchas gracias

Hola buenas tardes: Por favor me pueden ayudar a realizar lo siguiente. ejecutar una macro después de un tiempo, que recorra una columna a partir de la celda activa hacia abajo. Es una lista extensa, que filtro desde la columna B. y solo me muestra las filas que me interesan. ejemplo: Si mi celda activa es la C23 ejecutar la macro y baje una celda y repite la macro después de 20 segundos y lo vuelve hacer(Simpre bajando una celda), y que este se detenga hasta la ultima fila que este visible en el filtro. Ya que puedo tener muchos datos mas. Gracias Prueba filtro y avance.xlsm

Buenos días amigos espero estén bien Actualmente el Label92 me muestra el ratio que tardo en solventar un problema, sin embargo una vez que cierro un reporte y se guardan los datos el Label permanece con la información anterior y no se actualiza simultáneamente como si ocurre en el Listbox1, en concreto necesito que el Label92 se actualice de forma automática y simultánea una vez se guarden los datos RCI PRUEBA.xlsm

Hola, hasta ahora me habeis ayudado gracias a las solicitudes de otros. Ahora tengo un problema. Tengo un libro con datos entrelazados y necesito una macro que me copie solo los datos de dos de las hojas y me cree un libro nuevo con el nombre de una de las celdas. Solo necesito que copie los datos, no las formulas, ni macros, solo los valores que contiene. Esto es lo que he probado para una de las hojas pero me da error. Sub Copiar_Y_Guardar() Sheets("FACTURAS").Copy ActiveWorkbook.SaveAs "C:\Users\Desktop\cliente\" & Range("J2") & ".xls" ActiveWorkbook.Close False End Sub[/CODE] Esto lo tengo que hacer con dos hojas del libro a la vez y guardarlas …

Hola que tal., antes que nada los felicito por esta pagina tan ilustrativa, me ha ayudado mucho con los pendientes del trabajo. El asunto que traigo hoy es el siguiente, he conseguido esta macro que me convierte una hoja de excel en txt,. En las columnas 13 y 14 existe una formula que dice que si no existen caracteres, inserte x numero de espacios en blanco, y al momento de convertir el archivo en txt no me los considera, es decir termina la cadena de texto donde termina el ultimo carácter de la columna 12,, adjunto el archivo de excel y un ejemplo del txt que genera. Ante todo muchas gracias por su ayuda. Saludos desde AGS., MX. txt de ejemplo.tx.txt Macro Carga.xls

Hola a todos hace algun tiempo estaba utilizando una maccro encontrada aqui: Obtener datos de una página web : Hojas de cálculo en Excel con la cual podia obtener los datos de la cotizacion de divisas directamente en mi hoja de calculo, desde unos dias atras dicha macro no funcionaba y pude percatarme que habia sido cambiado el formato de la pagina por lo que ya la macro no encontraba dichos datos, el problema es que no se como puedo actualizar esto y hacer que de nuevo la macro funcione, agradeceria cualquier ayuda al respecto gracias anticipadas Manuel

Hola Expertos. En un libro compartido tengo una macro que realiza un autofiltro por nombre de usuario. Necesito que ese filtro permanezca durante el tiempo en que trabajan en el libro. Para esto necesito deshabilitarles todas las opciones de filtro, las del tab Datos y las del Tab Inicio para que no quiten el filtro activo. Esto es en Excel 2007. Cómo puedo hacer esto mediante VBA? Muchas gracias por sus respuestas. He probado el código siguiente pero solo me funciona con Excel 2003: [/b] [color=#0000ff]Private[/color] [color=#0000ff]Sub[/color] Workbook_Activate() Application.CommandBars.FindControl(ID:=899).Enabled = [color=#0000ff]False[/color] [color=#0000ff…

Hola Amigos: Recurro a uds. solicitandoles su ayuda estoy buscando la manera de solucionar lo siguiente, tengo un libro con una cantidad variable de hojas cada una tiene tambien una cantidad variable de datos en la columna A lo que necesito hacer es poder comparar todas las hojas entre sí para poder encontrar los duplicados y poderlos marcar y luego borrar, preferiblemente si hubiera alguna manera de seleccionar cual o cuales hojas necesito comparar, de no ser así pues aunque sea una comparacion de todas entre sí a la vez. Adjunto un pequeño archivo de como tengo los datos. Gracias de antemano y espero haberme podido dar a entender. JG2 comp.rar