msg box yazı stili

[AS3434]

Herkese iyi günler.
Açılışta gelen mesaj kutusundaki uyarı yazısının rengini ve stilini değiştirebilirmiyim?
mesela

Sub SIRALA()
Range("B6:F300").Select
Selection.Sort Key1:=Range("B6"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
MsgBox "BU İŞ BU KADAR ...)", vbInformation
End Sub

kırmızı olan yeri mesajda da kırmızı yapabilirmiyiz.

 

[Levent Menteşoğlu]

Normal şartlarda yapamazsınız belki API lerle falan yapılabilir bilemiyorum. Böyle bir şey için kendi msgboxınızı bir userformdan kendiniz oluşturabilirsiniz.

 

[AS3434]

Teşekkür ederim sn. leventm
Fazla bilmediğim konuları karıştırmayayım o zaman.

 

[Seyit Tiken]

Kamera özelliğinden yararlanarak basit bir örnek hazırlanmıştır.
Ekli dosyayı bir inceleyiniz.