Estimados, quiero solictar de su ayuda para el siguiente problema Tengo un Form en donde puedo realizar consultas mediante listbox, pero lo que necesito es que al pinchar el checkbox se consolide los datos por codigo o nombre de producto. En el form existe la posibilidad de consultar por producto pero los da en detalle y la idea es que se puedan visualizar ambas opciones tanto consolidado como en detalle y que cuando consolide los datos tambien sume los valores que tiene cada uno. espero haberme explicado bien y que puedan entender mi solicitud. saludos. Consolidar.rar

Duda como hacer el reporte Porfavor miren el archivo, lo que necesito esta en la hoja '4' la extraccion de datos es de las hojas 1,2,3 que podrian ser mas hojas. Supuse que seria necesario una macro Gracias de antemano Libro1.xls

Hola amigos, actualemnte estoy tratando de crear una macro que pase datos de una hoja a otra de acuerdo a un criterio y este el nombre del encabezado de cada columna. por ejemplo de la hoja "origen " debo pasar todos ls datos de la columna que en la sprimeras celdas tiene el valor de "Codigo " y "Valor",sin embargo no sé como hacerlo. estos valores no siempre estaran en la columna A ni D, pueden variar de ubicación. mas o menos imagino, es que se deb tener un bucle que rrecorra las celdas desde la A1 hasta la ultima columna con datos que en este caso es D1) y buscar aquellas columnas que tengan en el encabezado los valores de "Codigo" y "Valores" espero que pued…

buenas tardes, tengo el siguiente código: '---------------------------------------------------' '--OPTION EXPLICIT--------------------------' '---------------------------------------------------' ' Option Explicit Dim tWebBrowser As Object ' '---------------------------------------------------' '--NAVEGADOR (CONSULTAR SALDOS '--BANCARIOS)---------------------------------' '---------------------------------------------------' ' Private Sub Worksheet_Activate() Range("C10").Select If Range("D3").Value <> "" Then If IsNull(Range("D3").Value) Then Range("D3").Value = "Banco online sin comisiones para Particulares y Negocios - ING DIRECT…

Saludos a todos, tengo un problema y no se como solucionarlo. Expongo el tema: en un libro tengo varias columnas variables (columnas A-C-D-E), donde en la columna A esta la descripcion del producto, C la referencia, D las unidades y E las medidas a cortar. Necesito crear una macro la cual, al encontrar los mismos valores en la columna E y en la columna C, me sume la columna E, y, además me unifique el resto de columnas. El problema es que los valores de todas las columnas son todas variables. Lo siento si es que no me he sabido expresar bien, adjunto un excel para ver cual es el problema que expongo y como deberia quedar. Ante todo gracias y saludos. Libro1.xls

