Sử dụng mạng Internet thường xuyên chắc hẳn bạn sẽ thường xuyên gặp các chữ nhấp nháy trên các trang web hoặc blog… Mục đích của việc tạo chữ nhấp nháy này là để làm nổi bật hơn, qua đó gây chú ý cho độc giả và người đọc đến vị trí mà bạn muốn hướng tới.
Thủ thuật tạo chữ nhấp nháy trong Excel
Cách tạo chữ nhấp nháy trong Excel
Trong bài hướng dẫn hôm nay QuanTriExcel.info chia sẻ với bạn một thủ thuật giúp bạn có thể tạo chữ nhấp nháy ngay trong bảng tính Excel, để bạn có thể làm nổi bật nội dung mà bạn muốn trình bày hoặc muốn người khác chú ý đến.
LBước 1: Bạn mở file Excel của bạn lên. Tại đây bạn nhấn tổ hợp phím Alt + F11 để mở giao diện code VBA của Excel.
Bước 2: Hộp thoại Microsoft Visual Basic for Applications hiện lên. Bạn click vào menu Insert -> rồi chọn Module như hình bên dưới.
Sau đó Copy đoạn Code phía dưới:
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 = vbBlue
Else
xCell.Font.Color = vbRed
End If
End With
xTime = Now + TimeSerial(0, 0, 1)
Application.OnTime xTim, “‘” & ThisWorkbook.Name & “‘!StartBlink”, , True
End Sub
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 = vbBlue
Else
xCell.Font.Color = vbRed
End If
End With
xTime = Now + TimeSerial(0, 0, 1)
Application.OnTime xTim, “‘” & ThisWorkbook.Name & “‘!StartBlink”, , True
End Sub
Tiếp đến, bạn dán vào cửa sổ Module, trước khi sửa các giá trị hiển thị chữ nhấp nháy tại ô giá trị, và Sheet hiện tại. Rồi nhấn Alt + Q để tắt hộp thoại.
Lưu ý: Trong code trên thì bạn cần thay thế Vị trí ô mà bạn đã nhập chữ muốn nhấp nháy và bạn đang thao tác trên Sheet nào thì bạn hãy chỉnh sửa cho chính xác nhé.
Bước 3: Bạn hãy nhập đoạn văn bản vào vị trí ô muốn nhấp nháy -> rồi click mở tab Developer -> chọn Insert và Button (Form control).
Bước 4: Sau đó, bạn kéo rê chuột tạo một Button trên file Excel. Lúc này hộp thoại Assign Macro sẽ xuất hiện. Trong phần:
– Macro name: Bạn chọn StartBlink
– Macros in: Bạn đặt là This Worknook
Thao tác này mục đích để chỉ nhấp nháy chữ ở Sheet hiện tại. Sau đó bạn nhấn OK để tạo Button.
Bước 5: Tiếp đến, bạn click chuột phải vào Button -> và chọn Edit Text.
Sau đó bạn có thể đổi tên nút Button thành tên bạn muốn và click để bật chế độ nhấp nháy.
Như vậy là chúng tôi vừa hướng dẫn bạn biết Cách tạo chữ nhấp nháy trong Excel bằng code VBA giúp bạn làm nổi bật nội dung cần nhấn mạnh trên file Excel. Bạn hãy làm đúng như hướng dẫn để cho ra kết quả rồi hãy nghĩ tới việc đổi code sau.
Chúc bạn thành công!
?DienDan.Edu.Vn cám ơn bạn đã quan tâm và rất vui vì bài viết đã đem lại thông tin hữu ích cho bạn. https://diendan.edu.vn/
?Thanks
DienDan.Edu.Vn Cám ơn bạn đã quan tâm và rất vui vì bài viết đã đem lại thông tin hữu ích cho bạn.DienDan.Edu.Vn! là một website với tiêu chí chia sẻ thông tin,... Bạn có thể nhận xét, bổ sung hay yêu cầu hướng dẫn liên quan đến bài viết. Vậy nên đề nghị các bạn cũng không quảng cáo trong comment này ngoại trừ trong chính phần tên của bạn.Cám ơn.
