Hola a tod@s Adjunto he añadido una carpeta que se llama Recibidos, dentro hay 2 carpetas A y B, ambas estan vacias. Estoy buscando la forma de crear de forma automatica un listado de las carpetas que se puedan crear en Recibidos, como es el caso de A, B, C,... etc. con el contenido que puedan tener. Quisiera a parte que al pinchar en B, por ejemplo, pudiera abrirse la carpeta en si para ver su contenido. La idea es que cada vez que el cliente nos envia documentos se pudieran guardar en recibidos con el nombre de la fecha de entrega (En este Caso pongo como ejemplo A o B o C o D, etc) y vieramos desde excel de forma automatica todas las carpetas que se…

Hola, les explico la problemática que tengo con una pequeña macro, esta Macro la ocupo para buscar y remplazar, me funciona muy bien con una condicionante, pero estoy intentando colocar 2 condicionantes y ahí es donde estoy atorado. Set h1 = Sheets("BD SALIDAS") Set b = h1.Range("A:A").Find(REMISION) If Not b Is Nothing Then End If Set d = h1.Range("C:C").Find(LOTE) If Not d Is Nothing Then h1.Cells(d.Row, "F") = (SALIDASLT) End If lo que busco es que la Macro encuentre el LOTE y que coincida con la REMISIÓN para poder sustituir el dato del TEXTBOX a la celda. agradezco mucho su ayuda.

Hola a todos, consulta como puedo hacer para que esta macro me guarde varios archivos en PDF Sub Macro1() Dim nombre As String nombre = Range("d12").Value Range("A5:W51").Select ChDir "C:\INFORMES" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\INFORMES\" & nombre & ".PDF", Quality:=xlQualityStandard, IncludeDocProperties:=True _ , IgnorePrintAreas:=False, OpenAfterPublish:=False End Sub

buenas tardes, tengo una macro que trabaja con datos, que los extrae de otras planillas y tablas web, cuando hago correr la macro, esta se demora aprox 2 horas en completar su proceso, lo que me imposibilita de trabajar en otras planillas existe alguna manera de abrir otro excel y poder utilizarlo a la par? tal vez con una maquina virtual o algo asi? muchas gracias por su ayuda

Hola, tengo el siguiente problema. En una hoja Excel tengo varias columnas con datos. Tengo la macro en la que en dos columnas concretas busca los datos repetidos, hasta aquí todo bien. No se continuar con la macro para que una vez que me ha detectado los duplicados en cada una de las columnas, me deje en la columna solo un registro de los duplicados y coincidentes en ambas columnas, borre o corte el resto y me los copie en otra hoja. Saludos Ejemplo.xlsm

Buenos días colegas. Espero se encuentren bien de salud. Buenos días colegas Haplox, nuevamente molestándolo, aunque cualquier miembro de este Foro puede ayudar. Sigo teniendo problemas con la inserción de consecutivos. Usted en anterior consulta me dio una respuesta muy acertada, la cual yo analicé y me di cuenta de los errores que usted detectó, pero ahora, cuando voy a escribir el código para el consecutivo de Cliente (FrmCliente) me imprime el primer registro, pero en el segundo ya no lo señala en el LblCodigo y por consiguiente no lo imprime en la Hoja. He buscado en el código de arriba hacia abajo y no me doy cuenta donde puede estar el error. Otra…

Estimados maestros buenas noches. Agradezco su ayuda al siguiente inconveniente: Dispongo de una Hoja (TAB) donde se encuentra información consolidad que es extraída de la hoja (Hoja1). La idea es disponer la información detalla hoja TAB por cada línea según lo que contenga la hoja1, debería contener todas (Hoja TAB) las celdas (columna "L") la información detallada según el código de producto (columna "D") de la Hoja1. Les comparto el archivo. Cualquier duda estoy pendiente. Muchas gracias. UNO.zip

Buenos días, espero se encuentren bien de salud compañeros, Favor me podrían ayuda con lo siguientes como se podría hacer cuando tengo una tabla dinámica que amedida que se aumente las columnas fechas con data un formula que se coloco al final busque o analice siempre la ultima fila y columna de la fecha. Coloco un ejemplo

