Cần giúp xóa phần đóng mở ngoặc (...) bên phải ngoài cùng trong ô cell (1 người xem)

[hung2412]

Chào các bạn GPE!
Nhờ các bạn giúp đỡ cho tôi vấn đề này với, cụ thể như sau:
Xóa phần đóng mở ngoặc (...) bên phải ngoài cùng trong ô cell. Phần đóng mở ngoặc (...) có độ dài ký tự không cố định. Ví dụ:
- Ô B5 có nội dung là: Chi phí vật liệu (BT) => Xóa (BT) => Ô B5 có nội dung mới là Chi phí vật liệu.
- Ô B8 có nội dung là: Chi phí xe ô tô con (Nhiên liệu, vé cầu đường,...) (GT) => Xóa (GT) => Ô B8 có nội dung mới là Chi phí xe ô tô con (Nhiên liệu, vé cầu đường,...).
- Ô B4 có nội dung là: Hạng mục chính => Không có phần đóng mở ngoặc (...) bên phải ngoài cùng trong ô => Ô B4 vẫn giữ nguyên.
Mong các bạn GPE chỉ giáo!
Trân trọng cảm ơn!
P/s: Có 01 File đính kèm.

 

[dhn46]

Bạn dùng công thức sau

=IF(COUNTIF(B3,"*(*"),LEFT(B3,LOOKUP(2,1/("("=MID(B3,ROW(INDIRECT("1:"&LEN(B3))),1)),ROW(INDIRECT("1:"&LEN(B3))))-1),B3)

 

[hung2412]

Bạn dùng công thức sau

=IF(COUNTIF(B3,"*(*"),LEFT(B3,LOOKUP(2,1/("("=MID(B3,ROW(INDIRECT("1:"&LEN(B3))),1)),ROW(INDIRECT("1:"&LEN(B3))))-1),B3)

Chưa đúng theo đề bài bạn ơi. Nghĩa là những ô có phần đóng mở ngoặc (...) thì bị lỗi #DIV/0!, còn những ô không có phần đóng mở ngoặc (...) thì bình thường. Bạn thử mà xem.

 

[dhn46]

Chưa đúng theo đề bài bạn ơi. Nghĩa là những ô có phần đóng mở ngoặc (...) thì bị lỗi #DIV/0!, còn những ô không có phần đóng mở ngoặc (...) thì bình thường. Bạn thử mà xem.

Tôi đã check trước khi post bài, bạn kiểm tra lại công thức tôi copy pase trong file nhé.

 

[hung2412]

Tôi đã check trước khi post bài, bạn kiểm tra lại công thức tôi copy pase trong file nhé.

Xin lỗi bạn, tôi hiểu vì sao rồi, lỗi tại tôi. Cảm ơn bạn đã giúp đỡ.

 

[Quang_Hải]

Chào các bạn GPE!
Nhờ các bạn giúp đỡ cho tôi vấn đề này với, cụ thể như sau:
Xóa phần đóng mở ngoặc (...) bên phải ngoài cùng trong ô cell. Phần đóng mở ngoặc (...) có độ dài ký tự không cố định. Ví dụ:
- Ô B5 có nội dung là: Chi phí vật liệu (BT) => Xóa (BT) => Ô B5 có nội dung mới là Chi phí vật liệu.
- Ô B8 có nội dung là: Chi phí xe ô tô con (Nhiên liệu, vé cầu đường,...) (GT) => Xóa (GT) => Ô B8 có nội dung mới là Chi phí xe ô tô con (Nhiên liệu, vé cầu đường,...).
- Ô B4 có nội dung là: Hạng mục chính => Không có phần đóng mở ngoặc (...) bên phải ngoài cùng trong ô => Ô B4 vẫn giữ nguyên.
Mong các bạn GPE chỉ giáo!
Trân trọng cảm ơn!
P/s: Có 01 File đính kèm.

Khi nào chán công thức rồi thì tới code

Function XoaBot(ByVal Cell As String) As String
Dim n As Long
n = InStrRev(Cell, "(")
If n Then XoaBot = Left(Cell, n - 2)
End Function

 

[hung2412]

Khi nào chán công thức rồi thì tới code

Function XoaBot(ByVal Cell As String) As String
Dim n As Long
n = InStrRev(Cell, "(")
If n Then XoaBot = Left(Cell, n - 2)
End Function

Cách dùng như thế nào vậy bạn ơi?

 

[Quang_Hải]

Cách dùng như thế nào vậy bạn ơi?

Chắc là vầy:

B1=XoaBot(A1)

 

[hung2412]

Bạn dùng công thức sau

=IF(COUNTIF(B3,"*(*"),LEFT(B3,LOOKUP(2,1/("("=MID(B3,ROW(INDIRECT("1:"&LEN(B3))),1)),ROW(INDIRECT("1:"&LEN(B3))))-1),B3)

Bạn ơi, công thức hay đấy, nhưng mà vẫn còn 1 đoạn trắng (Space) đằng sau cùng trong ô. Làm thế nào để xóa luôn 1 đoạn trắng đó nhỉ?

 

[hung2412]

Chắc là vầy:

B1=XoaBot(A1)

Tôi đã thử như vậy rồi mà bị lỗi "#Name?" bạn ạ.

 

[Phuocam]

Tôi đã thử như vậy rồi mà bị lỗi "#Name?" bạn ạ.

Bạn thử cái này xem sao.

 

[hung2412]

Bạn thử cái này xem sao.

Tôi đã hiểu đã hiểu tại sao bị lỗi "#Name?" rồi. Vì tôi để chung code này với các sub khác trong cùng 1 Module.

 

[hung2412]

Bạn thử cái này xem sao.

Bạn ơi, có Code nào làm như theo đề bài thực hiện trực tiếp trên cột B không nhỉ? (Nghĩa là "chèn lên" dữ liệu chính tại ô đó luôn).

 

[Phuocam]

Bạn ơi, có Code nào làm như theo đề bài thực hiện trực tiếp trên cột B không nhỉ? (Nghĩa là "chèn lên" dữ liệu chính tại ô đó luôn).

Bạn quét chọn vùng rồi chạy Sub Xoa

 

[hung2412]

Bạn quét chọn vùng rồi chạy Sub Xoa

Cảm ơn bạn, cho tôi thắc mắc tí, tại sao bạn có những 478 bài rồi mà vẫn là "Thành viên mới" nhỉ? Hay là bạn chủ động đánh thế?

 

[hung2412]

Tôi xin phép Up bài của bạn mhung12005 sang bên đây cho dễ nhìn:

G3 =TRIM(IF(COUNTIF(B3,"*(*"),LEFT(B3,LOOKUP(2,1/("("=MID(B3,ROW(INDIRECT("1:"&LEN(B3))),1)),ROW(INDIRECT("1:"&LEN(B3))))-1),B3))