Saludos, Amigos del foro, Estoy haciendo una macro que me saque un resumen en este caso de las ventas de un mes, con lo que he aprendido y con la ayuda de la grabadora de macros logre sacar un codigo que ordena los datos de la hoja Cons.Ventas Por Proveedor luego insetar subtotales de ahi delvuelve a la hoja Resumen los datos de estos subtotales con las caracteristicas que nesesito. Hasta ahi bien. El problema que tengo es que el bucle que deberia dar fin a la ejecucion de la macro no funciona y la macro se sigue ejecutando devolviendo al final de la hoja Resumen datos que no corresponden. Dejo un archivo con un ejemplo. Si alguien puede darme una mano o ideas de funci…

Hola buenos días. Me gustaría porder por algo en una celda en función del color que tome esa celda, es decir, la celda B8 (del ejemplo adjunto), cambia de color en base a un condicional que ya he predefinido. Así por ejemplo, si esta celda cambia automáticamente a rojo, me ponga "NO", pero si cambia a verde, me ponga en esta celda B8 la palabra "SI". Muchas gracias p.d. Creo que he insertado correctamente el archivo de ejemplo prueba.xls

Hola soy completamente nuevo en esto del excel y tengo una inquietud, con un x sistema genero varios archivos en excel los cuales me gustaria poder insertarlos en un solo archivo igual de excel pero en varias hojas con ayuda de una macro alguien cree poderme ayudar con esto. De antemano gracias por la ayuda que me puedan brindar. saludos Leo

Estimados: Estoy filtrando datos desde otra hoja, con varios textBox ubicados uno en cada columna de una tabla. La segunda columna contiene Fechas y no se cual es el codigo que debería llevar ese textbox para que funcione igual que los demas. Este es el código utilizado: Private Sub Filtrar() Application.ScreenUpdating = False uf = Sheets("Datos").[A65536].End(xlUp).Row Sheets("Datos").Range("A1:K" & uf).AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Range("A1:K2"), CopyToRange:=Range("A4:K4"), Unique:=False Application.ScreenUpdating = True End Sub Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal …

Hola a tod@s. De antemano agradecer por su tiempo en el siguiente inconveniente que expongo. El inconveniente que tengo es que al aplicar el el código en el evento que dejare líneas abajo funciona correctamente, sin embargo cuando selecciono el rango de celdas B9:B18 y borro el contenido, sucede que de manera automática se colorea todo de color rojo en dicho rango. Como solucionarlo?, tomando en cuenta que es necesario que sea un evento. Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Not Application.Intersect(Target, Range("B15")) Is Nothing Then If Not IsNumeric(Target.Value) Then …

Amigo expertos espero me ayuden, el tema es que tengo un formulario con 2 combobox y un textbox para hacer la busqueda de diferentes hojas y al lado derecho para que muestre los datos consultados en la parte izquierda con los controles antes mencionados; lo que pasa es que me busque cuando escoge del combobx tipo de reciduo me seleccione la hoja correspondiente y mas abajo tengo un textbox para poner el numero de normas a tratar que corresponde en la hoja seleccionada arriba y por ultimo mas abaja hay un combobox y por ultimo en el tipo de reciduo que debo seleccionar normas a cumplir me muestre los datos el los textbox correspondientes cumpliendo todo los pasos correspon…

Buenas Equipo de "Ayuda Excel"..! Tengo un problema Ojala Me puedan Orientar.! Quiero hacer un surtido según una cantidad Limitada en Stock.! Dejo Mas especificaciones en Adjunto. Saludos..! Libro1.rar

Hola, estimados usuarios de AyudaExcel. Soy nuevo en el tema de las macros en Excel y VBA, pero quiero ver la posibilidad de que si pueden ayudarme con lo siguiente. Tengo un archivo llamado "BD IDS" (el cual adjunto), el cuál tiene divididas por hojas varias plataformas (Windows, Linux,etc), los datos de varios usuarios, ordenados en columnas. Mi idea es hacer una macro, en un archivo (adjunto), que se llama: "BUSQUEDA IDs". Lo que pretendo es que según la plataforma que esté seleccionada, al apretar el botón, busque los datos en otro libro excel que pretendo que esté cerrado y según la plataforma seleccionada, busque en una hoja determinada con esa plataforma. En …

Buenas, estoy intentando hacer una macro (fichero Actualizar_Access) para añadir a una hoja distintos botones y actualizar desde ahí una serie de tablas de una BBDD en Access. No lo he hecho nunca. Hice un pequeño ejemplo para actualizar desde ahí, la tabla PEDIDOS de Access con la Hoja1 del fichero DATOS. Pero solo quiero que agregue los registros nuevos (la clave es el ID) y en Hoja1 ahora mismo hay 3 registros nuevos. Pensaba que sería más sencillo, pero no encuentro mucho por ahí de cómo hacer esto. Alguna ayuda? Os envío los archivos con el pequeño módulo que hice y me da error. Gracias. ejemplo.zip

Buenos días y mes a todos; Estoy intentando armar una macro que sobre unos datos me genera un gráfico. Lo que me gustaría configurar es el poder cambiar los nombres de las etiquetas que aparecen en la leyenda y que se generan predeterminadamente y también si es posible añadir un filtro. Adjunto macro de ejemplo. Saludos a todos. MGráfico.xlsm

Buenas noche, expertos necesito una yuda tengo un formulario que funciona bien, pero el detalle es cuando la hoja socios esta vacia solo con los encabezados y registro los datos con el formulario se debe agregar en la fila 2 pero este se registra en la tercera fila, solo eso de ahi adelante segistra una tras otra, lo que pido ayuda es que empiece registrar desde la fila 2. El otro tema es al momento de filtrar con la caja de texto buscar por apellidos me filtra bien pero cuando selecciono la casilla no funciona, pero si selecciono la casilla sin filtrar me selecciona la fila del ListView y los datos me muestran en los campos de texto. Por favor me podrian ayudar que…

hola a todos. bueno la verdad es que estoy hace poco aprendiendo a crear formularios en excel utilizando vba... y el problema que se me genera es que en un textbox al ingresar una fecha como por ejemplo 02/03/1980 (día, mes, año) en la planilla me aparece 03/02/1980, osea me cambia el que debería ser el día por mes y viceversa... he probado con cambiar el formato de celda y todo eso pero no se arregla. si alguien me podría orientar se lo agradeceria un monton. saludos a todos. utilizo el office 2010

Tengo una planilla Excel con fechas de vencimientos, las cuales actualizo periodicamente. Generé una función para crear citas en el calendario de Outlook. Esta función se la asigné a un botón... el problema que tengo es que cada vez que presiono el botón me genera nuevas citas... necesitaría ver como validar si la cita ya existe en el calendario de Outlook, que no la vuelva a crear. Gracias! A continuación les paso el código que tengo: Function Generar_cita_xfecha(texto_cita As String, fecha_cita As Date) Dim miOutlook As Object, miCalendario As Object, miCita As Object Set miOutlook = CreateObject("outlook.application") Set miCalendario = miOutlook.…

Buen día a todos, un gusto saludarlos. Tengo la siguiente macro, que exporta un archivo de imagen a partir de un rango de celdas, funciona correctamente si se hace step by step desde VBA (F8), sin embargo, al correr la macro desde una llamada o desde un botón, la imagen que se exporta sale completamente en blanco, he intentado varias soluciones, pero hasta ahora no ha funcionado ninguna, este es el código: Sub img() Application.ScreenUpdating = True Dim Izq As Single, Arr As Single, Ancho As Single, Alto As Single Application.DisplayAlerts = False Sheets("Hoja1").Select With Range("B2:P104") Application.Wait (Now + TimeValue("0:00:05")) …

Amigos buenos dias: Necesito ejecutar el siguiente comando desde excel vba y que el resultado de ejecutar este comando en CMD "oculto" lo guarde en una variable en VBA, tener en cuenta que el resultado se puede componenr de dos lineas o mas dependiendo del numero de monitores que tenga conectados el PC powershell -command ""get-wmiobject wmimonitorid -namespace root\wmi|foreach-object{($_.SerialnumberID|foreach-object{[char]$_}) -join ''}""

Hola amigos, Tengo un reto. En el archivo adjunto tengo un archivo con varias pestañas. La pestaña LEAVE SOURCE tiene dos tablas, estas deberían esta en blanco al abrir el archivo, excepto los Headers o titulos de las tablas. Existe un botón que le solicita un password al empleado, solo asi el podra ver su información. Hice manualmente una simulación de como se vería el resultado si el Empleado 2 ingresara al sistema. El resultado esta en la hoja LEAVE TARGET. NOTA: no deseo que se abra otra hoja, sino que en la misma hoja LEAVE SOURCE se filtre y muestre la información solicitada por el empleado (segun su password) Alguna idea con el codigo? …

buenas aqui pidiendo su ayuda me gustaria transponer estos datos usando macros de la plantilla "base" que deberia quedar como en la plantila "asi debe ser" debe qudar asi por cada persona les dejo el excel a ver si alguien me da una mano de antemano muchas gracias EJEMPLO.xlsx

