Buenas noches, no encuentro solución alguna que pueda ser con formulas y como veo por internet que se puede hacer con macros y VBA me gustaría consultar aquí ¿Es posible que de forma automática se cree una fila en blanco de alto 10px cada vez que exista un salto entre fechas? Voy insertando líneas al final de la tabla y después las organizo de más antiguo a mas nuevo, una vez que haga esto me gustaría que se generase la linea en blanco entre las filas que tengan distintas fechas. Adjunto documento de ejemplo Muchas gracias por la ayuda! Diario.xlsx

Hola muy buenas, Estoy con un trabajo y me gustaria aclarar mis problemas. Estoy usando la version - Version 2401 compilación 16.0.17231.20194 En el excel que voy a adjuntar tengo tres hojas. - 1*hoja: contiene un analisis de diferentes parametros de diferentes objetos (14 en total). - 2*hoja: siguiendo la misma plantilla, quiero decir que se utlizan las mismas casillas para analizar los mismos objetos pero con otro metodo. (Los mismos 14 objetos, enumerados en las dos hojas.) - 3*hoja: En esta hoja quiero hacer la comparación que hay entre las dos mediciones. Es decir la diferencia q hay numérica como en porcentaje que hay en cada objeto en cada parametro. Adem…

Buen dia, necesitaria que me ayuden con esto la idea es buscar un dato y que en la ultima fila me agregue una x cuando encuentre el mismo adjunto un ejemplo en el cual me colorea pero despues no me sirve para filtrar por eso es la idea de agregar la x ahh en el ejemplo se repiten los datos necesitaria que me marque todos y que el comand but se mantenga siempre al frente ejemplo.rar

Hola a todos buen día, espero se encuentren muy bien... Quiero realizar una copia de unos datos de un libro a otro, pero al copiarlos en Table libro Reporte.xlsm no me amplia el rango de la tabla y se come los datos, y si tengo menos me salen errores después de los datos... me gustaría que alguien me diera una breve explicación del porque y que propiedades me pueden servir para que el rango donde vaya a pegar se acople al rango de la tabla .De antemano Mil gracias a los que puedan ayudarme, bendiciones. Saludos, Reporte.xlsm jobcode.xlsx

Buenos dias Compañeros estoy intentando optimizar un archivo el cual tiene muchas formulas en varias hojas y a llegado a pesar 15 MB, solo pongo una en la cual explico mi inconveniente,( se podrá hacer click en la celda F4 y este me muestre mi formulario ?), si es asi ... quisiera ingresar el ruc y automáticamente me jale los datos de el proveedor y detalle cuando selecciono el botón buscar y me manda un error quisiera saber si se puede obviar el seleccionar buscar y automáticamente al terminar de escribir el ruc jale los datos, si no se puede quisiera que me digan porque me sale error al momento de buscar. luego ingresar el valor base y valor adquisitivo y al seleccio…

Buenas, mi consulta es la siguiente: En un excel tengo una base de datos los cuales se pasaran a un Word y llenaran formularios, y esto lo estoy haciendo mediante correspondencia. Mi duda entra en que cuando por ejemplo una celda del excel este vacia (o con un "-") al pasarlo al word en ves de pegar el espacio, borre cierta cantidad de texto. Gracias.

hola resulta que con este codigo se crea una tabla dinamica en macros Sub PivotTable() Dim PTCache As PivotCache Dim PT As PivotTable Set PTCache = ActiveWorkbook.PivotCaches.Create _ (SourceType:=xlDatabase, SourceData:=Range("A1").CurrentRegion) Set PT = ActiveSheet.PivotTables.Add(PivotCache:=PTCache, _ TableDestination:=Range("F1"), TableName:="Ventas") With PT .PivotFields("Zona").Orientation = xlPageField .PivotFields("Mes").Orientation = xlColumnField .PivotFields("Nombre").Orientation = xlRowField .PivotFields("Ventas").Orientation = xlDataField .DisplayFieldCaptions = False End With End Sub [/CODE] y en mi excel cree u…

