Hola a todos, Actualmente, tengo la siguiente macro: Sub Macro1() Dim i, ultima As Integer ultima = ThisWorkbook.Sheets.Count For i = 1 To ultima ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\RootCapital\Desktop\Test Reports\ " & i & ".pdf" _ , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _ :=False, From:=i, To:=i, OpenAfterPublish:=False Next i End Sub Esta genera automáticamente un pdf para cada tab en mi documento de Excel, los pdf son nombrados 1, 2, 3, 4, etc. Cada pdf incluye sólo la primera hoja de impresión de cada tab, aún cuando algunas contienen 2 o 3 hojas de impresión e…

Hola, Ya casi tengo el proyecto acabado, únicamente me falta un tema que soy incapaz de solventar, tengo un botón "guardar", lo que hace es crear un clon en una nueva hoja con el nombre de la celda G4 y a la vez rellena los datos en la hoja16, estando el valor de G4 en la fila 2, pongo el código: Sub Guardar() Dim celda As Range Dim Fila As Long Set celda = Hoja16.Range("B:B").Find(What:=Hoja1.Range("G4").Value, After:=Hoja16.Range("B1")) If celda Is Nothing Then Fila = Hoja16.Cells(1048576, 2).End(xlUp).Row + 1 Hoja16.Cells(Fila, 2).Value = Hoja1.Range("G4").Value Hoja16.Cells(Fila, 3).Value = Hoja1.Rang…

Buenas tardes, expertos nuevamente los solicito su ayuda habra una macro donde me permita rechazar cuando coloque X en una celda en la fila que se repita el trabajador sea de dia o noche (el trabajador debe trabajar un solo turno sea de dia o noche pero no ambos) . Por favor si hubiera una forma me pueden ayudar estare agradecido . Ajunto una pequeña base de datos donde necesito la demostración de la macro. VALORIZACION CONSTRUCCION ENERO - FEBRERO 22.xlsm

Me gustaría que me ayudaran para poder crear una macro que permita bloquear la tecla de shift al momento de ejecutarla.

Saludos a todos los profes de esta gran materia , recurro a uds , si alguien puede ayudarme con el error que no me deja avanzar en mi proyecto . se trata de llenar un listBox y de acuerdo al registro seleccionado debe llenar los txt correspondientes , adjunto la programacion utilizada FSE2Nueva_facturacion.xlsm

Hola comunidad!! En esta oportunidad les traigo un problema que tengo hace rato! Actualmente tengo una planilla que tiene 4 botones, para que corran debes ingresar una contraseña. La misma esta a la vista, es decir, no puedo colocar asteriscos en lugar de las letras. Por lo que estuve leyendo, con el metodo que utilizo para colocar la contraseña, no me permite. La verdad quise cambiarlo pero no puedo, no me sale. Alguien me podria dar una mano? Es decir, necesito que cuando acciono el boton, salte un msgbox solicitando contraseña pero que la misma no se vea cuando la escribo. Copio una parte del codigo que utiliza este metodo de contraseña; …

Estimados, necesito una macro que cuando recorra una columna y encuentre dos datos determinados inserte una fila en blanco entre estos, por ejemplo: Ejemplo Venta Costo Total Margen Total Resultado Venta Costo Total Margen Total Entre "Total Margen" y "Total" inserte la fila en blanco. Muchas gracias a los expertos en Excel es lo único que me falta para completar mi tarea.

estimados(as) buenas tardes. acudo al foro para solicitarle su apoyo. modificar el siguiente formato al momento de digitar el código requiero que se llene automático el usuario y el N° de PDT asignado y al darle clic en salida se registre en el cuadro / y al devolver digitar el codigo y que automática mente se llene el ingreso. espero su apoyo para resolver el formato. Control de Salida e ingreso de PDTs.xls

Buenos dias, expertos por favor me ayudan tengo un formulario con tres combobox que me filtra de la hoja filtros normal filtra con 10 columnas cuando lo aumento las 19 columnos me sale error a partir de la columna 10, ademas de ellos los combobox deben filtrar algo relacionado que significa esto si en el primer combo filtre entonces en base ese filtrado deben de filtrar elsegundo combo y asi para el ultimo combo; por favor me puede ayudar el solucionar dicho problema. Ajunto el archivo matrixx.xlsm

