Application.Wait (Now + TimeValue("00:00:00001"))
Cells(5, 5).Interior.Color = xlNone
Â
Cells(7, 5).Interior.Color = vbGreen
Application.Wait (Now + TimeValue("00:00:00001"))
Cells(7, 5).Interior.Color = xlNone
Â
Â
Cells(3, 5).Interior.Color = vbRed
Application.Wait (Now + TimeValue("00:00:00001"))
Cells(3, 5).Interior.Color = xlNone
Beri Komentar
Belum ada komentar. Jadilah yang pertama untuk memberikan komentar!