Buenas por favor necesito de su ayuda. Tengo una hoaj en la cual estan mis datos, quiero crear con macros nuevas hojas que contengan las quince primeras filas en una hoja nueva, y las siguientes quince en otra hoja, y asi sucesivamente hasta terminar con el listado, aun asi la ultima hoja creada no tenga los las quince filas. Se podria hacer tambien para una cantidad variable de filas es decir 20 o 30 Gracias por su apoyo Medicos.xlsm

Buenas tardes amigos Nesecito su valiosa colaboracion para poder resumir un conjunto de datos de un listado en otro listado , esto lo necesito hacer sin la ayuda de una tabla dinamica la cual no me es funcional en el proyecto que estoy haciendo. les dejo el adjunto con el ejemplo que quiero hacer agradeciendo de antemano Saludos cordiales Ejercicio.xls

Hola a tod@s. Agradezco de antemano su tiempo y respuesta a los siguiente. En la hoja "RESUMEN" se encuentran los códigos de clientes y en las siguientes hojas se nombran cada código de cliente. Entonces lo que se requiere es que, por ejemplo, que en la hoja "A 030-028" se crea un hipervínculo hacia la hoja "RESUMEN", PERO con dirección hacia la celda A4 ya que es el nombre de la hoja "A 030-028". Y así sucesivamente con las demás hojas. Lo haría manualmente pero son mas de 800 hojas. Creo que esto solo se puede lograr con Macros, pero si hay la posibilidad de realizar sin ello estaría perfecto. Saludos PRUEBA.xlsx

Hola amigos, a ver si podéis ayudarme: Tengo una base datos creada con aproximadamente 1.000 registros (filas) que con una macro va rellenado otra base de datos general (que tiene también otros datos) Lo que querría conseguir es que en el momento que incluyo un registro en la B.D. General, quedara marcado en la primera (la ya creada) por ejemplo con un color que marcara toda la fila, o con negrita u otra manera, con el fin de que resalte y cuando abra la base de datos (la ya creada) pueda ver de una ojeada qué registros han pasado ya a la b.d.general y lo que es más importante para mí , cuales son los que faltan de trasladar. Espero haberme explicado …

Hola amigos: Recurro nuevamente a uds para ver si alguien me puede dar una ayudadita, he estado adaptando varias macros que me he encontrado en internet a una aplicacion que estoy haciendo, entre ellas me encontre una que me conecta excel con access, es una aplicacion muy completa y funciona muy bien, pero como yo he tenido que estar haciendole agregados, cada macro que he ido adaptando abre y cierra la base de datos independientemente, (al menos eso es lo que entiendo) mientras que con el macro principal que estoy utilizando abre una sola vez se realiza todo en ella y luego se termina cerrando, y por lo que veo hace todos los cambios utilizando el macro que se encuentr…

Me podrian definir que hace cada seccion de esta macro relacionada a este archivo: Sub Copia() Dim C As Range Application.ScreenUpdating = False For Each C In Range("A2", Range("A" & Rows.Count).End(xlUp)) Sheets("Molde").Copy , Sheets(Sheets.Count) With ActiveSheet .Range("A5") = C: .Name = Left(C.Offset(, 1), 31) End With Next C Application.ScreenUpdating = True End Sub Ejemplo Copiar Hoja.xlsm

Hola de nuevo, seguimos con formateos. En la macro que adjunto al añadir un numero a la columna "E" de mi tabla "Tabla" a través del evento "Worksheet_Change" de la hoja me lo transforma en formato hora es decir, si pongo 0.5 el formato devuelto es 00:30:00. Lo que me gustaría saber si el código es del todo correcto o se puede mejorar ¿? Saludos. Horas.xlsm

Buenas tardes, tengo el siguiente código, pero no sé qué instrucción necesito agregar para que pegue solo los valores de la celda copiada. Ya que me manda error de compilación, de antemano, gracias por la ayuda Sub FirstVisibleCell() With Worksheets("Seguimiento").AutoFilter.Range ActiveCell.Value2 = Range("C" & .Offset(1, 0).SpecialCells(xlCellTypeVisible)(1).Row).Value2 Selection.CurrentRegion.Select Selection.SpecialCells(xlCellTypeVisible).Select ActiveCell.Copy Destination:=Range("F1").PasteSpecial xlPasteValues End With End Sub

