İç içe eğer makro kodu yardımı

[cavanoos]

Merhaba;

İç içe eğer kodu ile ilgili yardımınıza ihtiyacım var.
İlk eğer koşulum aşağıda, iki koşul daha eklemem gerekiyor.

1 - ActiveCell.Offset(0, -2).Value = IIf(ActiveCell.Offset(0, -2) = ActiveCell.Offset(0, 7), "MR00",

2. koşul IIf(ActiveCell.Offset(0, -2) < ActiveCell.Offset(0, 7) olduğunda yapılacak işlem kodları altta

ActiveCell.Offset(1, 0).Select
ActiveCell(1).EntireRow.Select
Selection.Insert Shift:=xlDown
ActiveCell.Offset(0, 0).Select
ActiveCell(0).EntireRow.Select
Selection.Copy
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveCell.Offset(0, 8).Select
ActiveCell.FormulaR1C1 = "SEYY"

3. koşul IIf(ActiveCell.Offset(0, -2) > ActiveCell.Offset(0, 7) olduğunda yapılacak işlem kodları altta

ActiveCell.Offset(1, 0).Select
ActiveCell(1).EntireRow.Select
Selection.Insert Shift:=xlDown
ActiveCell.Offset(0, 0).Select
ActiveCell(0).EntireRow.Select
Selection.Copy
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveCell.Offset(0, 8).Select
ActiveCell.FormulaR1C1 = "ELKK
ActiveCell.Offset(0, 2).Select
ActiveCell.FormulaR1C1 = "MG00"

Bu kodların hepsini iç içe eğer kodu ile birleştirmek istiyorum ama yapamadım.
Yardım edebilir misiniz ?