Buenas soy nuevo en este de la programacion, necesitaba que alguien me pudiera guiar con una duda que tengo: Actualmente estoy trabajando en un formulario, este va a tener 2 combobox, de los cuales necesita seleccionar informacion dependiendo de lo seleccionado en el combobox anterior. Por ejemplo en el combobox 1 va a estar relacionado con una lista que definire en la columna A, digamos que la lista dice vehiculos y dice automovil, avion y barco, por ejemplo. Pero que el combobox 2 me permita selecionar datos dependiendo de lo que seleccione del combobox1, por ejemplo en la columna B defino las caracteristicas de un automovil, en la columna C las caracteristicas del avi…

Que tal, tengo la siguiente situación y no tengo idea de como resolverlo,la cuestión es esta, tengo 2 subrutinas y necesito que se aplique una u otra a partir de una desicion en este caso del usuario (ya sea moneda dolar ò moneda peso la macro insertara un valor), actualmente las tengo por separado pero no me es funcional. Igual y me complique yo solo en la forma que plante la solucion. opcion moneda.rar

Hola que tal a todos buen dia! Otra vez visitando este excelente foro, donde eh encontrado inmumerables respuestas a mis problemas, y con una atencion buenisima en esta ocacion sigo desarrollando la macro de la cual eh pedido ayuda anteriormente, ya que no logro resolverla al 100, eh cambiado drasticamente el codigo, les comento que ahora logro poner los resultados desde la celda B15 en adelante y junto a eso ya logre tambien el formato predefinido en cada celda, pero ahora el problema que tengo que es por ejemplo si encuentra de la hoja ACAPULCO 5 datos, solo me muestra uno si y otro no, es decir en este caso solo me muestra el segundo dato y el cuarto, por mas que eh b…

Hola a todos!!! Planteo el problema que tengo... El objetivo es que vía VBA se siga un hipervínculo tal cual como si lo hubiese hecho con el puntero del mouse ejecutando click. En el libro llamado "Principal.xls" en su hoja "Ctrl" rango "A9" esta el hipervínculo. Libro llamado "HP_2012.xls" el cual contiene una hoja "Feb". Ahora bien en el modulo1 del libro "Principal.xls" inserto las siguientes lineas: Range("A9").Select Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True[/HTML] Ejecuto la macro y se debería de activar el rango mencionado, y no es así. ¿A que se debe que el resultado no sea el esperado? Adjunto archivo para visualizarlo mejor…

Buenas tardes a todos, es la primera vez que posteo aqui, aunque he buscado varias cosas, siempre con buenos resultados, pero esta vez no encuentro lo que busco: Busco colocar, siembre que exista, los datos de la columna A, en la primera celda libre que encuentre de su misma fila: No soy experto en VBA ni programacion, pero he encontrado una formula que modificandola queda asi: Sub ttt() ActiveSheet.Cells(17, 1).Select Selection.Copy ActiveSheet.Cells(17, 1).End(xlToRight).Offset(0, 1).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False ActiveSheet.Cells…

Hola, soy nuevo en el foro y queria compartir esta inquietud que me ha surgido a ver si alguien me puede ayudar. Tengo la siguiente plantilla en la que he logrado que al ingresar un dato en columna "A" se genere automaticamente fecha y hora actuales en columnas "B" y "C", bien pues ahora lo que necesito es que en columna "E" si la opcion seleccionada es "si" que se generen en columna "F" y "G" fecha y hora actuales respectivamente. A su vez me interesa que una vez ingresado los datos no se puedan modificar y que el dato numerico que se ingresa en columna "A" no se pueda volver a ingresar (que no se repita) a menos que tenga la opcion "si" seleccionada en columna "E". …

