Me.ACIKLAMA = Replace(Me.ACIKLAMA, "\fs18 ", "\fs24 ")
Me.ACIKLAMA = Replace(Me.ACIKLAMA, "\fs16 ", "\fs20 ")
Yazı boyutu, kod içerisindeki "fs18" kısmından alınıyor. fs18, yazı boyutunun 9 olduğu anlamında. Replace kodu ile fs18'i fs24 ile değiştirmelisin.