makroda kod birleştirme

iyi günler herkese. Aşağıdaki gibi kullandığım bir makro kodum var. Fakat kalın harflerle belirdiğim en alttaki makro kodunu üstteki ile entegre edemedim. yardımcı olur musunuz ? kodda değişiklik olmayacak,sadece IFler ile bağlantısını yapamadım. - ASIL KOD BU Private Sub...