Excel - แมโครเพื่อทำให้เซลล์กะพริบ

ปัญหา

ฉันต้องการทำให้เซลล์กระพริบภายใต้ Excel นี่เป็นมาโครหรือวิธีที่ง่ายกว่าได้ไหม

สารละลาย

-1 เลือกเซลล์

-2 เลือกสไตล์จากเมนูรูปแบบ

-3 ในกล่องโต้ตอบสไตล์ให้ป้อนชื่อสไตล์ใหม่เช่น 'กะพริบ'

-4 ใช้การควบคุมในกล่องโต้ตอบเปลี่ยนลักษณะของสไตล์

-5 คลิกที่ตกลง

สไตล์นี้สามารถใช้ได้กับเซลล์ที่คุณเลือก

ตอนนี้คุณต้องสร้างมาโคร:

 Dim NextTime เป็น Date Sub StartFlash () NextTime = ทันที + TimeValue ("00:00:01") ด้วย ActiveWorkbook.Styles ("Flashing"). Font ถ้า. ColorIndex = xlAutomatic แล้ว. ColorIndex = 3 - ColorColorIndex จบด้วยแอปพลิเคชั่นบน TimeTimeTime, "StartFlash" End Sub

-------------------------------------------------- ----------------------

 Sub StopFlash () แอปพลิเคชันบน TimeTime ถัดไป, "StartFlash", กำหนดการ: = False ActiveWorkbook.Styles ("Flashing"). Font.ColorIndex = xlAutomatic Sub Sub