James Bond

Prueba esta macro, el resultado lo ves en la imagen y esta es la macro Sub TEST() Set DATOS = Range("A3").CurrentRegion With DATOS FILAS = .Rows.Count For I = 1 To FILAS CELDA = .Cells(I, 1) Like "TODO*" Or .Cells(I, 1) = "FIN" If CELDA = False Then...

No me queda claro si tu ecuación es (22x+1)/(2x+1) o 22x + (1/(2x+1)), también olvidaste poner los limites en los cuales se va a evaluar la integral, asumiendo que sea la primera he creado una plantilla así, con limites en intervalos, en la columna 1...

Por macro es la siguiente Sub reemplazar_puntos() Range("a1").CurrentRegion.Replace what:=".", replacement:="" End Sub por formula selecionas el area, usa la opcion reemplazar, defines que quieres reemplazar el punto por un espacio vacio y listo

Es para creación de objetos pesonalizados por ejemplo yo los uso cuando quiero que mi modulo standard lea los datos y mediante el modulo de clase les asigne propiedades como darles color y formato, cambiar la letra o hacer operaciones simultaneas...

Esta bastante confusa tu explicación, ¿puedes subir una imagen de tu información?, ¿Y explicar con claridad que es lo que quieres que haga la macro?

Esta macro en vez de buscar uno a uno en las filas la palabra "Suc." lo que hace es filtrar todas aquellas filas que contengan dicha palabra, ya que las filtro las selecciona y hace un copiado hacia la hoja2 Sub filtrar_y_copiar() valor = "Suc." With...

Prueba esta macro, hace un filtro de lo que tenga la celda j1, (por cierto cambie esta referencia porque de dejarla hubiera creado conflictos con la macro), puedes poner una parte de la palabra y la macro filtrara todas aquellas celdas que las...

Ocupas tres macros una para que te haga un listado de las hojas en la hoja baja, en esa hoja marcas que hojas vas a ocultar con una POR, corres la segunda macro, que ocultara todo lo que tenga una POR, la tercera es opcional para mostrar todas las...

Este es elresultado de la macro y esta es la macro Private Sub Worksheet_Change(ByVal Target As Range) col = Target.Column fila = Target.Row If col = 2 Then If Range("b" & fila) >= Range("b" & fila).Offset(0, -1) Then Target.Interior.ColorIndex = 4...

Más que vínculos necesitas crear rangos personalizados y estos los pueden mandar llamar desde cualquier hoja o desde cualquier hoja te puedes posicionar en ellos, estos se crean así, en administración de nombres das en nuevo, luego asignas un nombre...