Estoy tratando de hacer un código el cual use Solver para obtener una cantidad dentro de un filtro, de una pequeña base de datos. La columna "G" tiene los numero 1 (para configurarlo como binario después) La columna "D" tiene las cantidades que quiero que Solver revise para que me de una cantidad designada en la columna "i". El error que me arroja es "Error en el modelo. Compruebe que todas las celdas y restricciones son validas" Es posible que algunas celdas de variables estén marcadas como Integer, Binary o AllDiferent Sub busquedadecantidad() Dim cantidad, binario As Range Dim hoja As Worksheet Dim i As Integer Dim datobuscad…

Hola, tengo el siguiente problema, Esta tabla es para generar un listado de archivos pdf desde una carpeta (X) la idea es que sea un hipervinculo todas las columnas que veis con el texto en "Azul" Serian: Codigo, Codigo, Rev, Titulo del Plano o croquis Me da error en las Columnas 3, 4 y 5 no me permite abrir el hipervinculo pero si en la columna 1 Tambien queria saber cómo incluir la fecha de creacion del archivo (PDF) de forma automatica. Muchas gracias PRUEBA.zip

Hola a todos, me gustaría pedir ayuda con la siguiente macro. Adjunto hoja con datos relativos a lecturas de contadores de consumos, con dos pestañas: CONTROL y PARQUE En PARQUE están los datos. Decir que la tabla real sobre la que se ejecutará la macro tiene ahora mismo unos 17.200 registros En cada registro de la tabla se guarda un numero de ordenacion, numero de contrato, nombre y direccion, y despues relativo a cada trimestre de lectura del contador hay FECXXXX que es la fecha de lectura de un contador, LECXXXX que es la lectura que tiene el contador en un periodo determinado. En el campo INCIDENCIA se guardan las incidencias del periodo actual. En…

Hola, no se en que momento empezó a aparecer el signo de interrogación en la parte superior izquierdo del firmulario. Saben a que se debe?

Buenos dias a todos: Espero que me puedan ayudar, no se mucho de macros pero viendo tutoriales he podido listar los archivos de una carpeta a través de listado de nombres de una ruta y posteriormente tengo una macro que mueve los archivos de la carpeta "A" a la carpeta "B", pero los mueve todos, a mi me gustaría que solo moviera los que filtro. Sub MoverArchivos_Trabajo_en_curso_a_Compartido() Dim MiArchivo As String MiArchivo = Dir("D:\Users\carodrigueza\OneDrive - FCC\Prueba planos vigentes\01 Trabajo en curso\*") If MiArchivo = "" Then MsgBox "No hay archivos a mover.", vbExclamation, "torpe" Else Do Until MiArchivo = "" …

Buenas tardes, un gusto enorme ser miembro de este foro. Les pido su ayuda por favor, tengo cinco hojas y en cada una de ellas un rango y modelo de planilla diferente que se completan y se diferencian por fecha, la idea es que una vez que termino una planilla en la hoja, pueda copiar la misma planilla debajo de la primera ( pero vacia) y empezar el proceso de carga nuevamente, el problema es que no logro hacer que el foco del cursor se posicione en la primera fila de la planilla copiada y asi sucesivamente o en todo caso en la ultima fila de la nueva planilla copiada. Desde ya agradecido Remito codigo a modo de indicar lo que pretendo hacer Sub copiaryp…

Hello everyone from Maurizio I have a problem that despite its simplicity He's making me crazy. My problem is this:In an excel form: I entered Three Keys With the first key , if it is pressed I would like the Form to close with the function"Height"Conversely if I press the second key it should close using the function "Width"The Third key I simply use the " End " Function Therefore I close everything very quickly. Now my problem would be to get the two closures: " Width " and " Height " much more slowly that 's all ! I guarantee you that I have tried them all but precisely because I would like to keep this formula intact I haven't succeeded…

Buenos días: Dentro de un libro tengo una hoja "Datos" en la cual tengo referencias a una ruta "B4" y archivos a abrir (columna C), con una macro puesto en thisworbook (llama a otros archivos), este funciona bien. Los archivos los tengo en la misma carpeta guardadas en mi USB, trabajo siempre en la misma Laptop y por defaul asigna la letra D:, pero por nuevas necesidades debo trabajar en diferentes equipos pc o lap. y mis archivos no abrieron. tube que cambiar la letra de la ruta asignada, con la actual a mi usb manualmente. Se que puedo poner con una macro la ruta actual de un archivo abierto. Worksheets("Datos").Range("B4").Value = ThisWo…

Hola buenos días, me dirijo a ustedes para ver si me pueden ayudar con un sistema de prestamos que estoy haciendo, en el cual coloco el nombre de la persona el monto, la cantidad de cuotas, y el interés mensual. La idea es que al poner la cantidad de cuotas (que nunca van a superar las 12 cuotas), se calculen y se ingresen en las casillas de cuotas, y al lado de cada cuota esta la celda de Pagado o Pendiente que si esta pagado se borre el contenido de esa cuota y si esta Pendiente lo deje. espero que no este muy complicado Gracias. Adjunto archivo. cuotas.xls

Tengo una hoja para gestionar una empresa de seguros, y necesito hacer un filtro y que el resultado lo copie en la hoja agentes, el filtro quiero que se haga en una consulta que te pregunte que agente elegir y que el resultado lo pegue en la hoja Agente saludos y gracias no puedo subir archivo porque pesa mucho, quien quiera ayudarme le envio el correo mi correo es; cartayero1000 arroba gmail.com

Buenas noches, He recibido muchas recomendaciones de este foro, de la calidad de personas que lo administran y de que llegan a solucionar problemas que aveces parecen imposibles. En esta oportunidad quiero dejarles un archivo que me ha provocado varios dolores de cabeza. Todo esta especificado en el archivo, pero cualquier consulta me la hacen llegar. Desde ya les agradezco enormemente sus opiniones y apoyo. Noriega. Noriega Archivo_2003.xls

saludos la cuestion es que he estado haciendo una agenda telefonica en excel y gracias a la ayuda del compañero tese1969 logre la pare del buscador, pero ahora me da un error "error 91" cuando el nombre que se introduce en el buscador no se encuentra. y no logro acomodarla, otra cosa es que se queda pegado despues de hacer una busqueda y al darle (esc) para que se destrabe, vuelve a salir el mensaje que dice depurar o finalizar pero esta vez dice que la ejecucion del codigo se ha interrumpido. bueno si alguno sabe que es lo que pasa les agradezco la ayuda. AGENDA TELEFONICA v1.1.rar AGENDA TELEFONICA v1.1.rar

¡Hola a todos! Tengo un libro que dispone de tres hojas: - "DATOS", actúa como base de datos de los clientes asociados. - "PAGOS", es la hoja donde se registran los pagos por fechas efectuados por cada cliente. - "RESUMEN", es un resumen de esos pagos. Mi problema reside en la hoja resumen. En esta hoja deben aparecer los clientes y los pagos que han efectuado durante un año. La programación de la hoja debe ser la siguiente: 1) Crear una tabla general con los datos de los n clientes. Esto conlleva a que dependiendo de los clientes que haya en la base de datos, se debe generar n copias de un modelo de tabla individual ya diseñado. Creando así la tabla general con la…

