Skip to main content

AccessTr.neT


Zengin Metin Alanındaki Biçim Özellikleri Worde Aktarma

Zengin Metin Alanındaki Biçim Özellikleri Worde Aktarma

#7
.Selection.TypeText Nz(Kayit.Fields("DURUMU"), "")

kodunun üstüne

If Nz(Kayit.Fields("DURUMU"), "") = "kaydı var" Then
                .Selection.Font.ColorIndex = wdRed
                Else
                .Selection.Font.ColorIndex = wdBlue
                End If


kodu ekle.
Cevapla
#8
Çok teşekkür ederim Ozan hocam.sayenizde işlemler gerçekleşti. Çalışmalarınızda başarılar diliyorum.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da