dimanche 30 juillet 2017

if function not working VBA

If (Year(n) - Year(d) >= 1) Then
    MsgBox "Latest Fiscal Year Data is" & dd & "Days," & md & "Months," & yd & "Years Old"
    Sheets("" & Filename).Cells(5, y2).Font.Italic = True
    Sheets("" & Filename).Cells(5, y2).Font.Color = RGB(0, 0, 255)
    Sheets("" & Filename).Cells(5, y2).Font.Bold = True
    Sheets("" & Filename).Cells(5, y2).Font.FontStyle = Arial

End If

Text Color turns to blue but other commands like italic bold are not executed

Aucun commentaire:

Enregistrer un commentaire