estoy parado en una consulta de una tabla y volcar parte de esa información a unas celdas. Sub BASE_DE_DATOS() Dim datConnection As ADODB.Connection Dim recSet As ADODB.Recordset Dim strDB, strSQL As String Dim strTabla As String strDB = "C:\Users\****\Desktop\TRABAJO\INFORME DIARIO RETRASOS LPA.mdb": MsgBox " Usted esta conectado a la base de datos ", vbInformation, " Conectado " 'si en otra carpeta 'nombre de la tabla del archivo Access strTabla = "RETRASOS" 'crear la conexión Set datConnection = New ADODB.Connection Set recSet = New ADODB.Recordset datConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source =" & strDB & ";" 'consu…

Estoy haciendo un formulario, y deseo que cuando yo de click en el boton agregar me copie los campos llenados y me genere un folio consecutivo al ultimo generado, pero realmente no se como poder hacerlo espero me puedan ayudar. ya adjunte mi archivo, acabro de hacer una macro que lo que hace es que copia todos los campos que yo llene y los pone en la hoja de "Base", pero el unico campo que me hace falta que genere y copie es el de folio, y no se como hacerlo. Ejemplo.xls

tengo un libro con 20 hojas, 1 por cada deposito de vino, la cuestion es la siguiente: -hoja de deposito 1: fecha entrada salida a deposito total 1/1/1 1000 1 1000 "/2/2 100 2 900 -hoja de deposito 2: En la hoja del deposito 2 deberá aparecer esa ultima linea automáticamente fecha entrada salida a deposito total 2/2/2 100 100 2 100 solo se copiaría hasta la celda total, el resto no porque tengo datos externos

Hola a todos, estoy realizando una macro, tengo una base general, y otra separada por cliente, la idea es buscar la informacion de cada cliente en la base general y llevarla a la base por cliente, pero si el nombre del cliente se repite, ¿como hago para que cada vez me lleve la ultima informacion sin quitar la que dias anteriores se puso? Macro BPA.txt

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

Holas El archivo Ayuda.doc es como deberia quedar. Adjunto el Excel desde el cual armo el word. Solo me faltan aplicarle algunos formatos como negrita y cambiar la forma de la viñeta. Alguien podria ayudarme?. Tambien me gustaria saber si el código se puede resumir mas, ya que creo que estoy siendo muy extenso cuando podria ser mas corto. Gracias de antemano. saludos, Francisco ExcelExport.zip

Hola. Tengo el siguiente problema. Tengo una macro que abre un formulario y me permite elegir distintas impresoras para imprimir una hoja. Hasta ahí todo bien. El tema es que cuando elijo la impresora XXX Excel queda en la impresión rápida (el icono que está en el menú de arriba) con esa impresora y no con la que Windows tiene determinada. Esto queda aún si abro un nuevo libro. Lo que yo quiero es que de alguna forma la macro haga que la impresora rápida o impresora por defecto de excel vuelva a hacer la predeterminada por Windows que a su vez es una de las impresoras de la lista que tengo para elegir. He probado con el siguiente código al final de la macro pero no func…

Buenas, Querría saber cómo se puede crear un formulario como el de la funcion Buscar Y Remplazar con varias pestañas y subopciones. He aprendido a crear un formulario sencillo y que la información introducida alli se vuelque en una tabla de excel a medida que se introducen los datos, pero quiero aprender a crear formularios más complejos y que se ejecuten al teclear una secuencia de letras- Gracias x adelantado. fdbchp

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

Hola. Ya llevo bastante tiempo trabajando (con mucha ayuda de ustedes) en un Excel (test) con un form. La idea es utilizarlo en mi trabajo para gestionar documentos, después de algún tiempo ya lo llevo bastante avanzado pero ahora tengo un gran problema. La idea es que la información que contiene el Excel debe ser modificada por varias personas al mismo tiempo (de 4 a 5), sé que Excel tiene una opción que ya he utilizado “compartir libro” pero aparentemente esta opción no funciona en libros con macros, ya que las bloquea y el archivo queda “inútil”. La idea que se me ocurrió es tener un archivo con únicamente información (base de datos), compartido y desde otro archiv…

hola a todos aqui tratando de hacer la siguiente tarea : lo que hago manualmente es lo siguiente: abro un archivo en una carpeta x , este archivo es en formato xls , luego abro otro archivo que es el archivo de formato especial que contiene 2 pestañas luego copio desde el archivo de la carpeta todo la hoja ,al archivo de formato especial despues seleciono la celda j2 de la pestaña Solicitud cliente del archivo formato especial, copio ese dato y luego me voy a la pestaña CSV COMMA DELIMITED , para despues guardar el archivo con el nombre de la celda J2 en formato csv delimitado a nivel gravador de macro me da este codigo, Sub es() ' ' es Macro ' ' R…

¡hola Por favor si alguien me puede ayudar, necesito ocultar la barra de desplazamiento vertical de un cuadro de lista en VBA Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function ShowScrollBar Lib "user32" (ByVal hWnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long Private Const SB_HORZ = 0 Private Const SB_VERT = 1 Private Const SB_BOTH = 3 Private Sub ListBox1_Click() End Sub Private Sub UserForm_Initialize() Dim lngMyHandle As Long lngMyHandle = FindWindow("THUNDERDFRAME", Me.Caption) ShowScrollBar lngMyHandle, SB_BOTH, True End…

buenas tardes amigos hace tiempo encontré una consulta en otro foro pero es exactamente lo que necesito espero me puedan ayudar en esta ocasión quisiera pedir apoyo para lograr un control de Inventario Bajo tres Variables de Control, es decir, en lugar de solo controlarlo por medio del Item, también se pueda ese control con Lotes y Caducidades. He intentado varias cosas pero no logro cristalizar mi idea.... Dado esto, es que no subo un archivo, solo comparto la idea por si alguien lo tiene o lo sabe hacer. Se Ingresarían al Inventario Productos que tienen un código de Referencia, un Lote de Fabricacion y una Fecha de Caducidad, el proveedor puede surtir un solo codico…

Estoy tratando de crear una macro sencilla que opere dentro de un libro que está protegido y que opere con hojas protegidas. La respuesta que obtengo es "error 1004". Si desprotejo el libro y las hojas, funciona sin problemas. ¿Hay alguna posibilidad de que trabaje de la forma que pretendo? Gracias.

Muy buenas, me gustaria saber si es posible la creacion de una macro la cual coja la primera imagen de la base de datos de google de los articulos que tengo en una lista y los ponga en una columna a parte y que para que esta imagen sea valida tenga unas dimensiones especificas(600x480)minimo. Adjunto lista, saludos. Necesito que sea la url de la imagen y no la imagen en particular lo que consiga. ListaPrecios(4).rar

Buenos dias.amablemente les pido lo siguiente, les agradeceria su colaboracion establecer un rango entre 4 columnas de distintas hojas, comparar estas columnas, buscar los datos iguales de las mismas, y si encuentra estos datos establecerles el color amarillo en la columna donde encuentra los datos.

Alguna macro que me pueda ayudar, si recibo un archivo adjunto en mi outlook de determinados remitentes y si es posible con determinado nombre, guardarlo en una carpeta en mi PC, e ir sustituyendo el archivo en la carpeta, cada vez que lo reciba. Cabe mencionar que el archivo almacena datos diarios en una planilla mensual, es decir la intencion es actualizarla diariamente, guardar el archivo diario con el nombre del mes para irlo actualizarlo. Al cambio de mes hacer lo mismo con el siguiente. Gracias!

Hola a todos, Tengo una macro que lo que hace es separar cuentas pendientes por cada uno de mis clientes y las envia directamente a su correo. El problema es que cada uno de los correos que manda pesa 4mb y esto me vuelve muy lento tanto mi excel como mi outllok y en realidad no es un archivo grande el que manda. Habra alguna opcion para que estos correos se hagan un poco menos pesados? De antemano, gracias por sus comentarios. Les adjunto un ejemplo de lo que envia la Macro: EjemploMacro.xls

Tengo un fichero en el cual utilizo dos combobox sincronizados de tal manera, que al seleccionar un valor en uno de ello, en el otro me muestra el valor que le corresponde ubicado en otra lista. Se me ha presentado un error en tiempo de ejecución al ejecutarlo y no he podido dar con lo que lo produce. Por ello, solicito la ayuda de alguien que me indique cómo solucionarlo y me describa por qué se produce. De antemano. gracias. Subo el fichero para mayor comprensión. Editado: Subo nuevo fichero con menos datos por si es cuestión de peso. Gracias por responder Macro Antonio. RELIQUIDACIÓN.rar

He diseñado un pequeño formulario para volcar los datos introducidos en una tabla excel del mismo libro. He conseguido que el formulario aparezca pero no se transfieren a la tabla excel. No sé si puede ser un problema de las macros creadas. ¿Alguien puede echarme una mano? Borja STAR.rar

Hola a todos. Estoy intentado crear una Macro para extraer los datos de varios archivos, mismo formato, y unificarlo en uno general. Mi problema es que estos archivos individules se actualizan constatemente, es decir, que al consultarlo a primera hora puede existir 100 registros y a media mañana 50 registros más. Al crear la macro no tengo problema, pero si esta macro la ejecuto transcurridas varias horas despues de creearlo y al tener más registros lo archivos individuales, en el archivo donde la ejecuto se pisan los datos. Con lo que pierdo información. Por favor, alguien me puede ayudar. No adjunto archivo Un saludo Germán

Qué tal foreros? Sub UseOpenXML() Application.Workbooks.OpenXML _ Filename:="customers.xml", _ LoadOption:=xlXmlLoadImportToList End Sub [/CODE] En este comando, quiero saber como abrir el archivo con un nombre que no cambie jamás. Lo tengo dentro de un loopy el nombre debiese quedar igual independiente del nombre. Luego de abrir, cierro el archivo creado sin guardarlo, pero si necesito que ese archivo se llame siempre "Book1.xls" o algo así.Les agradeceré que me enseñen cómo se hace. Saludos.

Hola a todos de nuevo, tengo una preguntilla, aunque me temo que en este caso la respuesta va a ser que no se puede hacer lo que necesito: Tengo una tabla dinámica donde he introducido un campo calculado "indx10Ha" que me debe coger los valores de otro campo "ind" (que es una función promedio) y multiplicarlos por 4, sencillito hasta aquí. El problema viene en que eso lo debe hacer sólo en la mitad de los valores (los que corresponden con datos "DB" (dentro de banda) y no con los datos "FB" (fuera de banda), (sin ver el ejemplo no creo que con esta explicación os aclaréis mucho") lógicamente la tabla dinámica lo hace con ambos valores, DB y FB, El fallo no es demasiado …

tengo varias hojas html y quiero unirlas en un solo libro. Esto es para imprimir.

Muy buenas tardes, les pido el favor para ver si ustedes muy amablemente me pueden colaborar con la siguiente macros: una macro que busque una identificasion en varias hojas en excel, que salga un mensaje que diga si o no la encontro, si encontro dicha id , que copie la palabra "si" en una celda de una hoja destino ya seleccionada por el usuario y que siga copiando la busqueda debajo en la misma columna de esa hoja destino , al igual lo mismo en las demas busquedas de las otras hojas y arrojar el resultado en las otras hojas destino tambien. - - - - - Mensaje combinado - - - - - les agradeceria mucho que me colaboraran con esto. a todos buen dia. gracias. libro2.…