Dante Amor

Prueba lo siguiente Sub goal() ' ' goal Macro Range("M12").GoalSeek goal:=Range("A3").value, ChangingCell:=Range("L1") End Sub

Tienes una "r" ConsultarV, debe ser ConsultaV La fórmula ConsultaV es para la versión 2010. Tal vez debas utilizar BuscarV Prueba y me cometas

Es un problema lidiar con las fechas, porque visualmente tiene un formato, pero internamente excel las almacena como un número. Prueba la siguiente: Private Sub CommandButton5Click() Dim col As Range, nDate As Long Application.ScreenUpdating = False...

Es sin el "7" LRow = ActiveSheet.Range("B" & Rows.Count).End(xlUp).Row

Utiliza la siguiente fórmula: =CONTAR.SI.CONJUNTO($A$2:$A$17,A20,$B$2:$B$17,">0")

Prueba lo siguiente: Sub Macro1() Range("AO22:AV196").Replace What:="0", Replacement:="", LookAt:=xlWhole, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False End Sub

Prueba la siguiente: =espacios(izquierda(A2, encontrar("(",A2) - 1))

Prueba la siguiente macro Tus datos deben esta como en tu ejemplo, es decir, el primer año debe empezar en la celda A3. Sub SumarCampeones() Dim lr As Long, lc As Long, lr2 As Long ' lr = Range("A" & Rows.Count).End(3).Row Application.ScreenUpdating...

Y quiero introducir un cero 0 en la tercera posición empezando por la izquierda Ejecuta la siguiente macro, los resultados quedarán en la misma columna A: Sub Macro4() With Range("A1", Range("A" & Rows.Count).End(xlUp)) .Value =...

Los hombres dejan de crecer hasta los 21 años, entonces SÍ, puedes crecer más. Nadie podrá asegurarte cuánto llegarás a medir, pero todavía puedes crecer más.