Hola tengo una duda que me esta volviendo loco, porque parace simple pero no consigo hacerlo. Tengo que graficar dos columnas no contiguas de rango variable una en función de la otra. Como veis en el programa, empiezan en la fila 6 y son las columnas 16 y 19. al ser de rango variable, el contador j indica el numero de filas. ActiveSheet.Shapes.AddChart2(240, xlXYScatterLinesNoMarkers).Select StartRange = Cells(6, 16) EndRange = Cells(6, 19) Set a = Range(Cells(6, 16), Cells(j - 6, 16)) Set b = Range(Cells(6, 19), Cells(j - 6, 19)) ActiveChart.SetSourceData Source:=Union(a, He probado definiendo una variable igual a la unión, sin unión, con l…

Hola, Soy nuevo en el foro. Agradecería vuestra experta ayuda Mi problema es que tengo una macro cuya función es abrir un excel copiar información de este y pegarla en otro libro, y finalmente adjuntar este último a un correo. Esto funcionaba correctamente antes de que me cambiasen al Office 2010 (antes tenía el 2003). Ahora el problema que me sale es en la instrucción Set e1 = o1.CreateItem(olMailItem): error 13 en tiempo de ejecución. No coinciden los tipos. Sub CORREO2() Dim RUTA As String Dim rutaavanzamadre As String Dim o1 As Outlook.Application Dim e1 As Outlook.MailItem Dim WB As Workbook Dim tomador As Workbook Dim nombredeflota As String Dim fechadecierr…

Hola, os pido ayuda porque estoy atascado, tengo una macro que utilizo para hacer una copia de una hoja concreta de un libro ésta macro la utilizo para todas las hojas cuando tengo que copiar y guardar hojas individuales por ejemplo guardar una hoja de un presupuesto como hoja individual, la hoja en cuestión por ejemplo es "Presupuestos" y tiene unas imágenes en la zona Cliente que quiero que vayan en la copia pero me pide el nombre de la imagen que no corresponde con el de la macro, estoy harto de buscar el nombre que le da Excel a dicha imagen para cambiarlo en la macro pero, y en propiedades no consigo encontrarlo, me podéis echar una mano, gracias

Hola amigos, vengo nuevamente con una hoja que estoy elaborando para el rebajo de cuotas de nuestra asociación solidarista, lo que quiero es que al cambiar un numero o fecha las cuotas sean rebajadas automaticamente. Adjunto hoja, en lo que puedan ayudarme se los agradezco o si tienen una idea mejor sea bienvenida. PLANTILLA EJEMPLOxlsx.rar

Buenos días colegas. Espero se encuentren con excelente salud. Hace quizás un par de días consultaba sobre la eliminación de caracteres "extraños" en un archivo y los profesores JSD y Antoni me dieron soluciones maravillosas, pero necesito otra ayuda de ustedes. He tratado de convertir los números en texto a números y no he podido lograrlo. Lo hice con la función Sustituir por si hubiera algunos espacios de más, con el Texto en columna, lo multiplique x 1, le sumé +0, lo trate con un ciclo For Each, creando una variable Celda de tipo Range y un condicional If/End if y nada. Por favor, si fuera tan amables de sugerirme algo que no haya probado. Agradecido c…

Buenos días, Busco hacer una macro que divida los valores de la columna "C" de la pestaña (2) entre el valor constante que le corresponde a esta planta , dato de la pestaña (1) , columna "A". Y devolver los valores resultantes de esta división en la columna "D", pestaña (2). Gracias por adelantado Libro1.xlsx

Hola estoy cargando una hoja Excel a una grilla de VB6 y creo que el método que estoy empleando es lento, creo recordar que hay otros métodos mas rápidos, yo utilizo dos for X, y for Y recorriendo celda por celda y obtengo su valor (esto en 790 filas con 21 columnas me esta demorando 1 minuto), pero creo que había una forma de obtener un array de las celda lo cual es mas rápido mi código actual Private Sub Form_Load() Dim LastRow As Long Dim i As Integer Dim XL As Object, xlSpread As Object Const xlLastCell = 11 Dim Row As Long, Col As Long Set XL = CreateObject("Excel.Application") XL.Workbooks.Open FileName:=App.Path & "\L1.xlsx"…

Estimados Un cordial saludo En esta oportunidad solicito de su especial ayuda para poder dar solución a un problema que tengo y no logro solucionar. En mi día a Día debo pasar información de PDF's o Word a programas de textos. Yo uso excel para facilitarme la labor ya que en muchas oportunidades los PDF con cada linea que tiene todos quedan con un salto de pagina el cual me toca quitar manualmente antes de pegar el texto en el programa. Loca esto me quita mucho tiempo y no logro optimizar mi tarea. Me permito adjuntar un excel de los textos que yo pego en el excel y el resultado de como los deseo tener por medio de una Macro o Formula que me permita hace…

Buen día maestros y compañeros: En un TextBox se digita el nombre de un artículo. Una tabla dinámica muestra aproximaciones al dato buscado. Al dar clic o doble clic de los datos aproximados en la tabla dinámica, este dato debe copiarse en la celda G7. El siguiente dato encontrado, al dar clic o doble clic debe copiarse en G8 y así sucesivamente. Por favor, es de 0.137 MB y está en Drive compartido: https://drive.google.com/file/d/0ByjreIUrjQRLczZVanVJdzJzOVk/view?usp=sharing Agradezco la ayuda.

Estimados, Visto que nadie pudo/quiso/supo cómo responder mi anterior post. Tengo otra inquietud respecto del mismo proyecto. De una planilla, busco y extraigo datos de otras planillas de origen externo. Estas vienen en formato de tipo delimitado por ";", el tema del formato, artesanalmente solucionado, una vez rescatados los datos (copiados al libro de interés para ser trabajados), le doy: Windows(OTRO).Activate 'llamo al libro auxiliar Range("a1").Select Application.CutCopyMode = False 'ActiveWorkbook.Close False (lo intenté pero evidentemente cierra mi libro principal:( ) ActiveWindow.Close savechanges = False ' aquí el problema [/CODE] Mi problema es qu…

Saludos cordiales: Tengo un archivo con dos hojas, en la hoja uno hay dos listas desplegables dependientes en las celdas A1 y A2 (A2 depende de A1), los datos de las listas se encuentran en la hoja dos (columnas A y B ), la idea es crear una macro para que recorra cada unas opciones de las listas y que imprima en PDF la hoja uno, adicionalmente que guarde el archivo nombrándolo con los datos de las celdas A2 , A1 de la hoja uno, y que guarde en subcarpetas cada que cambie la celda A1 de la hoja uno todos los datos relacionados a este nombre (celda A2). Hoja uno A 1 Amazonas 2 Leticia Hoja d…

Compañeros, tengan Uds. muy buenas noches quisiera solicitarle sun apoyo con un tema el caso es que tengo una hoja excel con una pequeña tabla que al proporcionarle un codigo me mostrara en las diferentes celdas informacion, la cual luego sera impresa. Pero el caso es que quisiera que al abrir el libro, solo me aparesca el libro propiamente dicho, sin barras de herramientas ni barras d desplazamiento, etc... es decir como si fuera un programita. sin que eso afecte al mismo Excell; es decir si es que abro el Excel propiamente dicho que siga asiendo igual (con sus barras completas). El caso es que solo sea para el Libro que voy a trabajar, la cual estoy adjuntando una ima…

Hola tengo un gran problema En el excel de inventario necesito agregar una columna despues de la ultima empresa que se ingreso y despues copiar datos del excel de guia en esa misma columna y asi para cada empresa que tenga que agregar. ejemplo a mi me llegan varias guias de diferentes empresas entonces tengo una guia madre donde coloco las unidades de cada cosa que piden necesito una macro que en el excel de inventario me cree una nueva columna y que copie los valores en las casillas correspondientes. si no quedo muy claro me preguntan por favor. adjunto excel. ayuda.rar

Hola. Hay varios temas que piden listar los archivos de una carpeta, pero no he visto ninguno que permita abrir cualquiera de los archivos listados desde el mismo excel. ¿Es posible? Sería como si los archivos listados fueran cada uno un hipervínculo. Adjunto un ejemplo sobre el que poder trabajar (aunque se puede utilizar cualquier otro). Saludos. Listar archivos II.zip

Como puedo utilizar una macro para asociar automáticamente las etiquetas de texto a los puntos de datos en un gráfico de burbujas. Por ejemplo en este caso cada burbuja deberia tener los valores del N°FD ( d1, d10, d14 , etc) Gráfico Burbújas.rar Gráfico Burbújas.rar

TextBox Change: Pérdida primera pulsación Buenos días, Adjunto hoja con formulario que incorpora 2 textbox programados para que, con el método change, al introducir datos en uno se borre el otro y viceversa. El problema que tengo es que pierdo la primera pulsación cuando, tras rellenar uno de los textbox, escribo en el otro.:confusion: ¿Cómo puedo solucionarlo? Gracias, Juan. TextBox Pérdida Primera Pulsación.xls

Muy buenos días a todos. Estoy realizando un formulario para mi trabajo y necesito ayuda con algunos puntos específicos. Primero, quisiera saber como puedo hacer para que mis txt_purchase y txt_date_corte se ingresen con el formato de las celdas C8 y C9. Segundo, como puedo hacer para que cada vez que filtre lo que escriba en mi txt_busqueda, en mi LISTA (listBox) se muestren todas las columnas que especifico en el código (+ de 10). Tercero, actualmente tengo que mi LISTA (listbox) me muestra todas las columnas de mi tabla, pero en realidad solo quiero que muestre las mismas columnas que en el segundo punto. Cuarto, quiero poner labels encima de l…

Buenas noches, tengo poco que me uni al grupo y la verdad es que eh aprendido mucho espero y me puedan ayudar: Mi Problemas es que tengo un listbox de cosulta y utilice 3 combobox como filtros avanzados (rangos), el problema es que a la hora de seleccionar el ultimo filtro no realiza la acción, puedo filtrar por negocio, después por marca pero cuando quiero seleccionar el tipo de producto no pasa nada, adjunto el archivo para que se den una idea. Gracias. Dejo el Link del archivo ya que pesa mas de lo permitido: https://skydrive.live.com/redir?resid=297C243EEC5E4321!1008&authkey=!AMTVcvVy1PQoDAc

Hola a todos, necesito ayuda. Estoy probando una macro que se ejecute a determinada hora, pero no logro que funcione. Este es el codigo de prueba: Sub hola() MsgBox ("hola") End Sub ------------------------------ Sub programada() Application.OnTime TimeValue("13:59:00"), "hola" End Sub Llega la hora indicada y la macro "hola" no se ejecuta Debo activar algo en algun lado o considerar alguna zona horaria? El archivo es de Excel for Microsoft 365 y están en el onedrive. Mil gracias!!!

hola leia por internet estas ideas: