Trích số mong muốn trong một đoạn text

[nam2806]

Nhờ ACE trích lấy một số trong đoạn text như file đính kèm.

 

[thanh_tks]

Nhờ ACE trích lấy một số trong đoạn text như file đính kèm.

Bạn xem file đính kèm có đúng không ?!

 

[bamemay]

Tuyệt. Nhưng còn cách nào ngắn gọn hơn thế không xin chỉ giáo cho em. Thanks

 

[nam2806]

Cám ơn thanh_tks.! Đúng ý mình rồi.

 

[thanh_tks]

Tuyệt. Nhưng còn cách nào ngắn gọn hơn thế không xin chỉ giáo cho em. Thanks

Bạn muốn cách ngắn gọn hơn thì cứ tìm những thành viên nào có nhiều sao không xoay màu vàng hỏi thì có lẽ được như ý ngay!

 

[dat_butmuc]

Nhờ ACE trích lấy một số trong đoạn text như file đính kèm.

Góp vui một cách nữa:
Bạn dùng công thức này tại Ô B2:

=1*TRIM(RIGHT(SUBSTITUTE(LEFT(A2,FIND("200",A2)-2)," ",REPT(" ",20)),20))

sau đó fill xuống dưới,

 

[concogia]

Nhờ ACE trích lấy một số trong đoạn text như file đính kèm.

Xin góp một hàm tự tạo
Không biết nếu trước số 200 mà là một chuỗi thì có lấy chuỗi đó không, để khoảng trắng hay thông báo chi chi
Trong bài, hàm cho kết quả " khong phai so" nếu trước 200 là chuỗi

 

[chucuoi92]

Góp vui một cách nữa:
Bạn dùng công thức này tại Ô B2:

=1*TRIM(RIGHT(SUBSTITUTE(LEFT(A2,FIND("200",A2)-2)," ",REPT(" ",20)),20))

sau đó fill xuống dưới,

Cái hàm này vẫn chưa khử lỗi khi trước số 200 không phải là số!

 

[dat_butmuc]

Cái hàm này vẫn chưa khử lỗi khi trước số 200 không phải là số!

Thiết nghĩ, với trình độ như bạn mà phải băn khoăn chuyện đó, hoặc là bỏ 1* hoặc là dùng bẫy lỗi là được thôi mà.
Tôi chỉ quan tâm đên yêu cầu của tác giả

Trích số mong muốn trong một đoạn text

Nhờ ACE trích lấy một số trong đoạn text như file đính kèm. ​

​

 

[chucuoi92]

Thiết nghĩ, với trình độ như bạn mà phải băn khoăn chuyện đó, hoặc là bỏ 1* hoặc là dùng bẫy lỗi là được thôi mà.
Tôi chỉ quan tâm đên yêu cầu của tác giả [/INDENT]

Bạn nói rằng là chỉ quan tâm đến yêu cầu của tác giả ?!
Nhưng khi bạn làm công thức thì có thế đâu?!
Dòng đầu tiên bạn bỏ qua
Mình đủ khả năng để làm tiếp, nhưng thiết nghĩ nếu như đã làm thì làm cho trót ai lại bỏ lửng như vậy!

 

[ndu96081631]

Xin góp một hàm tự tạo
Không biết nếu trước số 200 mà là một chuỗi thì có lấy chuỗi đó không, để khoảng trắng hay thông báo chi chi
Trong bài, hàm cho kết quả " khong phai so" nếu trước 200 là chuỗi

Dùng Split cũng hay, nhưng em nghĩ anh cố gắng áp dụng thuật toán của bài 6 vào UDF, như vậy anh sẽ không cần vòng lập
Ngoài ra UDF phải có thêm 1 tham số nữa mới hợp lý, chẳng hạn:

Function GetNum(Text As String, Sign As String)
  Dim Temp As String
  Temp = Left(Text, InStr(Text, Sign) - 1)
  Temp = Trim(Replace(Temp, " ", String(Len(Text), " ")))
  Temp = Trim(Right(Temp, Len(Text)))
  GetNum = Val(Temp)
End Function

Với file trên thì hàm sẽ được gõ vào như sau:
=GetNum($A2," 200")
Cell A1 không có số cần tìm sẽ trả về giá trị = 0 ---> Nếu muốn giá trị khác thì cứ IF ÉC gì đó

 

[Lê Duy Thương]

