none
Tengo una macro y funciona bien pero no puedo lograr hacer que funcionen otras iguales pero para otros rangos, en la misma hoja RRS feed

  • Pregunta

  • Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$F$6" Then
        If Target.Value = "Colones" Then
           Range("F18:F19").Select
       Selection.NumberFormat = "#,## $ 0.00"
        ElseIf Target.Value = "Dólares" Then
           Range("F18:F19").Select
       Selection.NumberFormat = "#,## [$$-409] 0.00"
        End If
        End If
    End Sub
    martes, 23 de octubre de 2018 18:25