Hola, Me han pasado un fichero, donde las cantidades vienen con ' delante, sería así: '0,234 '123456,03 He utilizado este código para quitarle el símbolo porque necesito sumarlo, pero en algunos casos se queda así 0.234 y no me deja reemplazar el punto por la coma, solo quitárselo y quedarme con 0234 Os paso un fichero de ejemplo, por si se os ocurre otro modo de cambiar el formato. Muchas gracias! With Worksheets("Hoja1") For i = 2 To .UsedRange.Rows(.UsedRange.Rows.Count).Row If Cells(i, "A").Value Like "'*" Then Cells(i, "A").Value = Right(Cells(i, "A").Value, Len(Cells(i, "A").Value) - 1) End If Next End Wi…

Buenos dias, tengo creada la función ContarColor, pero me cuenta todas las celdas de ese color, y lo que necesito es que me cuente solo las que tienen datos, alguien podría ayudarme. Graciasexcel.2.xlsm

Hola Soy Roberto y haciendo un trabajo me surgio la siguiente duda: La idea consiste en que con macros abro, desde mi Libro, un archivo excel, el cual después copio su unica hoja(importo) hacia mi libro que usa la macro. El problema es que tengo una Restricción, la cual es que solo copia el archivo que tenga de nombre en su unica hoja como "Libro1", es decir, si se llama de otra forma, entonces no lo puedo importar. Acá envio la macro que tengo, porfavor si me pueden ayudar :C Sub copiarhoja1() Set l1 = Workbooks("Programa Backlog") With Application.FileDialog(msoFileDialogFilePicker) .Title = "Seleccione archivo de excel" .Filters.Add "Archivos excel", "*.xls*" .…

Buenas noches, Adjunto mi archivo a fin de encontrar una solucion. Cada check ejecuta un userform en la cual con los botones podemos cambiar de color de verde a rojo en el ejemplo solo estoy considerando 5 check. LO que busco es insertar un solo userform para todas las check y que estas se ejecute de manera individual para no seguir insertando tantas userform como numeros pudan haber. Agradezco su ayuda Esperando una respuesta. Saludos...... Un solo userform para todos.xlsm

