Nhờ hướng dẫn hàm IF theo điều kiện in đậm

  • Thread starter Thread starter demsao2
  • Ngày gửi Ngày gửi
Liên hệ QC
Tôi tuân thủ nội quy khi đăng bài

demsao2

Thành viên mới
Tham gia
1/11/11
Bài viết
13
Được thích
0
Dạ cho em hỏi có hàm nàm giải quyết điều kiện là in đậm không ạ.
Em có 4 cột A,B,C,D, E . Ra điều kiện ở cột E=nếu dữ liệu ở cột A là in đậm thì lấy dữ liệu ở cột A, nếu dữ liệu ở cột B là in đậm thì lấy cột B, nếu dữ liệu ở cột C là in đậm thì lấy cột C, ngược lại là cột D
Bài đã được tự động gộp:

Dạ cho em hỏi có hàm nà0 giải quyết điều kiện là in đậm không ạ.
Em có 4 cột A,B,C,D, E . Ra điều kiện ở cột E=nếu dữ liệu ở cột A là in đậm thì lấy dữ liệu ở cột A, nếu dữ liệu ở cột B là in đậm thì lấy cột B, nếu dữ liệu ở cột C là in đậm thì lấy cột C, ngược lại là cột D
 

File đính kèm

Có 1 hàm gọi là hàm:
=dapan(vung chua dap an)

VD:
Tại F2:
=dapan(B2:E2)
Nếu có 1 ô in đậm tại đáp án A thì trả về A
Nếu không có ô in đậm nào thì trả về "Chua có dap an, kiem tra lai"
Nếu có từ 2 đáp án trở lên thì trả về "Có nhieu hon 1 dap an, kiem tra lai"

Cách dùng:
Atl-F11, insert/module, copy code này vào. Save as file as .xlsm
Mã:
Option Explicit
Function dapan(ByVal rng As Range)
Dim cell As Range, c&
For Each cell In rng
    If cell.Font.Bold Then
        dapan = Cells(1, cell.Column).Value
        c = c + 1
    End If
Next
Select Case c
    Case 0
        dapan = "Chua co dap an, kiem tra lai!"
    Case 1
        Exit Function
    Case 2
        dapan = "Co nhieu hon 1 dap an, kiem tra lai!"
End Select
End Function
Capture.JPG
 

File đính kèm

Có 1 hàm gọi là hàm:
=dapan(vung chua dap an)

VD:
Tại F2:
=dapan(B2:E2)
Nếu có 1 ô in đậm tại đáp án A thì trả về A
Nếu không có ô in đậm nào thì trả về "Chua có dap an, kiem tra lai"
Nếu có từ 2 đáp án trở lên thì trả về "Có nhieu hon 1 dap an, kiem tra lai"

Cách dùng:
Atl-F11, insert/module, copy code này vào. Save as file as .xlsm
Mã:
Option Explicit
Function dapan(ByVal rng As Range)
Dim cell As Range, c&
For Each cell In rng
    If cell.Font.Bold Then
        dapan = Cells(1, cell.Column).Value
        c = c + 1
    End If
Next
Select Case c
    Case 0
        dapan = "Chua co dap an, kiem tra lai!"
    Case 1
        Exit Function
    Case 2
        dapan = "Co nhieu hon 1 dap an, kiem tra lai!"
End Select
End Function
View attachment 293083

Dạ cho em hỏi có hàm nàm giải quyết điều kiện là in đậm không ạ.
Em có 4 cột A,B,C,D, E . Ra điều kiện ở cột E=nếu dữ liệu ở cột A là in đậm thì lấy dữ liệu ở cột A, nếu dữ liệu ở cột B là in đậm thì lấy cột B, nếu dữ liệu ở cột C là in đậm thì lấy cột C, ngược lại là cột D
Bài đã được tự động gộp:
Dạ A cho em hỏi có cách nào lấy định dạng in đậm lên không. VD file của em có cột A dòng a3 là in đậm
ở cột B3 em làm công thức =A3 NHƯNG nó chỉ lấy giá đị của cột A3 CÒN cột A3 in đậm nó không in đậm ở cộ B3
 

File đính kèm

Sau khi copy,
Chọn ô cần dán: gõ tuần tự các phím sau:
Alt,h,v,e
Xong
 
Web KT

Bài viết mới nhất

Back
Top Bottom