Hola, tengo el siguiente problema con una macro. Tengo dos libros que hacen lo siguiente: - Libro "Crear libro". En la Hoja1 de este libro hay un botón que crea un libro nuevo llamado "Results". - Libro "Libro1". Este libro cuando se activa copia los datos que hay en el rango a2:m2 del libro Results y a continuación elimina el libro Results. El Libro1 siempre lo tengo abierto. El problema que tengo es que el Libro1 sólo ejecuta la macro cuando se activa. Es decir para que el Libro1 copie los datos de libro Results debo maximizarlo. Lo que me gustaría es que el Libro1 ejecutase la macro automáticamente, es decir, sin necesidad de activarlo. Cada vez que el libro Resu…

Buenas tardes Saldudos a todos los maestros de este foro, la presente consulta tiene lo siguiente. tebgo un archivo que se llama reporte ahi hay 4 hojas, la hoja de recibido y procesado el usuario es "alejo". la hoja de procesado es "Favian" y la hoja de enviado el usuario es "Julyp"., en el otro libro reporte tienda, solo basta que ejecuten la macro desproteger. La consulta es la siguiente como puedo mejorar el codigo para que las hojas no queden tan pesadas. (no se si son las formulas). La otra consulta es en libro reporte a tienda en la columna (I) deseo saber los dias habiles sin contar los sabados, domingos, y los dias que son festivos en el mes. (en la hoja2 los…

como conectar una base de datos access usando visual de excel, para logear una tabla login(usuario y password)

Primero debo agradecer al master Macro Antonio, por la ayuda, el detalle es que creo que no me di a explicar bien, el filtro es bueno, pero como comente los registros son suceptibles a modificacion o en su caso a eliminacion, entonces puedo editarlos con el activecell, el detalle del activecell es que al aplicar el filtro no funciona y el filtro es para poder buscar y modificar los registros por que van a hacer muchos. subo el archivo que el master me ayudo solo espero me puedan ayudar con esta peticion Gracias otra vez LISTBOX (1).rar

Hola, antes que nada gracias por permitirme formar parte de esta comunidad. Gracias a ello he logrado llevar adelante este proyecto de registro de alumnos en el que estoy trabajando. Pero en esta ocasión hay una parte en la que no puedo continuar. Como dije antes es un registro de alumnos. En la hoja menú están los botones que me permitirán hacer las diferentes opciones, mi problema concreto es con el formulario CONSULTA, al cual se accede desde la hoja MENU y el botón CONSULTAR FICHA INDIVIDUAL. He conseguido que el combobox del formulario me muestre la lista de alumnos con sus nombres y apellidos, se supone que luego de eso al presionar el botón CONSULTAR FICHA, el fo…

Que tal como estan..... soy nuevo en esto de empezar hacer macros en excel, y tratando de hacer la siguiente consulta Private Sub CargarData1() Set rs = New ADODB.Recordset 'consulta = "SELECT * FROM example" consulta = "Select idappact, codappact, desapeta, desapsub, nomapact, resappact, Date_format(fecappini,'%d/%m/%y'), " & _ " Date_format(fecappfin,'%d/%m/%y'), Date_format(fecapprea,'%d/%m/%y'), porappava, obsappact, diaapact, obsextact From appactividades " & _ " INNER JOIN apetapas on idapeta = idappeta INNER JOIN apsubetapas on idapsub = idappseta " & _ " INNER JOIN apactividades …

Estimados, Estoy tratando de concatenar unos datos que cumplen cierta condición. Buscando por ahí encontré la función concatenar.si, me sirve pero tengo el problema que el valor que busco tiene muchas entradas iguales a concatenar y me las repite el numero de veces que la encuentra, y no he logrado que me la coloque una sola si es igual y concatene si es distinto. Encontré una macros que lista los valores sin repetir, la uní con la primera pero solo me pega el ultimo valor que tiene la condición buscada y el ultimo del rango que busca, intente de mil maneras, pero no lo solucione, si alguien sabe algo o puede darme una mano se lo agradecería. Saludos. c…

estimados compañeros del foro, si son tan amables de darme sugerencias con una macro,a la cual para mi gusto no le falta nada mas que al copiar a otra carpeta,esta no pierda el ancho de las columnas. esta es mi macro: Sub Salvar() mio = ActiveWorkbook.Name ruta = ActiveWorkbook.Path Workbooks.Add otro = ActiveWorkbook.Name Workbooks(mio).Activate nombre = Range("E4").Value Range("A1:K63").Copy Workbooks(otro).Activate Sheets(3).Select Range("a1").Select ActiveSheet.Paste ActiveWorkbook.SaveAs ruta & "\" & nombre ActiveWorkbook.Close False MsgBox "proceso terminado. El archivo se ha guardado en la carpeta: " & ruta &a…

Buenas tardes! Quiero insertar una imagen en formato JPG si se cumple una condición, tengo una celda donde me arroja un porcentaje, a lo cual debido a ese porcentaje me aparezca una imagen .jpg a lo que pretendo tener 3 imágenes 0-50% muestra img01.jpg 51-70% muestra img02.jpg y 71-100% muestra img03.jpg

Buenos días, trataré de ser lo mas clara y concreta posible: Necesito una macro que me permita eliminar de la Hoja 2 todas las filas cuyos códigos ya existan en la Hoja 1[ATTACH]41559.vB[/ATTACH][ATTACH]41557.vB[/ATTACH] De verdad, muchas gracias.:culpability: ELIMINAR FILAS.xls

que tal buenas noches deseo indicar en un textbox el numero de copias que deseo imprimir ejemplo si pongo 1 se imprima una vez si escribo 2 o 3 mismas veces se imprima adjunto archivo donde se encuentra el userform de antemano les agradesco CONTEO.xls

Hola amigos, como hace tiempo, continúo con mi proyecto de Excel para Distribución y Control de Almacén....en esta ocasión tengo unas dudas a la hora de realizar operaciones con unos textbox dentro de un userform (Devoluciones) que he creado en la hoja Albaranes. En resumen, os expongo lo que hace y lo que necesito: 1.- Dicho Userform (Devoluciones) me permite introducir artículos para devolución, los cuales se anotan en la hoja Devoluciones, para el Importe Total debe multiplicar la cantidad por el precio del producto y añadirle el IVA% que elija (hasta ahí lo hace perfecto), pero he añadido otro textbox con un R.E%, y no consigo que me haga la misma operación que con e…

Buenas tardes Tengo un textbox que al cambiar va a la hoja busca un dato y lo pone en un label; sin embargo me busca cualquier parte del dato. Me explico, si en la base de datos tengo valores que empiezan por el mismo valor busca cualquiera que tenga ese dato y no el dato exacto. Por ejemplo tengo en la base de datos el 10012 y luego 1001, si dígito 1001 el resultado que voy a obtener es el de 10012, ¿como hago para que me busque el dato exacto que dígito en el textbox?. Por favor ayuda... Private Sub TextBox1_AFTERUPDATE() If TextBox1 = Empty Then MsgBox "Por favor digite codigo a buscar" Exit Sub End If CLIENTES.Select busqueda = TextBox1.Value Set rang…

Hola!! Os pongo en situación, estoy con un proyecto personal, en el que necesito recorrer los datos de una tabla dinámica e ir importando los datos a otra hoja, todo esto con una macro Utilizando la siguiente función pero con unas modificaciones que comento mas adelante: "=GETPIVOTDATA(""[Measures].[suma de Clientes]"",'TD ACUMULADO'!R6C2,""[Clientes].[Año]"",""[Clientes].[Año].&[2015]"",""[Clientes].[Mes]"",""[Clientes].[Mes].&[1]"")" Con la función que he puesto devolvería el número de clientes que han pasado por una tienda el mes 1 ([Clientes].[Mes].&[1]) del año 2015 ([Clientes].[Año].&[2015]). El problema esta en como tengo que coger numero de cli…

Como les va ? yo necesitando de su ayuda con pasar algunos datos de un PDF a Excel, anexo dos archivos. Uno el PDF y una muestra de que datos necesito extraer, claro si se pudiera extraer todo el PDF seria mejor. Y Gracias por el favor. IDSE_Lote_198268597.zip

Buenas tardes, mi duda es que tengo una Base de Datos y un formulario hecho en otra hoja de calculo, ahi puedo seleccionar un número de referencia y segun eso aparecen los datos en el formulario, quiero que se guarde una imagen por cada Número de referencia que tenga la Base de Datos, que son unas 1000 aproximadamente, tengo ya hcha una macro pero solo guarda una a la vez, lo que quisiera es que tenga un botón que al seleccionarlo guarde las aprox 1000 imagenes de todos los "num. de referencia" con sus respectivos datos y la imagen ActiveX que apareciera, en el que he echo lo hace 1 a la vez, pero lo hace en mala calidad, eso tambien es un problema. BD-Inmuebles.zip

Buenas tardes, Tengo el siguiente Private Sub en mi hoja de cálculos: Private Sub Worksheet_Change (ByVal Target As Range) If Target.Column < 17 Then Cells(Target.Row, 16383).Value = Now End If If Target.Column = 18 Then Cells(Target.Row, 16384).Value = Now End If End Sub Pero me gustaría saber que tengo que modificar o agregar para que cuando se ejecute la orden de (Target.Column < 17 Then) al modificarse después de un registro no cambie la fecha y hora de creación. Al parecer el Excel está considerando colocar la fecha y hora cada vez que se modifica las 17 primeras columnas, lo ideal sería que la fecha y hora salga solo una vez, cuan…

Hola. Tengo una base en la que por columnas introduzco diferentes datos. Necesito una macro que me cree filas en blanco para introducir nuevos registros, pero no me elimine el formato y las fórmulas, porque sin ellas el resto de la base no tiene sentido, y las personas que le darán uso no estarán atentas para arrastrar las fórmulas de las otras filas hacia las nuevas. Solo conseguí la macro que crea filas nuevas, pero me copia el valor de la fila superior, y si ordeno limpiar las celdas no consigo que me respete las fórmulas. A ver si alguien me puede ayudar, muchas gracias.

Estimados, Espero que se encuentren muy bien, necesito ayuda para poder realizar un buble con for para encontrar un valor que no se en que fila y columna esta, entonces estoy tratando de buscarlo con tres for, pero no logro traspasar la fila y columna encontradas para despues ejecutar el ultimo for para llenar mi tabla. por favor su ayuda. saludos.

Buen día amigos, Estoy intentando insertar un N° determinado de filas según las cantidades del ítem.Ejemplo.xlsx Es como pasar de una tabla dinámica a la base original. Lo importante es que tiene que haber 1 ítem por cada fila. Por ejemplo, en la fila 4, tengo 5 unidades del producto que se menciona y lo que yo debo hacer, es desglosar esas 5 unidades para que queden 5 filas con 1 unidad de ese ítem. En el archivo se puede apreciar el desglose que necesito. Favor de su ayuda. Saludos

Hola amigos, espero se encuentren bien, quiero comentarles que acabo de realizar un pequeño archivo donde en una hoja tengo una tabla (pudiendo contener mas de 10,000 registros) que deseo imprimir en etiquetas, es un registro por etiqueta, para lo cuál usé la función CICLO FOR en vba y generar así la impresión. Mi impresora actual es una TSC ttp244pro, según lo que sé es que esta impresora no tiene mucha capacidad de memoria para guardar o para imprimir, por lo que las impresiones salen lentas. Me gustaría saber si alguien sabe como mejorar la macros para que pueda imprimir más rápido ya que en la cola de impresión un trabajo por etiqueta, no sé si exista forma…

Buenos días a todos;-Os voy a insertar un enlace de mi requerimiento donde os explico un poco lo que quiero conseguir si es posible.Enlace video: Video textBox En la macro tengo un textbox con la propiedad multiline en true.Al ir escribiendo una vez que llegue a un número de caracteres hace como un salto de línea y empieza e escribir debajo para eso lo que hago es ir aumentando el alto del textbox y Frame.Mi idea es que una vez que yo haga clic en el textbox este aumente el tamaño del alto si no coge en la línea hasta hacerlo coger todo y al hacer doble clic que recupere su tamaño inicial.La simulación la he hecho solo aumentando el alto y no sé si se puede tamb…

Buenas ? A ver si me podéis echar una mano, tengo un formulario que lo llamo desde cualquier hoja del libro y quiero que en una hoja fija y en una fila fija me inserte una fila entera, sin que el formulario cambie independiente de la hoja en la que em encuentre, es decir copie el formato de su fila superior lo desplace hacia abajo y lo copie en el huco desplazado. Sheets("Hoja Fija").Select Rows("4:4").Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove con esto me lo hace lo que quiero , pero claro me lleva a la hoja en cuestión, y no es lo que necesito, ya que el formulario que lo hace solo es para mirar los datos de una tab…

Hola a todos: ¿Podrían ayudarme con esto? Ya he tratado de distintos modos sin éxito. En la celda G7, debo atregar un folio de documento, pero a ese folio (dependiendo del mes) se le debe agregar el numero del mes y el año. Entonces, el folio es "2457" y el mes es "02" y el año "23", por lo tanto en la celda G7 yo debo escribir "AC0223-2457" La idea es que solo se capture el folio "2457" y que automáticamente se agrege "AC0223-" Ya intente con una macro que agrege el texto cuando se modifique la celda, pero cuando la macro agrega el texto se está volviendo a modificar la celda y se cicla el proceso. ¿alguna idea? Les agradezco de antemano su apoyo. …

Buenas, comunidad ayudaexcel. He tratado de resolver este dilema por mi cuenta desde hace un par de días, pero dado que aun soy muy novato en cuanto a Excel se refiere he decidido consultar con ustedes. Aun no estoy muy seguro si es posible, pero ¿se puede de alguna forma plasmar un textbox activex dentro de la fórmula de una celda? Y si existe esa posibilidad ¿podrían indicarme como se declara dentro de la misma? Se como hacerlo a la reversa (de celda a texbox) y me funciona de esa forma, sin embargo mi objetivo es hacer que el usuario le sea más cómodo pegar contenido dentro del textbox sin tener que hacerlo directamente a la barra de fórmulas para que todo quede…