Cần hỗ trợ tạo nút định dạng một cell nhập vào

[DNM]

Em chào các anh chị,
Em cần tạo 1 nút bấm để đổi font chữ sang màu Trắng của một cell bất kì được nhập vào A1.
Ví dụ: Cần đổi font chữ ở ô G7 sang màu trắng thì em nhập vào ô A1 là: g7
Sau đó bấm nút thì ô g7 font chữ đổi sang trắng.
Em đã tìm google rất lâu mà không thể ra.
Em cảm ơn các anh chị!

 

[HeSanbi]

Bạn copy đoạn code sau vào Code của Worksheets và lưu file thành .xlsb hoặc xlsm để thực hiện điều bạn muốn.

Private RecentA1Value As String
Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = [a1].Address Then
    If Ucase$(RecentA1Value) <> Ucase$([a1].Address) Then
      On Error Resume Next
      Range([a1].Value).Font.Color = vbWhite
    End If
  End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Address = [a1].Address Then
    RecentA1Value = [a1].Value
  End If
End Sub

 

[DNM]

Bạn copy đoạn code sau vào Code của Worksheets và lưu file thành .xlsb hoặc xlsm để thực hiện điều bạn muốn.

Private RecentA1Value As String
Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = [a1].Address Then
    If Ucase$(RecentA1Value) <> Ucase$([a1].Address) Then
      On Error Resume Next
      Range([a1].Value).Font.Color = vbWhite
    End If
  End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Address = [a1].Address Then
    RecentA1Value = [a1].Value
  End If
End Sub

Cảm ơn anh,
Nhưng em không biết chạy code đó thế nào. Em muốn gán vào một nút bấm, mà khi bấm nó mới thực thi.

Bài đã được tự động gộp: 22/1/19

Nếu được nhờ các anh chị thực hiện giúp em như sau ạ:
1) Tạo 1 Nút bấm để khi bấm thì lấy địa chỉ của ô được ghi trong ô A1 đế: (1) ĐỔi font chữ sang màu trắng. (2) Đổi màu nền của ô đó sang vàng chanh.
2) Tạo 1 nút khác để Undo lại hành động trên (đổi lại mặc định là nền trắng chữ đen)
FILE MẪU ĐÍNH KÈM
Em cảm ơn ạ

 

[HeSanbi]

Màu trắng trong nền màu vàng sao thấy chữ. Ý tưởng lạ

Nhưng không sao cứ tải file dưới về dùng.

 

[DNM]

Màu trắng trong nền màu vàng sao thấy chữ. Ý tưởng lạ

Nhưng không sao cứ tải file dưới về dùng.

Dạ em cảm ơn anh. E chỉ muốn đánh dấu ô đã đổi thôi ạ. Ko cần nhìn rõ chữ.

Bài đã được tự động gộp: 22/1/19

Màu trắng trong nền màu vàng sao thấy chữ. Ý tưởng lạ

Nhưng không sao cứ tải file dưới về dùng.

file của anh pro quá. Cho chọn màu luôn