Buenos días a todos; -En el archivo que subo tiene en la hoja "Arqueo y Ventas" una macro que me muestra al hacer clic con el botón derecho del mouse un menú personalizado. He configurado de forma que si la persona que utilice la macro no tiene privilegios de administrador no pueda acceder a dicho menú. Si lo intenta aparece un formulario donde se debe introducir la contraseña correcta que estableció el administrador. Consulta: Como puedo hacer para que una vez logueado me actualice el menú contextual sin necesidad de que tenga que ir saltando de una hoja a otra. Dejo enlace de un video explicativo: Video Saludos. JExcel.xlsm

Hola a Toda la Comunidad, Nuevamente recurro a vosotros para solucionar una pequeñez para vosotros y una montaña para mí. Tengo una hoja para introducir datos que posteriormente son volcados/copiados a otra hoja. Necesito establecer el recorrido de las celdas en la introducción de los datos, obligando al usuario a pasar por las celdas y no olvidarse la introducción de datos. El recorrido de las celdas debe ser: D6-B10-C10-D10-G10-H10-D12-D13-C16-C17-C18-C19-E16-E17-E18-E19-G16-G17-G18-G19-I16-I17 He buscado por todo el foro y no he sabido encontrar una solución viable. Alguno sabe como solucionar este pequeño problema. Gracias anticipadas. Un Saludo Xavi

Buenas noches; Haber quien me puede echar una manita. Necesito que la hoja llamada Acta se rellene con los datos de la tabla dinamica, es decir, que compare la columna cod y me ponga la columna situ y obs de la tabla dinamica en la hoja Acta, se puede??. Muchas gracias de antemano. Libro1.xls

Buenas Tardes Tengo un problema El archivo que tengo la fila 2 siempre esta vacia quiero eliminarla despues de eso ordenar la columna P de manera Acendente al momento de hacerlo con mi macros normalmente primero se tiene q eliminar la segunda Fila despues Ordenar pero cuando la ejecuto forma 2 filas en blanco despues de esas lo ordena la columna P no hace mas... aparte de ello el archivo es un BD que algunas veces cuando exporta los datos a un libro se distorcionan algunas celdas se identifico que es apartir de la celda P por eso depues de ordenar lo que se tiene que hacer es los 2 datos que distorcionan (P4:Q4) que deberia ser si todo funcionar bien (P2:Q2) eliminars…

Amigos tengo la siguiente macro: Sub Ocultar() Dim r As Range Application.ScreenUpdating = False ActiveSheet.Unprotect Rows("21:500").Select Selection.EntireRow.Hidden = False For Each r In Range("A21:A500") If r = 1 Then r.EntireRow.Hidden = True Next r Application.ScreenUpdating = True End Sub He probado distintas formas para que queda mas rápida porque es demasiado lenta, he hecho por ejemplo ciclo for, la he separado en distintos rangos, he llamado con otra macro los distintos rangos, pero nada, nose como dejarla mas eficiente. ayuda amigos muchas gracias

Buen día a todas las personas que forman parte de esta gran comunidad. Vengo a solicitar de su invaluable ayuda y conocimiento con la siguiente duda, estoy extrayendo tablas desde PDF a Excel usando macros para Power Query: With ActiveSheet.ListObjects.Add(SourceType:=0, Source:= _ "OLEDB;Provider=Microsoft.Mashup.OleDb.1;Data Source=$Workbook$;Location=""Page002 (2)"";Extended Properties=""""" _ , Destination:=Range("$A$1")).QueryTable Deseo saber si existe un método para saber cuantos objetos tiene el PDF a extraer, para así poder sustituir el valor de Location:""Page002 (2)"" Cualquier ayuda es bien recibida y con un agrad…

Quisiera ver la posibilidad de crear una macro asociada a una carpera en la que hay: - varios archivos de word - 1 archivo de excel - varios accesos directos del escritorio guardados. Uno de los documentos de word contiene enlaces de internet que deseo poner (llamé al documento links), si es posible de forma automática, como páginas de inicio a traves de la opcion de internet del menu de herramientas. Lo que querría hacer, si es posible, al abrir la carpeta es el siguiente conjunto de acciones: que se abran una serie de accesos directos; que los links del documento de word en cuestión se coloquen como paginas de inicio en el navegador, y que varios documentos de word …

Hola en principio saludos y felicitaciones a todo el mundo y en especial a los creadores de este fabulosa enciclopedia en la web. Necesito ayuda sobre llenar un combobox1 dependiendo de un textbox (Textbox1) asociado a un valor de un formulario anterior Userform3 Textbox1 combobox1 Combobox2 textbox 3 textbox 4 textbox5 NombreApellidos NºFactura Nº Pago Cantidad Pagada Fecha Pago incidencias Columna “A” “G” “L” “M” …