Sub RaporluYaz() 'makro: Mesut Akcan '3/1/2019 For Each hucre In Range("O4:O9") If hucre.Value = "i" Then satir = hucre.Row Range(Cells(satir, 3), Cells(satir, 13)).Select Selection.Merge ActiveCell.Value = "RAPORLU" End If Next
End Sub
yeni mesaja git
Yeni mesajları sizin için sürekli kontrol ediyoruz, bir mesaj yazılırsa otomatik yükleyeceğiz.Bir Daha Gösterme