Hola, soy nuevo en esto de los foros (disculpenme si me equivoco en algo:beguiled:) ... Tengo una columna de datos así: asdf (en negrita tal cual) qwe ert yui poiu (en negrita tal cual) bnm cvb ert tyu cuando uso la opción de copiar y pegar me lo transpone así: asdf qwe ert yui poiu bnmcvb ert tyu y quiero transponerlo así: asdf qwe ert yui poiu bnmcvb ert tyu como puedo hacerlo?.... tengo mas de 10000 datos. He buscado otras macros que estan en el foro pero no he conseguido una que lo haga :joyous:. Agradecería cualquier ayuda:grief: o sugerencias....

Hola, necesito crear una función que indique si un número pasado como argumento es de gran alcance. De momento tengo la función para hacer la descomposición factorial: Function descomposicionFactorial(numero As Long) As String Dim factor As Long Dim multiplicidad As Long Dim descomposicion As String Dim resto As Long factor = 2 descomposicion = "" resto = numero If numero = 1 Then descomposicion = "1·" End If Do Until resto = 1 If resto Mod factor = 0 Then multiplicidad = 1 Do multiplicidad = multiplicidad + 1 …

buenas e visto muchos vídeos por youtube y estoy realizando un pequeño cuadro de inventario rápido y sencillo, tomando el patrón de uno de los vídeos que e visto e diseñado uno me funciono, pero lo personalice como:les explicotengo 4 pestañas de las cuales 3 las voy a manejar yo y la otra es para que mis empleados lo vean pero no modifiquen nadaen la pestaña producto tengo un botón que con el puedo ingresar datos y le dije a la macro que los quería que se alojaron en la pestaña principio, entrada y existencia eso esta bien no tengo problemas; mi problema es que no quiero que en la pestaña principio me aloje los resultados a partir de la celda A1, sino a partir de la celda…

Señores, Junto con saludarlos me permito ingresar esta solicitud. Estoy intentando automatizar la creación e impresión de nuevas hojas. Hasta el momento he logrado crear nuevas hojas, pero tengo problemas con la impresión de estas. Tengo que mencionar que apenas conozco un poco lo referente a macros. Saludos, Sergio ejemplo crear nuevas hojas.zip

Estimado amigos del foro, alguien sabe por medio de macro como puedo conectar un sistema de gestión con Excel, el sistema es parecido al sistema S.A.P. lo necesito para poder actualizar una data que descargo a diario desde dicho programa( ojo no subo ningún ejemplo, puesto que solo es una pestaña en blanco en donde quisiera que se descarguen los datos con un botón de actualizar base, y no estar descargando diariamente varios Excel diferentes)

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

quiero utilizar combobox con sql server, encontre este archivo en el foro. pero no se como cambiar la conexion de acces a sql server Combos dependientes SQL.rar

Hola a tod@s, he buscado en el foro pero no encuentro exactamente lo que necesito. Tengo en una columna grupos de celdas del mismo color y me gustaría obtener el resultado de cuántas seguidas hay y su número, en una misma columna. Ejemplo: si hay 3 celdas seguidas de color, obtener un 3, si hay 4 obtener un 4, etc Adjunto un excel con el ejemplo por si es más fácil. Muchas gracias de antemano por vuestro tiempo y sabiduría!! Ejercicio contar celdas consecutivas mismo color.xlsx

Hola necesito ayuda para copiar datos de un libro a otro, el libro matriz que se llama matriz pcs es el fijo que tengo que se alimenta de diferentes libros los cuales pueden variar nombre de hoja y de libro. Por ellos realice el siguiente comando.Sub LLENADO()ActiveWorkbook.ActivateActiveSheet.SelectFor a = 0 To 68Workbooks("MATRIZ PCS").Sheets("J3D133").[t11].Offset(a, 0) = [t11].Offset(a, 0)NextEnd Subpero me sale error no se si alguien podria ayudarme, prueben con cualquier hoja solo son pegar datos de una hoja y libro a otro pero usando el active shett