hola a todo(a)s. Mi inquietud es la siguiente: tengo una base de datos de la empresa donde trabajo donde estan relacionados todos los clientes(entidades) que nos deben facturas. Mi jefe me pide que en esa matriz en excel cree a una manera de que excel me avise con un mensaje o ventana emergente cada vez que llegue la fecha de vencimiento de una factura. hasta ahora he intentado con la formula: [TABLE] [TR] [TD]A[/TD] [TD=width: 80]B[/TD] [TD=width: 80][/TD] [TD=width: 80][/TD] [TD=width: 80][/TD] [/TR] [TR] [TD=class: xl64]1[/TD] [TD]Fecha vencidas [/TD] [TD][/TD] [TD][/TD] [TD][/TD] [/TR] [TR] [TD=colspan: 5]12/04/2011 =Si(DIA(A2-NOV())<10~"AVISO"~…

HOLA, necesito comparar dos hojas de excel con un campo en comun como referncia y que mediente un boton al dar clik realice la compararcion mandando a otra hoja los datos que encontro de mas es decir si un el libro 1 hay 20 datos y en el libro 2 hay 15, me tiene que mandar en la hoja 3 los 5 datos nuevos que encontro al compara los libros anteriores...ojala me puedan ayudar es que tengo muchos dstos y tengo k ir pasando uno por uno...gracias COMPARACION.xls

Hola, A partir de dos macros que encontré en el foro (disculpen no recuerdo a los autores) hice esta macro, pero me da un error de automatización. Alguien que sepa VB me ayude porque apenas si entiendo esto. La macro es para enviar correos a travez de outlook, la lista de correos y los nombre de los destinatarios están en dos columnas en excel. Sub EnviaCorreo() Dim myOLApp Dim myOLItem Dim olMailItem Dim midire, minombre, miasunto As String Dim Firma As String Dim ts As Object Dim fso As Object 'se establece la ruta de la firma Set fso = CreateObject("Scripting.FileSystemObject") Set ts = fso.GetFile("C:\Users\Sergio\AppData\Roaming\Microsoft\Firmas\Se…

Saludos a toda la comunidad mi problema es el siguiente: Tengo dos celdas con los valores siguientes tiempo1 = 00:01:30 y tiempo2 = 00:09:00 donde tiempo1 va en aumento y tiempo2 es fijado por el usuario quiero realizar un macro en que el compare dichos valores y en el momento en que tiempo1 sea igual a tiempo2 me mande un mensaje avisandome que el tiempo es igual o si se pudiera una alarma sonora espero su respuesta de antemano gracias

Hola Todos; Soy algo nuevo con el tema de los macros en VBA, estoy tratando de hacer uno que aplique el goal seek en cada una de las celdas en un rango determinado. Lo que he creado hasta el momento es lo siguiente: Sub GoalS() For Each cell In Range("c133:n133") If cell <> 0 Then cell.Select Selection.GoalSeek , Goal:=0, ChangingCell:=Selection.Offset(RowOffset:=-95).Select End If Next cell End Sub Pero me genera el siguiente error: Run-time error '1004: Application-defined or object-defined error Quisiera su ayuda para detectar el error. Muchas gracias

Buenas quisiera que me ayuden para lograr que al apretar enter copie los datos en la otra hoja al igual que lo hace el macro del ejemplo PasarDatos02_io_fae.xls

Hola, Me he creado un libro con fórmulas personalizadas y lo he guardado como complemento para poder tener acceso a ellas desde cualquier libro. El "problema" es que cuando las llamo no me aparece la guía que te va diciendo que argumento tienes que introducir y me veo obligado a sacar el asistente. ¿Hay alguna manera de activar esa ayuda? Adjunto una imagen por si no me he explicado correctamente.

Hola tengo un código en excel para transferir datos a una tabla en access, la configuración de la tabla es: Campo llave es numérico; y los otro dos campos son tipo texto. En excel la primer columna es una fórmula de conteo correlativo y el resultado es un número por fila: =SI.ERROR(SI(B2="","",FILA()-1)+PARÁMETROS!$B$5,"") antes de agregar esa columna en mención, la transferencia funcionaba muy bien, de no poderse corregir el código, quisiera optar por controlar dicho error, y quisiera saber si es posible saltarlo y que continúe la ejecusión, gracias por su ayuda de antemano. Saludos!!! Sub ExcelaAccess_ADO() Dim Conn As ADODB.Connection, RecSet As ADODB.Recordset …

Estimados amigos del foro hoy he avanzado con códigos para la manipulación de imágenes vectoriales con los que se crean freeforms. En el archivo que subo se puede ver como, luego de crear la imagen, en base a las coordenadas dadas en la hoja 1, con X1, Y1...., se puede insertar segmentos o eliminarlos, enderezar segmentos o hacerlo curvos, colocar texto dentro de la imagen. No he logrado hacer funcionar el botón añadir nodo o editarlo. Este avance lo he logrado gracias a la gentil colaboración de Macro Antonio y Gerson Pineda. Ahora bien, lo importante aquí, es como hacer que con los botones de diferentes direcciones que he colocado en la parte de abajo de las coordenad…

Buenos días, Espera por favor me puedan ayudar con la siguiente situación que necesito solucionar. Requiero mediante una función personalizada en VBA o una macro que éste me liste los campos que tengo como filtros activos de una tabla dinámica. Ejemplo: el el filtro creado de esta tabla dinámica hay unos filtros activos como lo pueden ver, lo que necesito es que mediante una función o un código VBA excell me liste o me escriba separador por ",", los filtros que en ese momento estén activos en la tabla dinámica. Agradezco me puedan ayudar. Centro (Todas) …

Hola expertos si alguien puede ayudarme tenía un formulario con muchos textbox y combobox por la cantidad de datos que debo ingresar me funcionaba bien con los primeros 23 datos en vista con son muchos me vi obligado a usar un MultiPage puse unos botones para que vayan cambiando segun vaya llenado y al último grabar en la hoja de excel. Pero al agregar más código y objetos me perdí quisiera una ayudadita guiandome para poder completar mi proyecto. Gracias Grabar datos de MultiPage.xlsm

hola expertos mi problema es el siguiente tengo unos datos numericos en la columna dj; y necesito buscarlos y resaltarlo de color amarillo en el rango a1: cy42