با سلام

با کد زیر می تونید در صورتی که از سیستم باتن (SystemButton) در Ribbon استفاده کردید و می خواهید آیکن انو به صورت چشمک زن در بیارید (فقط آیکن مورد نظرتون رو باید در ImageList از قبل داشته باشید)

یک کنترل تایمر بر روی فرم قرار داده خاصیت Timer.Interval=2000 یا به دلخواه خودتون تغییر بدید و کدهای زیر را اضافه کنید:

Private Sub Timer1_Timer()

  Dim ControlFile As CommandBarPopup

    

    Set ControlFile = RibbonBar.AddSystemButton()

    If Timer1.Tag = "" Then

        ControlFile.IconId = 1

        Timer1.Tag = "1"

    Else

        ControlFile.IconId = 2

        Timer1.Tag = ""

    End If



End Sub