Un saludo al foro, para solicitar un favor especial al foro .... ayuda grabar datos del ListView3 a una hoja3 Deseo controlar 3 procesos de producción de unas secciones a través de un el ListView3 , Llevo varias semanas sin exito, tratando de registras los datos, del ListView3 a la hoja BADEDATOS desde la Columna E hasta la columna AB sin tener éxito, he realizado varias pruebas en algunas me graba solo un dato, en otra me repite el mismo dato en todas las celdas Busco Concreto : Grabar del ListView3 Columna MEDIDA, Columna CANTIDAD me grabe los datos a la Hoja BASEDATOS desde la columna E hasta Columna AB en ese orden (Anexo link imagen .jpg) agrad…

Hola, estoy realizando un programa desde visual basic de excel y todo iba bien hasta que no pude programar un boton llamado constancia. el caso esque necesito que al darle click a dicho boton este llene los campos de nombre y rfc dentro de mi documento de word. pero ya intente de muchas maneras pero ninguna funciona de la manera que necesito. espero me puedan ayudar aqui adjuntare un documento donde explico con mas detalle este problema. AYUDA EXCEL.pdf

Buenas Tardes foristas. Buenas tardes profesor JSD. Desde anoche he estado tratando de adecuar su excelente propuesta e insertarla al Proyecto, pero por más que he intentado no he logrado que funcione adecuadamente. Me explico: Yo copié el UserForm1 y el Modulo1 para mi Proyecto. Creé la Hoja4, la cual tuve que modificar y renombrar porque en mi Proyecto yo tengo una Hoja4, así que se creó como Hoja26 y estos cambios los sustituí en los códigos (Hoja4 por Hoja26) y aunque no me da ERROR alguno, tampoco me general el Reporte. Ortro problema que vi de su propuesta es que en PAGADO A: referente al Combustible debe decir Fincimex, no Financiamiento para…

Hola a todos. Tengo una carpeta con archivos en fomato csv. Cada archivo tiene nombre de la forma "aaaammdd.csv" y son uno diario. Cada archivo tiene varias columnas que no necesariamente vienen en el mismo orden (no todos tienen TODAS las columnas, pero todos tienen las que necesito). El encabezado, o el nombre en la primera celda de cada columna coincide en todos los archivos (es decir, podría pedirle a la macro que busque el nombre de la columna y copie los datos). Necesito un archivo que me consolide las columnas que seleccione los datos en cada columna!

Buenas noches colegas. Espero todos se encuentren con excelente salud. Tengo un pequeño propblema. En dias pasados acudí a este Foro para buscar ayuda con un reporte que me permitiera buscar entre dos rangos de fechas y un criterio y el profesor JSD me dió una solución muy positiva, de la cual estoy muy satisfecho, pero en ocasiones (no pocas) cuando intento hacer una búsqueda el sistema me emite un MsgBox preguntando si quiero eliminar la toda la fila de la hoja: Esto ocurre cuando oprimo el Botón Buscar. Por favor, si no es mucha molestia, podría ayudarme. Usuario: Admin Password: 456 Saludos Pino Disponibilidad v3.9.2.x…

¡¡Hola!, buenos días. Tengo un archivo que tomé de la comunidad para realizar un reporte por material y calcular de cada uno sus proporciones utilizadas. Lo anterior lo realiza de manera correcta, lo que busco es que de todos los materiales utilizados me arroje una tabla con los totales. El problema es que los materiales los tengo divididos en columnas y me es algo difícil saber cómo sumarlos correctamente. Adjunto el archivo de ejemplo. De antemano muchas gracias por su ayuda. Cálculo_Materiales.rar

Hola tengo una archivo de datos de varias columnas que funciona con listas desplegables con indirecto (una depende de la anterior) y me gustaría tener en Mac una función similar a la de windows que me permita ver la lista de productos que tienen las letras que voy escribiendo en la lista que desprende el indirecto

Hola a todos; -Estoy trabajando con dos InputBox y no se sí realmente está bien lo que adjunto. Funcionar si funciona pero desconozco si es del todo ortodoxo o hay otro método mejor. Buen día a todos. 2Input.xlsm

