he intentado realizar el rango dinámico para mis tablas (para poder automatizarlas) pero no he logrado dar con la formula, intente dando nombre al rang0, pero me da error cuando quiero cambiar el origen de mis dinamicas. adjunto el excel y en cuestion es la pestaña detalle la que alimenta las tablas. muchas gracias Dropbox - Control Asistencia al 2 septiembre.xlsm

Hola de nuevo; Estoy tratando de fijar conceptos sobre los rangos. En la macro que adjunta he implementado un procedimiento que se me sugirió aquí en el cual la macro me da el primer rango del encabezado de una tabla. Estoy intentado hacer lo mismo con el último pero veo que al ir insertando columnas no devuelve correctamente el rango. A ver si me podéis indicar donde estoy fallando. Adjunto la macro. Saludos a todos. MCR.xlsm

Buenas tardes. Tengo un ListBox creado con un rango actual seleccionado de RowSource = 'Hoja'!'A1:C20 Dicho rango es una base de datos que irá aumentando en filas, como puedo hacer que dicho rango se adapte a la ultima fila con valores?? Por ejemplo si la ultima es la fila es la 25 que el rango sea 'Hoja'!'A1:C25 y así sucesivamente. Si pongo un rango muy grande me aparecen muchas filas vacias en el ListBox y queria evitarlo. Gracias Esta lista

Hola, esta es mi primer consulta, necesito crear una macro que aplique formato de celda a un determinado rango, que tendria que ir desde la celda A1, hasta la celda A, y el numero de fila, estara determinado por el valor que el usuario indique en la celda C1. Es decir, si tengo C1=10, entonces la macro debera aplicar formato al rango A1:A10. Si tengo C1=12, entonces la macro debera aplicar formato al rango: A1:A12. Gracias.

Saludos. Deseo acceder a una celda concreta en una Tabla a traves de su cabecera como Columna, la cual se ha definido como rango, y no se si se puede hacer. He probado de acceder mediante el siguiente codigo pero obtengo un error. Tabla_Trabajo.Range("Dia-Semana" & i). La objetivo final es poder, en un momento dado intercalar una nueva columna en la tabla, y mediante la deficion del rango de esa columna, acceder a cualquier celda de ella. Con eso evitaria reescribir el codigo existente modificando las letras de las columna que hicieran referencia a las columnas desplazadas a la derecha por la inserción de la nueva columna, en las macros asociadas a esa…

Buenas tardes a todos: No se puede trabajar con rangos protegidos y otros no (editables) en las tablas. (O quizás desconozca la forma de hacerlo). Me han dicho en el foro que con las tablas la única forma de hacerlo es a través de VBA. Y por supuesto recibí con satisfacción la forma de hacerlo. Sin embargo se trataba de una tabla sencilla con apenas 5 columnas. Ahora tengo que hacerlo con una tabla de entre 20 y más columnas y se me complica mucho con el condicional IF y todos los operadores lógicos que hay que escribir. ¿Existe otra forma de hacerlo y que además evite la lentitud que crea tantos operadores lógicos? Muchas gracias Rubén …

Buenas tardes, Estoy realizando un macro donde me consolida toda la información o todos lo valores en una hoja , el mismo que me alimenta un grafico, este grafico siempre tiene que mostrarme los 3 ultimos meses. A B C D E 1 MESES TIENDA1 TIENDA2 TIENDA 3 2 OCTUBRE 1000 2000 3000 3 NOVIEMBRE 1800 2500 3200 4 DICIEMBRE 2500 5000 6000 5 ENERO 6 Para ser mas explícito, cada vez que ejecuto mi macro me agrega el nuevo con sus valores respectivos per mi grafico que siempre me debe mostrar la inf. de los 3 ultimos meses lo realizo manualmente, Este caso mi problema es actualizar el rango automaticamente, actualmente esta (b1:e1,b2:e4), cada vez q ejecuto la macro debe …

Estimados, soy nuevo en el foro y necesito su ayuda. Tengo un archivo de ventas por cliente y por mes. Necesito extraer los mejores clientes (Cantidad a definir) y el diferencial que quede en otros clientes. Actualmente lo tengo mezclado ya que extraigo con macro registro único y con formula extraigo las ventas por mes cada cliente, de esta manera tengo las ventas mensuales por cliente. Luego manualmente ordeno de mayor a menor según las ventas totales. Elijo los mejores clientes según este ordenamiento y muestro el ranking de los mejores y la diferencia a otros clientes. Todo esto quiero hacerlo con una macro donde solo ingrese la cantidad de registr…

