Hola estimados compañeros y maestros. Me he bloqueado con un problema que tengo. A ver...lo había conseguido pero a medias y me va mal. Os digo lo que necesito. Veréis, el formulario guarda, busca, modifica y limpia perfectamente tal y como quiero. La historia que no consigo es todo lo siguiente: que en el formulario hoja principal no salga en el recuadro que tengo la imagen que dejo abajo (podéis modificar el recuadro o lo que sea, que es provisional). Esto está hecho claro, porque me guarda los datos tal cual quiero. cuando de a buscar que me cargue los datos del "buscador". Eso también está hecho. Aquí necesito que me cargue la imagen del …

Hola buenas tardes: estoy creando un formulario para registrar datos pero en diferentes hojas. Dentro del formulario ya he agregado un campo para la seleccion del nombre (nombre de la hoja donde debo ingresar los datos capturados) y funciona bien pero dentro de cada hoja en la columna A tengo los consecutivos actuales, este corresponde al ultimo registro. con la funcion de: Me.txtCons = Application.WorksheetFunction.Max(Range("A:A")) + 1 , puesto en: UserForm_Activate me mostraba el ultimo consectivo de una sola hoja. Pero ahora que he agregado el cambio de hojas ya no lo toma. Mi necesidad seria que al cambiar el nombre de la hoja me diera e…

Saludos amigos de Ayuda Excel. Quería consultar si hay alguna opción de macro de bloquear la opción "Guardar Como". El archivo ya tiene el código de salvar automáticamente al cerrarlo, pero me gustaría bloquear esa opción. Gracias, saludos. Leo

Buenos días @JSDJSD espero estes bien Utilizando la información proveniente de los dos posts anteriores en los que usted me dio un excelente soporte: Me guie para intentar configurar las siguientes macros: Sub VerificarTextBoxes() Dim txtBoxes As Variant Dim contador As Integer Dim sextoTextBox As Double Dim septimoTextBox As Double Dim i As Integer txtBoxes = Array(frmvtl.TextBox16.Value, frmvtl.TextBox17.Value, frmvtl.TextBox18.Value, frmvtl.TextBox19.Value, _ frmvtl.TextBox20.Value, frmvtl.TextBox21.Value, frmvtl.TextBox22.Value) contador = 0 …