Hola EXCELENTES. Heredé este código. Yo no tengo NI IDEA de programación. Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo errorfecha If Not Intersect(Target, Range("A1830")) Is Nothing Then If Range("A1830").Value <> "" Then If Application.WorksheetFunction.Weekday(Range("A1830").Value, 2) >= 6 Then On Error GoTo 0 MsgBox "No puede ser sábado o domingo", vbCritical Range("A1830").EntireRow.Delete Range("A1830").Select ElseIf (Range("A1830").Value < Date - 7 Or Range("A1830").Value &gt…

buenas noches, tengo una macro para navegar por paginas web, la cual siempre me ha funcionado bien, pero siempre me ha costado dar con los objetos web he intentado con las siguientes sentencias sin éxito para el color: c.Value = htmlDeRespuesta.getElementsByName("_ngcontent-hhw-c116")(0).innerText y para el valor 1,99 c.Value = htmlDeRespuesta.getElementsByName("_ngcontent-xsn-c116")(5).innerText c.Value = htmlDeRespuesta.getElementsByClassName("col-xs-2 price")(0).innerText c.Offset(0, 3).Value = htmlDeRespuesta.getElementsByClassName("tableHere")(0).innerText pero no he podido dar con el valor de ninguna form…

tengo un problema en la arquitectura de la macro, todo funciona bien hasta que intento bajar las filas hasta el A3, y lo trato de configurar y no hay caso, bueno ese es un problema , pero también me gustaría que filtre los tipos de archivo sin necesidad de incluir fechas o buscar por nombre sin la necesidad de fechas, la verdad lo necesito para un libro de mas de 87 paginas pero acá les va una idea el que es "funcional" es ORIGINAL 1 y el no funcional es OBJETIVO 1 gracias de ante mano ARCHIVOS.ZIP

Hola a todos, Tengo que hacer un trabajo en excel. Necesito crear un hypervinculo que me muestre un msgbox que contenga una serie de datos. No encuentro nada en google. Es posible crear un hypervinculo que podamos que nos habra un mensaje pop up. Gracias,

Buenas, vuelvo a publicar el mismo problema; talvez el otro por haberlo dejado bastante tiempo ya se cerro el tema.El problema es el siguiente:Tengo este problema, al abrir un archivo de Excel (Macro), me sale como cortado o en blanco al momento de ejecutar las macros, sin ejecutar las macros me aparece el archivo completó, ya sea los botones, el formato de la hojas, etc.Cuál podría ser el problema, probé con Office 2016, 2019, 2021, actualmente tengo Windows 10 (x64) pero aún persiste el problema. Pero en otras computadoras me corre bien el archivo. Link del archivo: SIN ERROR (SIN EJECUTAR LA MACRO): (Hoja Principal) (Hoja de Afiliación) …

necesito que me digais urgentemente como poner un contador de acierto o fallos por ejemplo en un texto pones b o v pues la v esta bien como hago para ponerlo en en el contador muchas gracias. practica 7 echa bien.ods

hola experto la idea es como reducir o modificar este codigo byfejoal ya que lo que realiza es resaltar en la hoja 2 las celdas azules que estan cerca de la celda de borde grueso ejemplo2.xlsm

estimados amogos tengo un problema con un formulario he acoplado a uno que encontrado le agregue 7 texbox y ahora no ingresa datos sale un error haber si me pueden ayudar con problema adjunto el archivo para que lo vean es solo la parte que tengo el problema lo reduci por que es demasiado grande dejando la parte a solucionar antetodo mis saludos y agradecimientos de ante mano por la ayuda que me brinden FORMATO DE MULTA.xls

Hola a todos, Tengo una excel con varias lineas que voy rellenando con los consumos de carburante de cada usuario y con su dirección de mail para enviarles un correo copiando su línea que aparece en el cuerpo del mensaje, me ha estado funcionando pero de repente me da un error, "Se ha producido el error '1004' en tiempo de ejecución: Fallo en el método 'EnvelopeVisible' de objeto '_Workbook' Adjunto la macro que utilizo Muchas gracias por la ayuda

Buenas tarde estimados: Les agradecería me ayudaran a darle una nueva presentación a los registros de una base de datos. Lo que preciso es extraer los datos de la Hoja1 para que los muestre en la forma en la Hoja2 del ejemplo. Gracias de antemano Libro1.xlsm

Hola un saludos a todos de nuevo se que esta pregunta no correponde, pero no encuentro como colgarlo de foro correcto pero espero puedan ayudarme estoy trabajando con imágenes en word, se trata de insertar una imagen y que luego esta sea seleccionada y modificada en cuanto a su tamaño, utilizo el siguiente código para insertar la imagenSelection.InlineShapes.AddPicture FileName:= _"C:UsersArturoDesktopFotosListasFoto d (" & nf & ").jpg" _, LinkToFile:=False, SaveWithDocument:=Truela imagen queda insertada en una tabla pero el problema es que se pierde su selección es decir que necesito seleccionarla con el mouse para modificar su tamaño, y como son bastantes …

hola necesito una ayuda, una macros que haga como si tecleara cualquier conbinacion de teclas, debe ser simple pero no se el codigo, saludos

Hola, tengo una macro que me copia datos a una hoja dada, pero quisiera que cuando copie los datos y vaya a pegarlos, me pregunte el nombre de la hoja adonde quiero pegar los datos copiados. La macro es simple, ya que entiendo poco de programación Sub Datos_Capital() ' ' Datos_Capital Macro ' ' Sheets("201").Select ActiveWindow.SmallScroll Down:=-69 Cells.Select Selection.Copy Sheets("220").Select -------------->aqui es donde quisiera me preguntase el nombre u hoja a copiar Range("A1").Select ActiveSheet.Paste Range("C2:K2").Select Selection.Replace What:="3", Replacement:="22", LookAt:=xlPart, _ …

Buenas, Agradecería por favor vuestra ayuda con la siguiente hoja de cálculo que adjunto, para crear una macro en VBA que haga lo detallado a continuación: - Seleccionar solo los valores de las columnas R, S, T que lleven la fórmula de multiplicar las columnas V * F (en el archivo se aprecia). - Copiar estos valores seleccionados a su fila análoga de las columnas J, K, L. - Inicializar a cero los valores en fila análogas de la columna V y X. Muchas gracias. Saludos. Libro1.rar