Así lo he hecho, he aceptado la segunda columna de anotación y he añadido una macro:
Private Sub Worksheet_Calculate()
Dim f As Long
Dim disparar As Boolean
' Si ya se disparó una vez, salimos
If Me.Range("XX2").Value <> "" Then Exit Sub
' Comprobamos si alguna W llegó a 2
For f = 2 To 6
If Me.Cells(f, "W").Value = 2 Then
disparar = True
Exit For
End If
Next f
' Si ninguna llegó a 2, no hacemos nada
If disparar = False Then Exit Sub
' Guardamos TODO el rango como base
For f = 2 To 6
Me.Cells(f, "XX").Value = Me.Cells(f, "W").Value
' Fórmula en Y restando su base
Me.Cells(f, "Y").FormulaLocal = _
"=CONTAR.SI.CONJUNTO(Datos!B:B;$V$1;Datos!D:D;$V" & f & ")" & _
"-CONTAR.SI.CONJUNTO(Datos!B:B;$V$1;Datos!E:E;$V" & f & ")" & _
"-XX" & f
Next f
End Sub
No es la opción más bonita porque sigue contando los objetos en la columna W, pero la función me resulta suficiente para poder llevar la cuenta.
Tendré que hacer una pequeña macro para cada jugadora, son 14, pero espero no tener problemas
Por
Maku, · publicado
Hola a todos.
Necesito incrustar una tabla en un formulario pero me gustaría verlo tal cual se ve en la hoja excel.
Me explicaré,
tengo un userform en VBA, en el cuadro de herramientas inserto un "Cuadro de Lista" y le digo en la propiedad RowSource el rango que quiero ver.
Los valores de las celdas se ven pero no con los mismos formatos que los tengo yo en mi hoja excel (colores de celda, formato condicional...).
¿Cómo lo puedo hacer?
Gracias
- - - - - Mensaje combinado - - - - -
Hola,
¿cómo odría hacer lo anterior insertando una imagen en el formulario y decirle que muestre una imagen que está en el mismo libro?
Es decir, he copiado el rango que quiero mostrar y lo he pegado como "imagen vinculada".
Ahora lo que quiero que en el objeto imagen del formulario se muestre la imagen vinculada que he llamado "ImagenComprobaciones".
Muchas gracias