Cách tạo chữ nhấp nháy trên Excel

Với những người làm việc chuyên nghiệp với Excel, ngoài các hàm Excel nâng lên thì còn dùng tới VBA, ngôn ngữ lập trình trên Excel. VBA trên Excel là viết tắt của Visual Basic for Application. Chúng ta sử dụng ngôn ngữ lập trình VBA để viết macro. Macro là các chương trình hoàn tất thực hiện tự động các lệnh mà bạn đã viết ra. Và nếu bạn mong muốn tạo hiệu ứng chữ nhấp nháy trên Excel thì càng phải sử dụng tới VBA này.

Với hiệu ứng này chúng ta cũng đều có thể làm nổi bật nội dung nào đó trong bảng dữ liệu trên Excel tới người đọc. Đặc biệt, người sử dụng có thể thay đổi màu chữ nhấp nháy thông qua đoạn mã code. Bài viết dưới đây sẽ chỉ dẫn độc giả cách tạo chữ nhấp nháy trên Excel.

• Cách phá mật khẩu VBA trong Excel
• Cách gửi email từ bảng tính Excel bằng tập lệnh VBA
• 10 cách phục hồi tập tin Excel bị lỗi
• Quên mật khẩu bảo vệ của file Excel, bạn cần làm gì?

Hướng dẫn tạo chữ nhấp nháy trên Excel

Bước 1:

Bạn mở file Excel rồi nhấn tổ hợp phím Alt + F11 để mở trình code VBA của Excel lên.

Tại giao diện hộp thoại Microsoft Visual Basic for Applications người sử dụng bấm vào Insert rồi chọn Module như hình bên dưới.

Bước 2:

Hiển thị giao diện Moude để bạn dán mã code bên dưới vào giao diện.

 Sub StartBlink() 
 Dim xCell As Range 
 Dim xTime As Variant 
 Set xCell = Range("A1") 
 With ThisWorkbook.Worksheets("Sheet1").Range("A1").Font 
 If xCell.Font.Color = vbRed Then 
 xCell.Font.Color = vbWhite 
 Else 
 xCell.Font.Color = vbRed 
 End If 
 End With 
 xTime = Now + TimeSerial(0, 0, 1) 
 Application.OnTime xTime, "'" & ThisWorkbook.Name & "'!StartBlink", , True 
 End Sub 

Lưu ý bạn nên copy đoạn mã code trên vào Notepad rồi triển khai chỉnh sửa lại Vị trí của ô và Sheet làm việc chính là vị trí của dòng chữ mà bạn mong muốn tạo hiệu ứng nhập nháy. Trong hình chữ được viết tại ô A1 và ở Sheet 1. Người dùng có thể nhập bất kỳ ô và Sheet nào mà mình muốn.

Nhấn Alt + Q để tắt hộp thoại.

Bước 3:

Tại đúng vị trí ô và Sheet trong khúc mã mà bạn đã lập, nhập nội dung muốn tạo hiệu ứng lấp láy trên Excel.

Nhấn tiếp vào tab Developer rồi chọn mục Insert bên dưới và click vào biểu trưng Button (Form control) .

Bước 4:

Kẻ một ô vuông bất kỳ trong giao diện Excel để làm nút kích hoạt hiệu ứng nhấp nháy cho chữ.

Ngay khi thả chuột sẽ hiển thị giao diện hộp thoại Assign Macro. Tại đây người dùng sẽ cần chọn lựa 2 mục gồm:

• Macro name: Bạn chọn StartBlink.
• Macros in: Nhấn chọn vào This Worknook trong danh sách.

Nhấn OK để đọng lại thiết lập.

Bước 5:

Để thay đổi nội dung chữ trong khung mới kẻ, nhấp chuột phải rồi chọn Edit Text .

Nhập bất kỳ nội dung nào mà bạn muốn vào trong khung này và nhấn Enter để lưu lại. Nếu muốn người dùng vẫn cũng có thể thay đổi font chữ, kích cỡ chữ cho nút Button này nhé.

Kết quả cuối cùng khi nhấn vào nút đó thì dòng chữ sẽ tự động lấp láy theo màu sắc mà chúng ta đã thiết lập trong mã code, ở này là màu đỏ và màu trắng.

Trong tình huống muốn chữ lấp láy từ màu xanh sang màu đỏ, click vào tab Developer và chọn Visual Basic .

Tiếp đến thay đổi từ màu trắng (White) sang màu xanh (Blue) trong khúc code như hình dưới đây. Cũng nhấn Alt + Q để lưu lại đoạn mã code mới này.

Kết quả chữ sẽ nhấp nháy từ màu đỏ sang màu xanh.

Thông qua VBA trên Excel, bạn đã có thêm cách tạo nổi bật cho nội dung trong dữ liệu với hiệu ứng lấp láy tự động. Lưu ý chúng ta cần nhập đúng đoạn mã code, đặc biệt các dấu ngoặc trong đoạn mã, tránh báo lỗi sau khi áp dụng mã code.

Video tạo chữ lấp láy tự động trên Excel

Chúc các bạn thực hiện thành công!

VBA trên Excel,cách dùng VBA trên Excel,cách kích hoạt VBA Excel,tạo chữ nhấp nháy excel,cách tạo hiệu ứng nhấp nháy chữ excel,tạo hiệu ứng đổi màu chữ excel,tạo hiệu ứng nhấp nháy Excel

Nội dung Cách tạo chữ nhấp nháy trên Excel được tổng hợp sưu tầm biên tập bởi: Tin Học Trường Tín. Mọi ý kiến vui lòng gửi Liên Hệ cho truongtin.top để điều chỉnh. truongtin.top tks.