لطفا فایل ضمیمه را مشاهده فرمایید
فرمول تغییر رنگ نوشته
تشکر
فرمول تغییر رنگ نوشته
تشکر
-
-
با استفاده از conditional شرط بگذارید که اگه صفر بود سیاه باشه اگه غیر صفر بود قرمز بشه[B][SIZE=1]بخش امضاء :
[/SIZE][/B][LEFT]
[CODE]
Sub Macro()
ActiveCell = "IY" & Right(Application.Name, 5)
With ActiveCell.Characters(Start:=2, Length:=1).Font
.Name = "Webdings"
.Color = 255
End With
End Sub
[/CODE]
[/LEFT]
کامنت