Necesito ejecutar un macro X numero de veces y que se agregue en una tabla los datos dentro del macro pero no encuentro forma de hacer que funcione Aqui una foto de lo que deseo agregar donde esta X que sea un numero cualquiera deseado Sub Macro1() ' ' Macro1 Macro ' ' Range("H3:K3").Select Selection.Copy Range("A50000").Select Selection.End(xlUp).Select ActiveCell.Offset(1, 0).Select ActiveSheet.Paste Application.CutCopyMode = False Range("J3").Select End Sub Ese es el codigo de la macro. Produccion.xlsm

Hola muy buenos días, por favor me podrían apoyar de como CARGAR un listado a un COMBOBOX, la condicional es la siguiente: Si la columna B tiene X dato, que se cargue lo que tengo en la columna A, Gracias de antemano por tu apoyo!

espero me puedan ayudar... Necesito obtener el Link de un archivo específico (conocido) del cual se conoce su ubicación dentro de una carpeta de Google Drive, esto mediante macros en excel. Agradezco mucho sus aportaciones Saludos Daniel

Hola a todos: Después de intentar e intentar, no consigo hacer Filtrar con las condiciones que necesito. Resulta que en una variable de tipo string, almaceno los valores para que se filtren. Cuando inserto los valores de forma manual, lo hace correctamente. Pero cuando le paso los valores que tengo en la variable, no consigo que funcione el filtro. Aparece como si no filtrase nada. No se que es lo que estoy haciendo mal. ¿Me podéis ayudar? ejemplo.xlsm

Buenas días a todos, Les copio parte de un algoritmo en donde copio y pego unas tablas en otro libro. Copia y pega todas las tablas correctamente, ahora si les aplico un filtro y copio solo las filas visibles aplicando SpecialCells(xlCellTypeVisible).Copy ,, no copia la tabla con su nombre de rango, solo copia los valores. Aparentemente cuando copias y pegas una tabla filtrada en Excel, es posible que el nombre de rango no se copie automáticamente junto con los datos. Esto puede ser que se deba a que el nombre de rango está asociado directamente con la tabla y no con las celdas individuales. Hay alguna manera de hacer esto en esta instancia al hac…

Buenas tardes , Estoy obteniendo datos sin duplicados de una columna de tabla para después filtrar otra tabla En Function ObtenerDatosTabla Se utiliza un objeto Scripting.Dictionary para almacenar los valores únicos. Antes de agregar un valor al diccionario, se verifica si ya existe en él, evitando así duplicados. Al final de la función, se devuelve un Variant con los valores únicos almacenados en el diccionario utilizando la propiedad .keys del diccionario. Los datos obtenidos los paso como argumento a Sub FiltrarDatosTabla, pero es ahí donde no me funciona, solamente me filtra por el ultimo valor Aguardo sus comentarios Muchas graci…

Buenas tardes a todos. A través de la fórmula "Imagen" he conseguido insertar logos partiendo de un enlace de la imagen. Sin embargo, me gustaría concatenar los mencionados logos estando fijos en la celda, es decir, sin que pueda manipularlos como cuando inserto una imagen normal. Lo he intentado con la función "Concatenar" e "Y" pero no consigo dar con ello puesto que creo que no es posible. Por ello creo que solo a través de una macro podría llegar a hacerlo. ¿Podrían ayudarme? Muchas gracias de antemano PD: adjunto un archivo para que se entienda Concatenar logos.xlsx

Buenas tardes, estoy trabajando sobre un archivo en el que quiero modificar los botones que tengo ahora mismo por objetos y que éstos imiten la función de los botones. Tengo un problema con la función deshabilitar botones pero aplicada a objetos, ¿existe? ¿puedo a través de VBA decir a un objeto que habilite o deshabilite su enlace con una macro como hago a través de los botones habilitando o deshabilitando su funcionamiento? He visto una solución que lo que hace es invisibilizar el objeto... pero no me acaba de convencer. Por ejemplo, en los botones tengo: Hoja09.cmdActualizarResumen_Anual.Enabled = True Hoja09.cmdActualizar…