Hola amigos: quisiera su ayuda con lo siguiente: tengo datos en la columna A pero no de forma consecutiva sino con algunas celdas vacias algo Asi: COLUMNA A Peras Manzanas Duraznos Higos Lo que quiero hacer es reacomodar las celdas para que no queden espacios vacios pero no con eliminar las filas vacias sino acomodando en las celdas vacias las siguientes llenas para que queden celdas llenas corridas sin celdas vacias, en el archivo tengo este código que me encontré en internet y funciona exepto que me elimina la primera fila si esta, está llena y lo que quiero es que queden todas las celdas que contienen información, asi mismo que reacomode también las columas …

Subo esta macro muy encilla que me esta volviendo loco. Se trata de lo siguiente. Abro un userform1 con un evento initilize que carga mediante RowSource un rango determinado en un combobox. Si elijo un valor del rango me va a un segundo userform2 donde me añade por additem otro valor al combobox. Oculta el segundo userform. Se me mete en un bucle que no puedo parar porque considera que se ha producido el evento change del combobox. Lo que pretendo es poder añadir nuevos valores en el userform dos y volver al combo1 para seleccionar entre estos La segunda pregunta es si en vez de añadir inicialmente por rowsource lo quisiera hacer con un nombre de rango de los …

Buenas noches. Les saluda Norbey Lasso, agradezco me puedan ayudar este error en la programación.

Hola! Amigos del foro quisiera solicitarles el apoyo para resolver lo siguiente: Lo que pretendo obtener es en un form mediante la selección de un combobox, buscar el valor en todas las hojas (realizar la búsqueda con el botón) y se devuelva un resultado mediante un msgbox mostrando en cual(es) hoja(s) se encontraron el valor. En el tab FindError del formulario es donde deseo realizar el buscador, algo parecido a la siguiente macro: Sub buscarEnTodasHojas() Dim hj As Worksheet Dim contExiste As Integer Dim busqueda As Range Dim res, consulta As String res = "" consulta = Sheets("EEE").Cells(7, 4) contExiste = 0 For Each hj In T…

Hola, como estan? estoy tratando de utilizar una macro para realizar búsquedas en internet (google específicamente), pero no logro dar con el texto del código fuente para insertarlo en la linea de código. agradecería mucho que me dieran una mano, gracias Sub LoginGOOGLE() Dim IE As Object Set IE = CreateObject("InternetExplorer.Application") With IE .Top = 0 .Left = 0 .Height = 1000 .Width = 1250 .Visible = True .Navigate "https://www.google.com/" Do While .Busy Or Not .ReadyState = 4: DoEvents: Loop .Document.getelementbyid("gLFyf gsfi").Value = "buscar lo que sea en goog…

Hola a todos. Soy nuevo en esta comunidad y quiero pedirles ayuda, tengo una macro en la que quiero manejar la entrada y salida de activos, tengo resuelto el tema del ingreso de un nuevo registro a la base de datos pero aun no he podido generar una consulta que me traiga los datos asociados a un serial determinado, me explico puedo ingresar un registro nuevo pero quiero hacer una consulta para saber si ya he registrado un activo determinado para luego solo actualizar los campos de hora de ingreso y hora de salida, la llave principal de la tabla que tengo en access es el serial por lo que no podria repetir este campo y por esta razon quiero hacer la busqueda en la tabla pa…

