Saltar al contenido

Máximos colaboradores

Popular Content

Showing content with the highest reputation on 05/30/25 in Mensajes

  1. Filtros discriminatorios con VBA

    1 point
    Hola, Este código hace literalmente eso Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Me.Range("B2")) Is Nothing Then Application.EnableEvents = False Me.Range("B3").ClearContents With Me.Range("B3").Validation .Delete Select Case Me.Range("B2").Value Case 1 .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, _ Operator:=xlBetween, Formula1:="Avion,Barco" Case 3 .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, _ Operator:=xlBetween, Formula1:="Barco" Case Else End Select End With Application.EnableEvents = True End If End Sub

  2. Hola soy nuevo en condigo VBA tengo un codigo que me ingresa una foto de una carpeta dentro de una autoforma circular pero si no hay fotos me da error

    1 point
    Maestro muchas gracias, me funciono a la perfección, eres un genio

  3. Fórmula para buscar con condición mayor/menor

    1 point
    Israel, gracias por la parte que me toca. He tratado de darle un aire más moderno. Desde 2016 no he hecho un cambio tan grande. Nos vemos!

  4. Fórmula para buscar con condición mayor/menor

    1 point
    para agilizar propuestas, te sugiero que proveas estos datos en tu siguiente mensaje: 1) el importe que 'ya tienes' (al que refieres en tu formula) 2) la celda donde necesitas el resultado (y la formula exacta con que lo intentas) 3) una imagen (reducida) de los datos en 'el otro libro' (rangos, arreglo, tipo de datos, ...) 4) el resultado que esperas como correcto (y donde se ubica en la imagen que adjuntes)