Hello everyone from Maurizio Excuse me in advance if I disturb you for so little But I have a problem that I would like to solve, but I just can't. My problem is this: I would like the days of the week inserted in a Userform to be able to move based on Today's date inserted in a label I thought I could solve everything using the Excel function (=Date(year;month;1)) Then transform it into NumberFormat = "ddd" But I see that this doesn't work Could you kindly give me a hand? Thank you. Greetings from A.Maurizio (P.S) Granfde Real Madrid Spostare_Giorni_Sett_In_Un_Calendario.xlsm

Hola a tod@s. Tengo el siguiente código. Sub Auto_Open() OcultarHojas End Sub Sub OcultarHojas() Dim Ws As Worksheet For Each Ws In ThisWorkbook.Worksheets If Ws.Name <> ActiveSheet.Name Then Ws.Visible = xlSheetHidden Next Ws End Sub Funciona bien, abre en la última hoja activa. Pero...... los vínculos de esta a las otras (50) no funcionan, ¿ Que le falta al código ? Salu2

Buen@s, se que uds son unos geniso con excel, actualmente tengo la necesidad de un macro que tome el valor de por ejemplo la celda B2 de un libro llamado Datos, para que sea el nombre de un libro nuevo a guardar. Ya estuve googleando y solo me salen macros para guardar el libro usando el valor de una celda del mismo libro a guardar y yo necesito tomar el valor que servirá de nombre de un libro diferente que ya esta guardado. desde ya gracias por su ayuda.

Buenas tardes, tengo una macro copiada de un ejemplo que funciona perfectamente. Usa un formulario para capturar datos a una hoja. El problema está cuando convierto el rango normal en una tabla. Aquí ya no me numera la columna A y se desplaza al final de la tabla. Agradecería me echasen una mano. Adjunto envío archivo. prueba.xlsm

Primero que nada saludos a todos y gracias de ante mano. Que es el documento: es un libro donde se ingresan facturas con importes, de varias hojas (1)Ingreso de datos (2)Detalle (3)Consultas (4)Imprimir El problema: en la hoja (3) el botón "imprimir" me imprima de la hoja (4) la lista que se encuentra ahí, pero solo las filas que contengan importes mayor a "0". Esta lista no es fija,se actualiza todos los días, tanto los importes como los proveedores(que serian las filas). PD: El rango de impresión se modificaría constantemente. Y las filas con importe "0" no tendrían que salir en la impresión. Tengan en cuanta que no me manejo mucho con la edición de las macro, solo…

Hola buen día masters! He seguido avanzando con una macro que me ayudaron a construir en el foro pero ha crecido el alcance y de tener 2 filtros por medio de "Combobox´s" ahora son 3 filtros pero no funciona del todo bien porque la intención es que al seleccionar cada combobox filtre los datos y los vaya mostrando en el listbox. 1er combobox_año: OK si lo filtra y muestra los datos en el listbox 2do Combobox_mes: FAIL desaparecen los datos del listbox 3er Combobox_area: OK si lo filtra y muestra los datos en el listbox La función encargada de filtrar se llama Consulta dentro del UserForm llamado "Solutek". Por otra parte una vez filtrada la…

Hola. Quiero saber si hay alguna posiblidad de ejecutar Application.screenupdating=False Application.calculation=xlCalculationManual Application.EnableEvents=False ActiveSheet.DisplayPageBreaks = False[/CODE] cada vez que le de a un botón en un formulario, y de ejecutar [CODE]Application.screenupdating=True Application.calculation=xlCalculationAutomatic Application.EnableEvents=True ActiveSheet.DisplayPageBreaks = True Application.CutCopyMode = False[/CODE] al finalizar la instrucción. Lo que pregunto realmente es la manera de acelerar un libro con botones, formularios, etc etc, pero sin tener que tocar el código de cada uno ya que son muchos. Algo qu…

Hola a todos: Estoy trabajando un Userform quiero exportarlo a PDF y utilizo el siguiente código: Private Sub CommandButton1_Click() Sheets("Tabla de Resultados").Activate ActiveSheet.ExportAsFixedFormat Type:= xlTypePDF , Filename:="C:\Users\daffne\desktop\INFORME.PDF", Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintareas:=False, OpenAfterPublish:=True Me.Hide end sub El principal problema es que cuando ejecuto me marca un error de compilación y me pide un identificador, justo en Type:=... soy nueva en esto y no he encontrado aún cómo resolverlo, les agradecería muchísimo su ayuda. Saludos