Hola, tengo el siguiente código asignado a un Botón de "Eliminar" dentro de un Formulario en Excel, quisiera agregarle la parte de confirmación, donde me pregunte "Confirma eliminar el registro" Si - No, y ahí me perdí un poco, agradecería mucho su ayuda. ------------ Private Sub BT_Eliminar_Click() Me.BT_Agregar.Enabled = True Dim FILA As Object Dim Linea As Integer Dim NumeroFila As String NumeroFila = Me.TextRolPatente Set FILA = Sheets("Basedatos").Range("B:B").Find(NumeroFila, LOOKAT:=xlWhole) Linea = FILA.Row Range("B" & Linea).EntireRow.Delete MsgBox "El registro fue eliminado" Me.TextRolPatente = Empty Me.T…

Buenas tardes amigos espero estén bien Hasta hace poco utilizaba esta macro para guardar mis datos: Private Sub CommandButton5_Click() ' Guardar en Matriz If TextBox1 = "" Then MsgBox "Datos Incompletos: La Casilla Nombres y Apellidos Esta Vacia", vbExclamation: Exit Sub Dim uf As Integer With Sheet10 uf = .Range("B" & Rows.Count).End(xlUp).Row + 1 .Cells(uf, 2) = TextBox1 .Cells(uf, 3) = TextBox2 .Cells(uf, 4) = ComboBox1 .Cells(uf, 5) = TextBox3 .Cells(uf, 6) = ComboBox2 .Cells(uf, 7) = ComboBox3 .Cells(uf, 8) = ComboBox4 .Cells(uf, 9) = TextBox4 .Cells(uf, 10) = ComboBox5 .Cells(uf, 11) = Tex…

hola Amigos!! espero se encuentren muy bien, En el archivo adjunto, encontrarán dos hojas: MB5L y BD. Debo transformar la información que se encuentra en MB5L y estructura como una base de datos en la hoja BD. para realizar esto en la mB5L debe se coger los datos que se encuentran en las columnas "i" a "n" copiarlos y pegarlos en las columnas "c" a "h" en la hoja BD. Adicional, se debe repetir la sociedad y la cta mayor por cada registro que se pega en la hoja BD. la soc se encuentra para el primer caso en la celda C5 y cta mayor en B6. Comparto una hoja de como debería de quedar el resultado ? si me pueden ayudar, se lo agradecería mucho!! MB25 - ej…

Hola todos agradezco de antemano cualquier gestión / ayuda tengo dos pestañas BBDD listado exportado de la ERP donde pueden cambiar los importes USUARIO listado histórico de BDD El código tiene que detectar por la columna del nº factura ( columna J ) y cuando detecte el mismo nº de factura que actualice los importes de acuerdo a la exportación ( BBDD ).....que mal me explico. Lo siento. Sub CORREGIRIMPORTES2() Dim i, j As Integer j = 3 ' DONDE EMPIEZA A ESCRIBIR For i = 3 To 10000 ' DONDE EMPIEZA A BUSCAR …

Buenas tardes. He hecho dos macros que imprimen dos pdf de diferentes páginas. Primero hago el pdf: Sub printdep() Dim nombre As String, Ruta As String, nombre2 As String Sheets("Horarios").Select Range("A1:Q42").Select ActiveSheet.PageSetup.PrintArea = "$A$1:$Q$42" Application.PrintCommunication = False With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With Application.PrintCommunication = True ActiveSheet.PageSetup.PrintArea = "$A$1:$Q$42" Application.PrintCommunication = False With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" …

Hola buenas, he estado intentando simplificar un numero racional y devolver el numero entero si el denominador es 1. Si alguien me pudiera ayudar se lo agradeceria mucho. Gracias

Hola buenas tardes: Tengo un archivo con una macro para imprimir archivos desde un listado en una hoja. de mi lista que tengo en la columna C indico en la columna D con la palabra Si, para que se imprima, si esta columna no tiene esta palabra no lo imprime. La macro me es útil. Pero mi actual necesidad es: Imprimir todos los archivos listados, pero si la columna D, está la palabra "X", no deberá ser impreso. Muchas gracias Consulta IMprimir.xlsm

Buenas tardes. Les Saluda Denixon Acosta. Quisiera poder contar con su ayuda para una hoja de excel que estoy elaborando. He intentado mediante la grabadora de macros copiar las filas de una tabla y pegarlas en otra tabla que se encuentra en otra hoja. De antemano muchas gracias. Saludos cordiales