Farklı hücre aralıklarında aynı makroyu çalıştırma

[ynmcan]

Merhaba Arkadaşlar;
"A1:F25" hücre aralığında aşağıdaki kod ile makroyu çalıştırıyorum.

Private Sub Worksheet_Change(ByVal Target As Range)

    If Not Application.Intersect(Range("a10:f25", ), Range(Target.Address)) _
    Is Nothing Then

    Makro1
    End If

    
End Sub

Aynı makroyu "A1:F25" - "M1:R25" hücre aralıklarında çalıştırmak için kod ta nasıl bir değişiklik yapmam gerekiyor

 

[Ömer]

Merhaba,

Deneyiniz.

If Not Application.Intersect(Range("a10:f25, a1:f25, m1:r25"), Range(Target.Address)) Is Nothing Then

 

[ynmcan]

Merhaba,

Deneyiniz.

If Not Application.Intersect(Range("a10:f25, a1:f25, m1:r25"), Range(Target.Address)) Is Nothing Then

Teşekkür ederim