Cách nhân tất cả các ô trong một phạm vi với một hằng số
Bạn có muốn đảm bảo rằng tất cả các hằng số trong một phạm vi đều được nhân với một hệ số không? Bạn có thể đạt được điều này bằng cách sử dụng khéo léo chức năng EDIT - INSERT CONTENT.
Sẽ dễ dàng hơn nếu bạn sử dụng macro sau:
Sử dụng Yếu tố phụ ()
Làm mờ ô dưới dạng phạm vi
Làm mờ giá trị đầu vào càng lâu
Giá trị đầu vào = InputBox ("Vui lòng nhập hệ số (ví dụ: 100)")
Đối với từng ô được lựa chọn
Nếu không (Cell.HasFormula) Thì
Cell.Formula = "=" & Cell.Value & "*" & Val (giá trị đầu vào)
Kết thúc nếu
Ô tiếp theo
Kết thúc Sub
Trong bước đầu tiên, hãy chọn một dải ô trong bảng. Hình sau đây cho thấy một ví dụ về một vùng được đánh dấu.
Sau đó gọi macro. Bây giờ Excel sẽ hỏi trong cửa sổ hệ số mà bạn muốn sử dụng. Hình sau cho thấy cửa sổ này:
Xác nhận định nghĩa của hệ số bằng nút OK.
Excel bây giờ quay vòng qua tất cả các ô trong vùng chọn. Chỉ những ô không có công thức mới được thay đổi. Chúng được nhân với hệ số đã nhập. Excel nhập giá trị mới dưới dạng công thức trong ô. Hình sau cho thấy kết quả có thể trông như thế nào:
Nếu bạn muốn nhập các số dưới dạng hằng số, hãy thay thế dòng "Cell.Formula" bằng biểu thức sau:
Cell.Value = Cell.Value * Val (giá trị đầu vào)
Bằng cách nhập một hệ số nhỏ hơn một, bạn cũng có thể chia các ô cho một hằng số.
Chuyển đổi công thức thành hằng số bằng macro: Cách chuyển đổi phép tính sử dụng VBA thành giá trị tuyệt đối
Bạn muốn chuyển đổi các ô của một phạm vi thành giá trị tuyệt đối. Bạn có thể làm điều này một cách tương tác bằng cách sao chép khu vực và sau đó dán nó dưới dạng các giá trị. Lệnh thích hợp được gọi là "Chỉnh sửa - Dán Đặc biệt" trong Excel phiên bản 2003 và "Bắt đầu - Dán - Dán Đặc biệt" trong Excel từ phiên bản 2007.
Nếu bạn muốn chuyển đổi các ô riêng lẻ trong macro, mã chương trình sau sẽ giúp bạn:
SubValueConvert ()
Với ActiveSheet.Range ("a1")
.Formula = .Value
Kết thúc với
Kết thúc Sub
Macro chuyển đổi nội dung hiện tại của ô A1 trong bảng hiện hoạt thành giá trị tuyệt đối.