hàm của anh đat_butmuc chỉ cần dùng bẫy lỗi và thêm hàm value là ok
=IF(ISERROR(VALUE(TRIM(RIGHT(SUBSTITUTE(LEFT(A2,FIND("200",A2)-2)," ",REPT(" ",20)),20))))=TRUE,0,VALUE(TRIM(RIGHT(SUBSTITUTE(LEFT(A2,FIND("200",A2)-2)," ",REPT(" ",20)),20))))

 

[ndu96081631]

Thấy anh concogia dùng Split, em chợt nghĩ ra 1 cách, cũng dùng Spilt nhưng theo thuật toán khác:

Function GetNum(Text As String, Sign As String)
  Dim Temp
  On Error Resume Next
  With WorksheetFunction
    Temp = Split(.Trim(Text), " ")
    GetNum = Val(Temp(.Match(Sign, Temp, 0) - 2))
  End With
End Function

Thuật toán:
- Dùng Split để biến chuổi thành mảng
- Dùng hàm MATCH xác định vị trí của từ khóa
- Với vị trí tìm được, ta xác định số cần tìm chính là phần tử nằm tại vị trí cạnh bên (về phía bên trái)
Phương pháp này xem ra khá chính xác đây!

 

[dat_butmuc]

hàm của anh đat_butmuc chỉ cần dùng bẫy lỗi và thêm hàm value là ok
=IF(ISERROR(VALUE(TRIM(RIGHT(SUBSTITUTE(LEFT(A2,FIND("200",A2)-2)," ",REPT(" ",20)),20))))=TRUE,0,VALUE(TRIM(RIGHT(SUBSTITUTE(LEFT(A2,FIND("200",A2)-2)," ",REPT(" ",20)),20))))

Làm như bạn Le duy Thuong cũng bẫy lỗi rồi, nhưng có thể ngắn hơn một chút:

=IF(ISERROR(1*(TRIM(RIGHT(SUBSTITUTE(LEFT(A2,FIND("200",A2)-2)," ",REPT(" ",20)),20)))),0,1*(TRIM(RIGHT(SUBSTITUTE(LEFT(A2,FIND("200",A2)-2)," ",REPT(" ",20)),20))))

Hoặc ngắn hơn chút nữa:

=IF(ISERROR(--(MID(A2,FIND("200",A2)-2,1))),0,--TRIM(RIGHT(SUBSTITUTE(LEFT(A2,FIND("200",A2)-2)," ",REPT(" ",20)),20)))

 

[myquyen06]

IF(ISERROR(LOC),"",LOC)
Tuyệt thật, nhưng mình ko hiểu value "LOC" ở đâu (do mình tự đặt hay có sẵn?

 

[dat_butmuc]

IF(ISERROR(LOC),"",LOC)
Tuyệt thật, nhưng mình ko hiểu value "LOC" ở đâu (do mình tự đặt hay có sẵn?

=> Là do mình tự đặt cho một mảng, hàm, tổ hợp hàm hay công thức gì gì đó ...
Bạn muốn biết "LOC" thì nhấn tổ hợp phím Ctrl+F3, và nó ở đây là:

=MID(Sheet2!$A2,MAX(IF(TAC>=FIND("200",Sheet2!$A2,1),"",TAC)),FIND("200",Sheet2!$A2,1)-MAX(IF(TAC>=FIND("200",Sheet2!$A2,1),"",TAC)))*1

Trong đó có "TAC", là:

=IF(MID(" "&Sheet2!$A2,ROW(INDIRECT("1:"&LEN(1&Sheet2!$A2))),1)=" ",ROW(INDIRECT("1:"&LEN(1&Sheet2!$A2))),"")

Đó là công cụ trong Insert -> Name Define

 

[thanh_tks]

IF(ISERROR(LOC),"",LOC)
Tuyệt thật, nhưng mình ko hiểu value "LOC" ở đâu (do mình tự đặt hay có sẵn?

Không tuyệt như bạn nghĩ đâu!
"LOC" là name đó, bạn nhấn Ctrl +F3 để xem name
Mấy bài sau còn hay hơn đó
Nhất là cái hàm tự tạo của anh Ndu đấy!

 

[phamtranhue_vn]

xin hãy trả lời một vài trong rất nhiều thác mắc giúp tôi! thanks

Tôi là thành viên mới, tôi rất thích excel nhưng lại hiểu biết rất ít, vì vậy tôi vào đay mong đuợc các bạn nhiệt tình giúp đỡ!Tôi không tìm ra mục gởi bài viết mới ở đâu? Khi tôi kích vào tập tin đính kèm và save vào máy nhưng sau đó không mở được ( khi mở ngay cũng không mở được ),hay khi tôi nhấn down các bài excel về máy, biểu tượng xuất hiện trrong máynhưng sau đó phải làm gì để mở được?