Xin giúp đỡ em về hàm hoặc lệnh VBA trong trường hợp này

Liên hệ QC
Cám ơn bạn rất nhiều. Excell mình chỉ biết mấy hàm cơ bản hồi học tin học cơ bản thôi, chứ không biết gì về vba cả. Một lần nữa không biết gì hơn cám ơn bạn!
Chúc bạn gặp nhiều thành công trong cuộc sống
Thế là may mắn rồi, nhiều người ở đây còn không được học Excel ở Tin học cơ bản (tại trường lớp)
 
Thế là may mắn rồi, nhiều người ở đây còn không được học Excel ở Tin học cơ bản (tại trường lớp)
Bạn ơi chỉnh giúp mình được không!
Khi mình dùng hàm =VLOOKUP($S$11;Nguồn!B3:Z11;25;0) ở ô S24 để ra số điểm hiển thị thì VBA không chạy nữa, nhưng khi gõ số vào ô S24 thì VBA mới chạy
 
Bạn ơi chỉnh giúp mình được không!
Khi mình dùng hàm =VLOOKUP($S$11;Nguồn!B3:Z11;25;0) ở ô S24 để ra số điểm hiển thị thì VBA không chạy nữa, nhưng khi gõ số vào ô S24 thì VBA mới chạy
Nháy phải (right click) trên sheetTab tên là 1 --> chọn view code, rồi thay toàn bộ sub cũ bằng sub sau
Mã:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$S$11" Then
        On Error GoTo 1
        Application.EnableEvents = False
        With Range("B26:E35")
            .UnMerge
           .Borders(xlInsideHorizontal).LineStyle = 1
           .WrapText = True
           Dim n As Long
           n = Range("S24").Value
           If n > .Rows.Count Then n = .Rows.Count
           .Resize(n).Merge
        End With
1:
        Application.EnableEvents = True
    End If
End Sub
Lưu ý code lần này là nếu chỉ S11 thay đổi thì code trên mới chạy, trái lại thì không chạy nhé
Và nếu bạn còn thay đổi câu hỏi nữa thì nên mở topic mới, vì không thể chút lại thêm, thì vấn đề rẽ sang hướng khác
 
Lần chỉnh sửa cuối:
Web KT
Back
Top Bottom