Hola a todos de Maurizio Mi problema es este: Con la hoja de Excel de Microsoft Office 2019 Estoy tratando de crear un calendario bastante simple. ¡Siempre que haya utilizado su formato condicional, etc.! Pero como nunca estoy satisfecho cuando se trata de explotar la programación en su conjunto, he llegado a un punto en que mi calendario funciona bien; Con el único defecto que consiste en el hecho: Tener que ocultar los números que no pertenecen al mes seleccionado. De hecho, actualmente, si lo dejo en el mes actual, mi calendario funciona de maravilla. Pero si intento mover el número del mes posicionado en la celda (D1) mi Calendario me posiciona los valor…

da error de archivo no encontrado; que debo hacer para que se ejecute : WDir1 = "\\DESKTOP-13453GE\C:\Users\ipm20\Desktop\WProces\" WDir2= "F09-CompVda-PC2-20230701.xlsm" Run = "'" & WDir1 & WDir2 & "'!ProcCompVda" Application.Run WRun muchas gracias

Buenas, Estoy copiando tablas a otro libro y no logro copiar los encabezados, si copia correctamente el mismo nombre que también me interesa Uso un buscador para que puedan elegir la ubicación del nuevo libro que se crea, el nombre del nuevo libro es "Salvo" y lo pueden cambiar por código Aguardo ayuda Saludos Adjunto CopioTablas.xlsb

Saludos, Tengo formulas en varias celdas que se alimentan de una Tabla llamada TablaSubAlim la cual reside en el mismo Workbook.. Sin embargo ahora he tenido la necesidad que esta tabla se alimente desde una Tabla que está en Access. Con este código logré hacer esa conexion de manera automática. 'Private Sub Worksheet_Activate() 'Application.ScreenUpdating = False 'Dim l As ListObject 'Dim q As QueryTable 'Dim s As String ' ' ''CONEXION A LA BASE DE DATOS 'Cells.Delete 's = "OLEDB;Provider=Microsoft.ACE.OLEDB.12.0;User ID=Admin;Jet OLEDB:Database Password="" ;Data Source=" 's = s & "\\DATABASE_TABLASUBALIM\DatabaseTablaSubAlim.accdb" …

hola he creado un formulario para añadir registros, modificar, eliminar, buscar etc. el problema lo tengo en el boton busqueda que el dato que necesito que busque es la fecha y sale un mensaje 380. podeis por favor ayudarme en donde tengo que modificar y que poner? adjunto fichero. gracias. Partes de Trabajo.xlsm

Hola a todos; Una duda que no soy capaz de resolver. Tengo dos textbox en un formulario y en el evento beforeUpdate una validación simple. También estoy usando en el evento KeyDown la tecla "F12" que una vez pulsada me retrocede y borra lo que tenía en el anterior textbox Si la validación no se cumple en el textbox2 me arroja un error porque no puede salirse del cancel=true y llevar el foco al textbox1. ¿Es posible salirse de ese cancel=true pulsando la tecla F12, o como podría depurar ese error?. Saludos a todos. MCancel.xlsm

Buenas tardes, Necesitamos un archivo excel que nos permita automatizar los horarios de trabajo con las siguientes premisas: - 7 trabajadores que tienen - 2 días libres a la semana - Turnos de Mañana, Tarde, Noche y Partido. Muchas gracias de antemano!!

Buenos días, ¿Me podríais decir cómo se puede extraer a una celda el contenido que se selecciona en un combobox personalizado, que está colocado en la cinta de opciones? He encontrado mucha información cuando el combo está en una hoja, pero en la cinta de opciones, no. Muchas gracias

