Đôi khi bạn cần điều chỉnh các giá trị được lưu trữ trong các ô của trang tính. Hầu hết các lần, các công cụ do Paste Special cung cấp sẽ phù hợp với hóa đơn. Ví dụ: bạn có thể sử dụng Paste Special để nhân hoặc chia các giá trị trong một phạm vi ô, như được mô tả trong các vấn đề khác của ExcelTips.

Tuy nhiên, có một hạn chế khi sử dụng Paste Special — nó thay đổi giá trị thực tế, điều mà bạn có thể không muốn xảy ra. Tại sao? Bởi vì bốn tháng sau khi thực hiện điều chỉnh các giá trị, bạn có thể không nhớ chính xác những gì bạn đã làm hoặc giá trị bắt đầu là gì.

Vì lý do này, bạn có thể thấy muốn thay thế các giá trị bằng các công thức cho biết những gì đã được thực hiện với điều chỉnh của bạn. Ví dụ: bạn có thể có giá trị 100 trong ô B3 và bạn muốn tăng nó lên 10%. Sử dụng Paste Special, bạn có thể dễ dàng thay đổi nó thành 110, nhưng thay vào đó bạn có thể muốn thay thế giá trị bằng công thức = 100 * 1.1. Với một công thức như vậy, sẽ không có câu hỏi nào sau bốn tháng kể từ bây giờ về giá trị ban đầu hoặc bạn đã làm gì với nó.

Cách duy nhất để điều chỉnh giá trị bằng công thức là sử dụng macro, chẳng hạn như macro sau:

Sub Adjust()

Dim c As Range     Dim sMod As String

sMod = InputBox("Formula to add?")

If sMod > "" Then

For Each c In Selection             If c.HasFormula Then                 c.Formula = "=(" & Mid(c.Formula, 2) & ")" & sMod             Else                 c.Formula = "=" & c.Value & sMod             End If         Next c     End If End Sub

Để sử dụng macro này, hãy chọn các ô bạn muốn điều chỉnh, sau đó chạy macro.

Bạn được yêu cầu cung cấp công thức để thêm vào các ô. Ví dụ: nếu bạn muốn nhân các ô với 1,1, bạn sẽ nhập 1,1 (biểu tượng nhân dấu hoa thị, theo sau là 1,1). Sau đó, macro sẽ bước qua từng ô đã chọn và thực hiện các điều chỉnh. Nếu ô chứa một công thức, thì công thức được điều chỉnh như bạn đã chỉ định. Nếu ô chứa bất kỳ điều gì khác, thì ô đó sẽ được chuyển thành công thức bao gồm điều chỉnh của bạn.

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.

Mẹo này (9486) áp dụng cho Microsoft Excel 2010, 2013, 2016, 2019 và Excel trong Office 365. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện menu cũ hơn của Excel tại đây: