AccessTr.neT
Font Büyütme - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Font Büyütme (/konu-font-buyutme.html)

Sayfalar: 1 2


Cvp: Font Büyütme - ozanakkaya - 17/10/2018

Merhaba, kod içerisinde


strCurFontSize = "fs" & lTmp

şeklinde satır var. bunun üzerine


if lTemp <16 then
lTemp = lTemp + 2
end if

şeklinde kod yazarak deneyiniz. Veya

 RTF2HTML = strHTML

kodunun üzerine

    strHTML = Replace(strHTML, "\fs18 ", "\fs24 ")
    strHTML = Replace(strHTML, "\fs16 ", "\fs20 ")

şeklinde kod ekleyerek deneyiniz. Ayrıca Profil Bilgileri sayfsından eksik bilgilerinizi (ofis versiyonu) doldurunuz.


Cvp: Font Büyütme - berduş - 17/10/2018

Yardımınız için teşekkürler Ozan bey ama maalesef "replace"li kod dışındakiler işe yaramadı.  "replace"li kodu biraz değiştirerek - modül içinde işe yaramadı maalesef - tıklama olayına yerleştirip kullanabildim. Son halini yüklüyorum, cevaplanmış sorular bölümüne taşıyabilirsiniz.