Buenos dias estimados, Quisiera que me ayudaran con lo siguiente, tengo una hoja donde debo extraer datos de las columnas N, O, P y R (Molinos 3 y 4) y K, l , M y O (Molino 5) si los hay segun mes solicitado en la celda C2 de la hoja Resistencias de tres procesos para 3 molinos. La idea es que me traiga los días del mes solicitado, el tipo de cemento y las resistencias. Las resistencias están en en las columnas N, O, P y R para los molinos 3 y 4. Y para el molino 5 están en lasa columnas K, l , M y O. Yo tengo una macro pero solo me trae los datos del día que solicito. Adjunto los archivos (Como hago para enviar un …

Hola buenas tardes tengo un archivo en excel que copia varias tablas y las importa a word de manera automatica. Este selecciona las tablas en base a las filas con datos de mi columna C. pueden ser diferentes rango de tablas. (Pero siempre mi rango es de celdas continuas y con valores continuas) Funciona muy bien. El problema que ahora tengo es que muchos archivos con tablas tienen las celdas combinadas ya sea horizontalmento o vertical. Aqui es donde empieza mi problema ya que son formatos de origen no puedo modificarlas. Quisiera ajustar mi macro en la parte de seleccion de rango de tablas y que pueda considerar la celdas combinadas y pegarlos en wo…

Hola a todos(as); Estoy teniendo problemas a la hora de exportar valores con formato número o moneda desde mi ListView a la hoja Excel. Exporta pero no le da formato número o moneda. Entiendo que al tener formato como hay "." y "," lo detecta como texto y quería que al insertar los valores en la hoja coja bien formato número o moneda. En el formulario he puesto dos botones, con uno le doy formato número y con otro formato moneda y a continuación hago la exportación a una hoja Excel. Ya he probado incluso reemplazando el punto y la coma pero no he sido capaz y el código se enrevesaba demasiado y al o mejor la solución es mas sencilla que todo eso. Adjunto …

Buenas tardes estimados, tengo la siguiente macro donde quiero que al seleccionar el checkbox1 me ejecute el primer procedimiento de lo contario siga al siguiente procedimiento, pero me esta tomando el valor en la casilla de adicion del segundo procedimiento. Agradezco me puedan orientar gracias. Sub Dedicion() dim sh1, jh2, jh3, jh4, jh5, jh6 as Worksheet If sh1.CheckBox1.Value = True Then Set jh5 = Workbooks.Open("\\10.7.10.1\calidad\RegCalidad 2024\Molienda de Cemento y Empaque\Base datos Cementos producido 2024.xlsx", ReadOnly:=True) Set jh6 = Sheets("MEZCLA ADICION") jh6.Activate jh6.Cells(4, "A").Select JFila = ActiveCell.Row …

Buenos días, solicito ayuda para poder imprimir o generar en pdf unos pases de acuerdo al listado de personas, hace unos años me ayudo @Marco Antonio con unos macros para una hoja que generaba una ventana donde se escogen las hojas a imprimir, he creado una hoja en la que se genera un pase o pasabordo individual para cada persona de la lista que figura en la hoja (selección combobox) INICIO, de allí van los datos a la hoja PASABORDOS, inicialmente cree 6 pasabordos que es el total de la lista pero a veces no es sino 3 o 4 personas, la solicitud va en que cuando genero el pdf me genera lógico todas las 6 pases y necesito es que solo genere la cantidad según el númer…

Buenas tardes, Me encuentro con un tema de combinación de correspondencia de Excel a Word, donde funciona correctamente, con lo que quiero, pero al abrirse el documento de word, siempre me pide permiso para activar los datos con un SELECT * FROM 'Correu$' . Mi pregunta es si hay alguna forma de insertar en la macro la correspondiente orden para que no me pida autorización. Muchas gracias de antemano. Sebastià,

Hola, mi pregunta es como puedo combinar los datos de un fomulario de excel con un correo electronico, o con un documento de texto. Gracias.

Hola a todos: En el trabajo diario tengo que estar revisando varios documentos o archivos, muchos de estos son PDF. es una revisión visual. Y así con todos los que tengo en una carpeta y van cambiando. Manualmente tengo que estar abriendo cada archivo y cerrarlo. trato de automatizarlo algo asi. Con una macro en Excel he puesto el nombre de los archivos pero con un hiperlink para poder abrirlo con la ruta del archivo. en la celda mostrando solo un nombre que requiero. esto funciona bien. Pero con ayuda de otra macro mi idea es visualizar todos esos PDf que listé en mi hoja de Excel. Con la siguiente macro he podido abrir el archivo selecc…

en el siguiente archivo hay dos tablas con información, la tabla de la hoja3 es la que quiero que se me actualice tomando los datos de la hoja1, el código buscará el "clues" , "mes", "anio", y la letra del abecedario que son encabezados de la matriz y que están pintados en amarillo, los buscará en la hoja3, si los encuentra entonces pegará los valores en la hoja3, en este ejemplo ya están pintadas de azul y he colocado los valores, de igual manera hará la búsqueda para todos los registros o líneas de la hoja1, no requiero que se pinte de color las celdas solo es para ayudarme a explicarme Espero me puedan ayudar, Bendiciones actualizar tabla2.xlsx

Buenas noches. Necesito ayuda de un asunto que en su día el usuario FGV me ayudó, pero me cambiaron el pc y no soy capaz. Necesito que en una casilla de Excel, reduzca de 10 dígitos a 8 cada vez que cambie de celda y vuelva a meter números en la siguiente. Esto me lo indico FGV:(muy agradecido con el sin duda,,) Private Sub Worksheet_Change(ByVal Target As Range) If Target.Rows.Count > 1 Then Exit Sub If Target.Column = 1 Then Target = Left(Target, 8) End Sub Y lo que necesito adicionalmente, es que si por ejemplo estoy en la celda a1, con los 8 dígitos correctos en su casilla, al dar al enter pase a la celda a9 por ejemplo. Que orden se da para sa…

Hola buenas tardes debido a mis constantes movimientos entre archivos necesito estar moviendome de un libro a otro y aotro. En un archivo 1, tengo mas de 30 hojas y en archivo 2 tengo 3 hojas o mas (funciona como plantilla). Que es lo que sucede: Cuando estoy trabajando en alguna de las hojas(X) del archivo 1 necesito ir al archivo 2. y a su ves regresar. Lo que me gustaria es que en mi archivo 1, poder poner en cada celda (R3) de todas las hojas un hyperlink o boton con la que pueda ir al archivo o libro 2. Con esto poder lograr que en cualquier hoja que me encuentre poder ir al archivo 2. y si agergo mas hojas en el archivo 1 se coloque en au…

Buenas al foro. Con esta macro relleno unos formularios en pdf desde excel, pero lo guarda como pdf que se pueden editar los formularios, y busco la forma o bien, de imprimir en pdf o que no sse pueda editar. Ojo, para que funcione hay que tener el adobe pro . PD: No me deja subir el pdf por tamaño. Si alguien quieres se lo paso por privado. Libro1.xlsm

Saludos, He intentado sin éxito lograr forzar la ubicación de los PageBreaks o saltos de paginas. Este es el código que he intentado. Mi intención es poder forzar la ubicacion de los PageBreaks pero excel los sigue ubicando donde le da la gana. Mi intención es que imprima la última pagina con todas las filas sin importar si solo utilizó las primeras filas de la última pagina. Ideas? Sub PageSetup() Dim LastRow As Long Dim Page1 As Long Dim Page2 As Long Dim Page3 As Long 'valor de la ultima celda escrita en la columna F LastRow = Cells(Rows.Count, "G").End(xlUp).Row '************PRIMERA PAGINA*************…

Saludos amigos espero estén bien Intento guardar la información proveniente del Label32 a través de la siguiente sección de código: Guardar Hoja58, "H3", Label32 Sin embargo, al ejecutar la macro se inserta una fila como corresponde, pero no se copia ninguna información en la MATRIZ4 apareciendo de inmediato una alerta que me indica: “Se ha producido un error ”438” entiempo de ejecución: El objeto no admite esta propiedad o método” ubicando el error en la siguiente macro: If ctrl.Visible Then sh.Range(r).Value = ctrl.Value End If End Sub Por lo que entiendo se debe a la propiedad Vaule que no sé cómo ni por cual propiedad cambiar para que se gua…

Hola amigos de Ayuda Excel. Buenos dias, tengo una tabla y deseo proteger la hoja, He investigado pero las tabla no funcionan en hojas protegidas, sin embargo, he encontrado varios articulos que las tablas pueden funcionar con hojas protegidas a través de macros. Incluso conseguí un código pero particularmente no me funciona. Me podrán ayudar a ver por qué no funciona Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count > 1 Then Exit Sub If Target.Row = 1 Then Exit Sub If Target.Column > 8 Then Exit Sub On Error Resume Next With ActiveSheet ActiveSheet.Unprotect Password:="123" .ListObjects("Tabla11").Resize Target.Curren…

Ciao a tutti da Maurizio, vi scrivo perchè ho un problema che mi sta facendo impazzire ovvero questo: Sul Foglio 2 di Excel vorrei poter inserire i nomi delle festività Attuali prendendo i dati dalla cella (H2:I21) ed inserire i nomi delle festività nelle Celle sopra del mio Calendario che si trova a partire dalla celle (Q3:W8) Tenendo sempre presente che ad ogni mese dell'anno corrispondono nuove festività con le loro variazioni Ho provato a scrivere questa funzione ma non riesco a farla funzionare e non capisco perché. Questo è tutto. Grazie mille A.Maurizio Buone vacanze a tutti Mio_Progetto_Calendar.xlsx.xlsm

Hola buenas tardes tengo una rchivo que me ayuda con la seleccion de archivos por medio del browser y de ahi extraigo algunos datos. Con la macro puedo buscar un archivo dentro del explorador, busco y selecciono archivo y extraigo datos como ruta, nombre del archivo etc, pero debido a que ya tengo mas archivos (200 archivos .doc), me hes dificil navegar entre todos y revisar cada renglon, existe alguna manera en la que pueda filtrar los archivos con parte del nombre (Escrito en celda, ejemplo C6), y al abrir el browser me muestre solo los con extension .doc y .docx con los archivos de nombres coincidentes (C6). O si hay alguna otra opcion, me ayudara mucho. …

Saludos @JSDJSD espero estes bien como ya me dio un excelente soporte adaptando a Macros Vba las fórmulas de mi anterior post: Espero también pueda ayudarme con los resultados de estas dos últimas fórmulas que me faltan en los TextBox26: y TextBox32: TextBox26: si alguno de los TetxBox16, 17, 18, 19, 20, 21, 22 es mayor que el ComboBox2 entonces se debe de restar el TetxBox que cumpla con la condición menos el ComboBox2 siendo así el resultado que se debe mostrar en el TextBox26 de manera simultánea y automática será la sumatoria de los resultados individuales de cada TetxBox mediante la combinación de las siguientes operaciones equivalentes en Vba: SI(Text…

Hola buenas tardes: Por favor me pueden ayudar con una macro con la que pueda ocultar filas dentro de un rango (filas 8 al 20), pero sin ocultar las filas que tenga seleccionadas en es momento. Ya que hay filas que si necesito mostrar aunque estas no sean consecutivas. Muchas gracias Saludos Ocultar celdas menos las seleccionadas.xlsm

Saludos @AlexanderS y @febrero59 espero estén bien Tengo un caso similar este post: https:/ayudaexcel.com/foro/index.php?/topic/21744-bloquear-combobox-y-textbox-dependiendo-de-la-selecci%C3%B3n/&_rid=175568 Al cual dieron un dieron un par de buenas respuestas que van en línea con lo que necesito solventar en concreto tengo un ComboBox con cinco opciones la primera opción es igual a blanco y como tal se muestra por defecto adicionalmente posee cuatro opciones numéricas 8, 9, 12 y 24 necesito que cuando el ComboBox2=”” los TextBox 16, 17, 18, 19, 20, 21, 22, SpinButton1, CommandButton2, CommandButton3, CMDInformeSemanal y el CMDInformeMensual deben est…

Hola buenas noches. Tengo la necesidad de en un libro 1 hacer una lista indice de las hojas que contiene otro libro (X), En mi libro1 tengo una hoja llamada lista. ahí me gustaría poder en listar los nombres de todas las hojas que contiene otro libro. Pero el nombre del libro en la que debo extraer los nombres esta escrito en la celda D2 de mi hoja basic. Espero me puedan ayudar con alguna opción. Muchas gracias Libro1Donde va lista.xlsm