Hola, Soy MUY principiante y necesito a ver si me podéis ayudar un poco... He creado una pestaña nueva en la ribbon con xml y he añadido un botón que necesito que imprima directamente en pdf una hoja del libro de Excel y que la guarde en la misma ubicación donde está el archivo xlsm. He estado mirando un poco porai pero no he sabido crear el código VBA para hacerlo... Imagino que es muy básico, pero no lo se hacer... ¿Algún alma caritativa me podría ayudar? Muchas gracias

Hola, me gustaría saber como es el comando de VBA para seleccionar todas las celdas de una hoja que contengan una palabra concreta. Lo necesito con VBA para luego enlazarlo con otra cosa. Sé hacerlo con la funcionalidad de Buscar; Buscar todas. Gracias.

Buenas nochesLlevo mucho tiempo intentando subir la tabla Excel que adjunto a mi pagina web, lo he hecho desde One drive pero me borra el botón de enviar con una macro que le he puesto para que me envíe un email con un rango de celdas que los visitantes deben rellenar. He leído en muchos sitios pero no se como hacerlo. Hay alguna otra forma de hacerlo? Muchas gracias por vuestra ayuda.Saludos Lillo Quiniela copia 2.xlsm

Estimados buenas tardes. Agradecería su colaboración con el siguiente caso Tengo una ListBox en la hoja "Distribución" ( se activa con clic en la celda K:2) que trae la información de la hoja "Transformación" celdas "L5:S102" estas celdas contiene formulas. Al momento de activar el ListBox, selecionar y dar doble clic para que la información baje al excel no envia la información de la linea selecionada. Realice una prueba eliminando las formulas de la hoja "Transformación" celdas "L5:S102" ahí me funciona la ListBox. En resume el inconveniente de selección se da al momento de colocar formulas en la hoja "Transformación" celdas "L5:S102" …

hola como podria en una hoja excel proteger celdas y el textbox dejarlo habilitado para la entrada de datos? si protejo la hoja seleccionando modificacion de objetos no me deja escribir en el textbox. ruego vuestra ayuda , gracias. TARIFICADOR (1) (1).xlsm

Buenas, Quería consultaros (no añado ejemplo porque no lo tengo) si es posible con macro descargar datos de los informes de Power BI. Lo hago manualmente seleccionado la pestaña, la tabla del informe y descargando en formato excel a una carpeta y ya luego con la macro lo importo en la hoja excel (lo habitual), pero quería saber si existe la posibilidad con VBA de hacerlo directamente. He estado realizando alguna búsqueda pero no encuentro nada. Gracias!

buena tarde alguien sabe como configurar excel enviar correo electronico que no me ejecute outlook , sino que zoho mail cuando se adjunta un archivo de excel, se podra? gracias saludos

Hola estimados foreros, espero puedan nuevamente apoyarme con lo que necesito, esta vez, busco pintar las celdas que tengan un número entero (en columna específica, para este ejemplo lo dejé en Columna A), busqué algún ejemplo por la web, lo más cercano que encontré no me sirve del todo, ya que no he podido adaptarla a mis necesidades, además mencionar que el/los archivo(s) al que necesito detectar los números enteros los recibo de manera masiva desde una fuente externa, por lo que varían sus nombres, nunca son iguales, adjunto archivo ejemplo y ahí mismo muestro visualmente lo que necesito finalmente. pintar si un valor es entero_ayudaexcel.xlsm

Estimados buenas noches. Agradecería su colaboración con el siguiente caso: Estoy con el siguiente código que no me funciona, necesita dar doble clink en el ListBox y que se cargue la información en la hoja excel, cada click debe ir colocándose desde la ultima celda utilizada para abajo. Codigo Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Dim uf As Integer uf = Hoja2.Range("A" & Hoja2.Rows.Count).End(xlUp).Row + 1 With Me.ListBox1 Hoja2.Cells(uf, 2) = .List(.ListIndex, 0) Hoja2.Cells(uf, 6) = .List(.ListIndex, 2) Hoja2.Cells(uf, ? = .List(.ListIndex, 3) End With ListBox mas hoj…