Amigos buen dia con todos, por favor me pueden ayudar con este tema he realizado un sentencia sql usando count(distinct [columna]) pero me da error. yo quiero realizar la siguiente operacion de preferencia en con frm. X = minutos por atención / cantidad de ordenes de atención mi problema es que como hay duplicados, quise utilizar la sentencia count (distinct pero no he podido, alguna sugerencia quizás otra manera de realizarlo. Archivo Aca gracias por tu apoyo. Saludos

hola todos, hace poco vi un video en donde realizaban un filtro y pegaban la info en otro espacio dentro de la misma hoja, lo malo es que no dejaron un achivo de ejemplo y solo mostraron lo que hacia la macro, me gustaria poder filtrar los datos de la hoja jornada, desde la hoja reporte y me muestre la info en sus correspondientes reportes. los criterios son simples en el reporte individual esta el codigo y las fechas iniciales y finales, con presionar el numero de codigo despliega la ventana de seleccion de codigo y en las fechas despliegan el calendario en el adminstrativo en vez del codigo filtra por ubicacion y las fechas inicial y final solo me falta esto y el de…

saludos el objetivo es que tengo una hoja llamada abono del libro prestamos control donde se almacenan los datos de todos los cobros a los clientes necesito hacer un filtro (consulta) con una fecha desde fecha hasta desde el userform1 que tiene dos textbox uno para cada fecha a filtrar(desde hasta) y que se pueda elegir a la ves el nombre del cobrador en un combobox para poder hacer inventario a cada cobrador en el rango de fecha que deseo; luego estos datos encontrados exportarlos a un nuevo libro donde se reflejen todos los datos filtrados en el mismo orden de la hoja abonos parece sencillo pero no he encontrado mucho en esto. agradezco la colaboracion este hac…

Buen día Gente, Primero que nada agradecer a todos por la ayuda que me han prestado en este foro, ya que he encontrado mucha información valiosa para mi, MUCHAS GRACIAS GENTE POR SU TIEMPO Y COLABORACIÓN!!!! Bueno, necesito una ayuda con un tema, tengo un botón con el cual abro un archivo mediante un hipervinculo a este que se carga a un label, el tema es que no se como colocar que si el label esta sin informacion me salga un mensaje como "La imagen no esta cargada" y no me genere el error. Este el codigo del boton Dim url As String 'para abrir una pagina url = Label28 ActiveWorkbook.FollowHyperlink url [/CODE]

Buenas tardes, Estoy tratando de construir una hoja excel para identificar y corregir anomalías detectadas en la evolución de préstamos, de tal forma que mediante la información en (t-1), que se considera correcta puesto que ya ha sido anexada a datos histórica (por eso he marcado que son celdas fijas) y las celdas variables en t que se encuentran en la parte derecha, que son con las que excel tendría que ir realizando iteraciones hasta que se satisfagan las ecuaciones que se encuentran en los chequeos de la parte derecha. Mi idea, por tanto, es conseguir que excel fuera iterando con los valores de la columna E marcados en azul, que serían las celdas variables, …

Que tal tengo la siguiente situación, se me entrega un archivo de excel al cual hay que migrar hacia un formato txt, este reporte que esta en excel hay que estar migrandolo al menos 1 vez por semana por lo cual es demasiado el tiempo que se le invierte al hacerlo de forma manual, se puede realizar una macro para que automatize este proceso? Del archivo resultante en txt se requiere quede de la siguiente forma. D555555555555555550000000149798400000034334000000099000 . D541523100000000330000000230004840000034334000000100000 . detallo el formato de arriba [TABLE=width: 500] [TR] [TD]#[/TD] [TD]Nombre del campo[/TD] [TD]Long[/TD] [TD]Tipo[/TD] [TD]Valor[/TD] [TD…

saludos. estoy desarrollando un formulario en los deseo calcular varios textbox y mostrar el resultado en otros, el problema radica cuando los coloco con formato de miles los cálculos no funcionan; por favor si alguien me puede dar una ayuda o indicarme el procedimiento. ya he utilizado el cdbl(replace((.. obteniendo el mismo resultado. adjunto enlace. https://drive.google.com/drive/folders/1mPjlo-c7rCrwALgK9pF20e3J-XQG8Wk6?usp=sharing muchas gracias por su pronta colaboración.

Buenas noches, me he quedado atascado intentando crear una Macro para generar de una base de datos automáticamente una tabla dinámica. La cuestión es que quiero que en las filas aparezcan los siguientes datos: - SAP_Format - T358 - Lieferant Name - T536 - TLW_Code_Wert en las columnas quisiera que aparecieran los siguientes datos: - "ATP_Bestand" - Intransit - T805 - T807 - Lieferrueckstand - Bestellausstand - KDR_Menge Por último que se pudieran filtrar todos los datos por: - T134 Yo había puesto así el código, pero me da error: PT.AddFields RowFields:=Array("SAP_…

Hola que tal? Estoy intentando realizar un contador de manera que vaya sumando o restando un "1" en la celda "DESPLAZA", hasta que se cumpla que la "SUMA (< 32)" de una columna de datos "DESV DESFA" sea <32 y sea el valor más cercano a 32. La celda "DESPLAZA" hace que varíe la columna "REF DESPLA" y a su vez ésta modifica el contenido de "DESV DESFA". Espero haber podido explicarme un poco. Un saludo y gracias. [TABLE=width: 435] [TR] [TD]A[/TD] [TD]B [/TD] [TD]Ref[/TD] [TD]REF DESPLA[/TD] [TD]DESV DESFA[/TD] [/TR] [TR] [TD]100[/TD] [TD]37,2[/TD] [TD]33[/TD] [TD]19[/TD] [TD]0,0[/TD] [/TR] [TR] [TD]125[/TD] [TD]31,4[/TD] [TD]36[/TD] [TD]22[/TD…

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

Hola amigos del foro lo siguiente es que deseo me colaboren para modificar una macro de tal manera que en la columna "G" se me rebaje automáticamente el dato correspondiente de la columna "C" Y en la comunna "F" Se me rebaje lo de la comunna "E", de seguro que hay forma tambien de hacerlo sin macros toda ayuda será bienvenida. Los rebajos deberian aplicarse una vez se modifique la celda"F2" Prueba.xlsm.zip