Excel - Gán Macro cho tất cả các ô được tô sáng màu vàng

Vấn đề

Xin chào, tôi hiện đang ở trong một dưa chua ... Tôi hy vọng tất cả các bậc thầy có thể giúp một tay cho VBA này ...

Ngay bây giờ tôi đã viết một macro để sao chép tất cả các công thức mà không giữ lại giá trị trên các ô đang hoạt động và tôi muốn áp dụng macro này cho tất cả các ô màu vàng được tô sáng màu vàng trong bảng tính .... Làm thế nào để làm điều đó ???

mã hiện tại của tôi chỉ là

(Tôi vẫn không thể nghĩ nên làm gì để chỉ tạo các ô được tô sáng màu vàng để chứa macro này)

 Sub Copy_Form Formula_Only () Dim row As Single row = ActiveCell.row Selection.EntireRow.Insert Rows (row - 1) .Copy Rows (row) .Select On Error Resume Next Selection.Paste Special Paste: = xlPasteForm Formula ClearContents On Error GoTo 0 Application.CutCopyMode = false End Sub

Dung dịch

Nó sẽ được kích hoạt, khi bạn chọn phạm vi ô. Nhưng tôi đoán bạn biết rõ hơn những gì bạn cần làm.

 Ứng dụng phụ riêng tư_SelectionChange (ByVal Target As Range) Application.EnableEvents = false 'If Target.Address = "ALL THE YELLOW CELL IN THE WORKSHEET row = ActiveCell.row Selection.EntireRow.Insert Rows (row - 1) .Copy Rows (row) .Select On Error Resume Next Selection.Paste Special Paste: = xlPasteForm Formula Selection.ecialCells (xlCellTypeConstants) GoTo 0 Kết thúc nếu ứng dụng tiếp theo.CutCopyMode = Sai Kết thúc phụ