Buenas gente, esot y programando una macro la cual al llegar a la sentencia : Cells(2, columna).Activate me tira: se ha producido el error 1004 en tiempo de ejecucion: error definido por la aplicacion o el objeto me seria de gran ayuda si identifican la causa del mismos. el codigo completo es el siguiente: Dim f As String Dim contadorhija As String copiado = 0 columna = 3 contadorpadre = 3 Windows("Herramienta Patricio.xlsm").Activate Cells(3, 1).Select 'ciclo recorredor de padres Do Until IsEmpty(ActiveCell.Value) ref = ActiveCell Set Fso = CreateObject("Scripting.FileSystemObject") 'suspende macro se falta una estructura If Not (Fso.FileE…

Hola: Tengo una tabla a la que necesito estarle agregando nuevas filas al final de la misma con el propósito de, a su vez, ingresar nuevos registros desde un formulario. La inserción de cada nueva fila al final de la tabla deberá ser encima de la última fila, con el propósito de que no se pierdan las fórmulas y formatos definidos. No encuentro como hacerlo por medio de VBA. Gracias anticipadas.

Saludos Excelistas: Me he topado con un problema complicado Se trata de una lista de contenido donde cada fila se corresponde con un palet de un proveedor. Lo he diseñado como una lista de validacion concatenando los datos ya que las listas no permiten varias columnas. El hecho es que cuando termine de introducir el dato, los "desconcatene" y coloque en sus respectivas celdas. He pensado en el evento change y que coloque esos valores . Me podeis echar una mano con el procedimiento. Adjunto un fichero de muestra De antemano muchisimas gracias Duda Lista.xls

Hola. Estoy intentando realizar un macro que haga una cuenta regresiva a partir de 10 minutos, hasta aquí, me funciona bien, el problema que estoy teniendo es que si por equivocación vuelvo a pulsar el botón que inicia el cronometro de cuenta atrás, se vuelve a ejecutar y tiempo va mucho mas rápido, algo parecido me ocurre si pulso el botón de parar crono cuando el reloj está parado, aunque aquí el error es 1004. ¿hay alguna manera que no me deje correr una macro si esta ya está funcionando para iniciar el crono y que si ya está parado que no funcione la macro de parar? Gracias de antemano Paco

buen dia a todos,adjunto ejemplo de lo que deseo con detalles escritos;gracias buscar datos clientes y remitir.zip

Buenas, soy nuevo en el foro y desde ya agradezco por el tiempo que se dan en leer mi pregunta…. Tengo el siguiente problema, llevo varios meses realizando un proyecto en Excel, donde e invertido varias horas de mi tiempo en la generación de macros y código vb en la misma planilla… El tema es que simplemente quiero proteger mi trabajo, para esto protegí las hojas…. Pero me encontré con que agregando una macro puedes desproteger la hoja… bueno agrega password al proyecto de vb y con eso no se puede ni ver el código, ni ver las macros ni agregar macros, perfecto dije…. Pero al buscar en Internet me di cuenta que de igual manera se pueden “Violar” los proyectos para sacar …

estimados amigos he creado un formulario en el cual ingreso datos con userform pero en la hoja de Excel donde se llenan los datos para buscar ejemplo el la celda de RUC del generador ya no busca por que cuando lleno con el userrform el la celda de la base de datos generador sale error y eso no permite que la formula de buscar lo encuentre eso sucede igual con lo que es la celda de licencias me dado cuenta que sucede cuando ingreso números quiero ver como modificarlo que me acepte la búsqueda agradesco de ante mano la ayuda que me puedan brindar he eliminado dos userform por que el archivo es pesado solo he dejado lo del generador haber si me ayudan MOVIL 5.xls

SALUDOS...... AMIGO DEL FORO REQUIERO AYUDA EN UN ARCHIVO Q DISEÑE TRABAJA EN VARIOS EQUIPOS PERO EN ALGUNOS DE LA MISMA VERSION ARROJA PROBLEMAS DE COMPILACION O ERROR DE PROYECTO NO SE PUEDE ENCONTRAR LA BIBLIOTECA

Buenas Tardes, lo que deseo es que a la siguiente Instrucción escrita en un modulo: {If Target.Address = "$AQ$3" Then Call abre"} le pueda anexar una condional más por ejemplo que el valor de la celda en cuestion sea agual a "0", esto estrictamente para que se pueda ejecutar la macro "abre" Gracias.

buenos dias amigos del foro nuevamente recurro a ustedes tengo un macro que aporto el maestro Gerson Pineda y que hemos estado adaptando a mi necesidades con ayuda de mi amigo Pajuma, el macro corre perfecto , el problema que tengo ahora es que cuando carga los datos del listbox y lo mando a imprimir lo pasa en otra hoja y necesito que me haga la suma de lo que manda y cambie los encabezados a las letras color amarrillo y el fondo en azul, este es el codigo que utilizo, adjunto el archivo Private Sub CommandButton5_Click() Worksheets.Add Cells.Select Selection.ClearContents With Range("A65536").End(xlUp) Dim fila As Integer For fila = 0 To ListBox1.ListCount…

Buenas tardes, necesito comparar dos hojas excel y que me dé el resultado en una tercera hoja. Os dejo las dos hojas junto con una tercera de como debería quedar. Sin duda he encontrado soluciones similares pero no la misma. Me gustaría no tener que molestar con este tema, pero no tengo tiempo para desarrollarla yo mismo. Me encantaría, pero no dispongo de mucho tiempo. Gracias de antemano y saludos. Argucias1979 EJEMPLO.xls