Copy paster công thức

[VetMini]

Trước em cũng làm với 1 Ban QL mà các bác ấy thích phong cách "can trôn móc" khi kiểm tra file, nên các loại công thức loằng ngoằng là "không vừa ý các bác", em đành phải chạy code để đặt công thức.

Công thức lằng ngoằng không chịu mà lại chịu code à? cũng lạ.

Cái này cũng khó trách họ, vì khi họ chưa hiểu công thức rồi sau biết nó hoạt động có hiệu quả hay không hay công thức vô tình trúng rùa một vài trường hợp thôi. Họ là xếp thì được quyền chon theo cách vận hành thế nào thôi, còn nếu mình có cách diễn giải tốt để cho họ chấp nhận mới hay.

Vấn đề không hẳn ở chỗ "hiệu quả hay không", mà vốn ở chỗ chưa chắc người phụ trách bảng tính nhìn ra chỗ sai, nếu có.
Điển hình ở đây, bài #1 đưa ví dụ sai. Tôi nhắc hai lượt mà thớt làm ngơ.
Làm việc như vậy rồi than phiền KS Chất Lượng chúng hạch sách. Nhiệm vụ của họ mà. Chỗ sai ai chịu trách nhiệm?

 

[giaiphap]

Code sử lý cho links hoạt động sau khi copy valuer dc ko ạ

Thử cái code vui này xem có được không nhé!

Const Vung As String = "N9:N58"

Public Sub ChenCongThuc()
    Dim Rng As Range, aCell As Range, i As Integer
    
    With Sheet1
        On Error Resume Next
        .Range(Vung).SpecialCells(xlCellTypeFormulas, 5).ClearContents
        Err.Clear
        On Error GoTo Nghi_Cho_Khoe
        Set Rng = .Range(Vung).SpecialCells(xlCellTypeBlanks)
        i = 0
        For Each aCell In Rng
            If aCell.Offset(-1, -4).Value <> "" Then
                i = 1
            Else
                i = i + 1
            End If
            aCell.FormulaR1C1 = "=R[" & -i & "]C[-4]*RC[-8]"
        Next aCell
    End With
Nghi_Cho_Khoe:
End Sub

Bài đã được tự động gộp: 26/7/23

Điển hình ở đây, bài #1 đưa ví dụ sai. Tôi nhắc hai lượt mà thớt làm ngơ.
Làm việc như vậy rồi than phiền KS Chất Lượng chúng hạch sách. Nhiệm vụ của họ mà. Chỗ sai ai chịu trách nhiệm?

Cái vụ ví dụ sai em cũng thấy ngay từ đâu, nhưng nghỉ chủ thớt không cẩn thận. Tính viết code sai một vài chổ cho chủ thớt kiểm tra cho cẩn thận hơn.

 

[vu_tuan_manh_linh]

Công thức lằng ngoằng không chịu mà lại chịu code à? cũng lạ.

Bác hiểu nhầm ý em ạ! Ý em là thay vì dùng công thức loằng ngoằng thì em dùng công thức đơn giản nhất, trực tiếp, cơ mà đặt bằng ấy công thức thì nó mất thời gian nên em dùng code để đặt cho nhanh!! Chỉ là thay thế thao tác thôi ạ!

 

[VetMini]

Bác hiểu nhầm ý em ạ! Ý em là thay vì dùng công thức loằng ngoằng thì em dùng công thức đơn giản nhất, trực tiếp, cơ mà đặt bằng ấy công thức thì nó mất thời gian nên em dùng code để đặt cho nhanh!! Chỉ là thay thế thao tác thôi ạ!

Không, tôi nói địa vị của sếp đấy chứ. Đối với sếp, VBA nguy hiểm hơn công thức lằng ngoằng

 

[vu_tuan_manh_linh]

Code sử lý cho links hoạt động sau khi copy valuer dc ko ạ

Dùng code để đặt công thức đi bạn!! Kiểu như Cells(i,11).formula="=".......

 

[vova2209]

Bác hiểu nhầm ý em ạ! Ý em là thay vì dùng công thức loằng ngoằng thì em dùng công thức đơn giản nhất, trực tiếp, cơ mà đặt bằng ấy công thức thì nó mất thời gian nên em dùng code để đặt cho nhanh!! Chỉ là thay thế thao tác thôi ạ!

ý bạn này là đưa code để sử lý ra thành phép tính thành hàm excel ý, chứ không phải dùng code sử lý phép tính thành số valure

 

[vu_tuan_manh_linh]

ý bạn này là đưa code để sử lý ra thành phép tính thành hàm excel ý, chứ không phải dùng code sử lý phép tính thành số valure

Đúng rồi bạn! Cho nó 1 vòng for next, tìm các điều kiện để ra tham số cho chỉ số hàng của các ô, đặt công thức trực tiếp luôn. Lưu ý là dùng đoạn code chuyển chế độ tính toán về manual và tắt chế độ screen upadate