Định dạng lại trong number thành định dạng thực

[keke355992]

Yêu cầu của e ghi rõ trong file ạ, xin cảm ơn các bác a

 

[ndu96081631]

Yêu cầu của e ghi rõ trong file ạ, xin cảm ơn các bác a

Hổng có công thức làm được điều này đâu bạn à (nếu chỉ có 1 kiểu định dạng duy nhất thì còn có thể)
Giải quyết bài này, ta dùng VBA nhé:

Function GetTextFormat(ByVal rCel As Range) As String
  GetTextFormat = rCel.Text
End Function

Copy code trên cho vào 1 Module, ra bảng tính, gõ công thức =GetTextFormat(C4) rồi kéo fill xuống

 

[huuthang_bd]

Yêu cầu của e ghi rõ trong file ạ, xin cảm ơn các bác a

Chọn ô F4 (hoặc 1 ô bất kỳ trên dòng 4)
Đặt một name như sau:

Name=GET.CELL(53,Sheet1!$C4)

Nhập công thức sau vào ô F4 rồi copy xuống:

=Name

 

[VetMini]

Đúng ra thì có cách dùng hàm TEXT() để thực hiện nhưng tôi không hiểu tại sao khi gặp ký tự "B" và "M" thì hàm này bị lỗi. Vì điều kiện bài này quá đặc thù, 100 năm mới gặp một lần nên tôi không muốn phí thời giờ tìm hiểu thêm. Dùng code cho xong việc.

' hàm nhỏ xíu, không cần phải dim điếc mất công
Sub Rubbish()
For Each c In [C4:C13]
' mỗi ô trong cột C, lấy ký tự format, cộng vào trị cột E, và ghi kết quả vào cột F
c.Offset(0, 3).Value = Replace(Replace(CStr(c.NumberFormat), "0", ""), """", "") _
                        & CStr(c.Offset(0, 2).Value)
Next
End Sub

 

[ndu96081631]

Đúng ra thì có cách dùng hàm TEXT() để thực hiện nhưng tôi không hiểu tại sao khi gặp ký tự "B" và "M" thì hàm này bị lỗi. Vì điều kiện bài này quá đặc thù, 100 năm mới gặp một lần nên tôi không muốn phí thời giờ tìm hiểu thêm. Dùng code cho xong việc.

' hàm nhỏ xíu, không cần phải dim điếc mất công
Sub Rubbish()
For Each c In [C4:C13]
' mỗi ô trong cột C, lấy ký tự format, cộng vào trị cột E, và ghi kết quả vào cột F
[COLOR=#ff0000][B]c.Offset(0, 3).Value = Replace(Replace(CStr(c.NumberFormat), "0", ""), """", "") _
                        & CStr(c.Offset(0, 2).Value)[/B][/COLOR]
Next
End Sub

Vậy sao bạn không ghi vầy cho khỏe: c.Offset(0, 3).Value = c.Text

 

[VetMini]

Ờ nhỉ, mãi nghĩ đến cái format, quên mất
(Lúc tôi viết bài trên thì bài của các bác chưa đưa lên)

 

[keke355992]

Chọn ô F4 (hoặc 1 ô bất kỳ trên dòng 4)
Đặt một name như sau:

Name=GET.CELL(53,Sheet1!$C4)

Nhập công thức sau vào ô F4 rồi copy xuống:

=Name

Oh cái GET.CELL này thú vị quá, bác có thể cho e xin hướng dẫn sử dụng Name này đc ko

 

[huuthang_bd]

Oh cái GET.CELL này thú vị quá, bác có thể cho e xin hướng dẫn sử dụng Name này đc ko

Tôi hướng dẫn rõ ràng rồi mà. Bạn đặt name theo công thức đó rồi trên sheet dùng công thức = tên name đó thôi.

 

[keke355992]

Tôi hướng dẫn rõ ràng rồi mà. Bạn đặt name theo công thức đó rồi trên sheet dùng công thức = tên name đó thôi.

Ah cái đó mình hiểu rùi, ý mình là bạn có 1 bài hưỡng dẫn chi tiết các thông số của NAME này ko, mình thấy nó hay quá, mà search trên mạng thì k có, toàn trang nước ngoài, k dịch đc

 

[ndu96081631]

Ah cái đó mình hiểu rùi, ý mình là bạn có 1 bài hưỡng dẫn chi tiết các thông số của NAME này ko, mình thấy nó hay quá, mà search trên mạng thì k có, toàn trang nước ngoài, k dịch đc

Đó là các hàm macro 4. Download tài liệu tham khảo:
http://www.giaiphapexcel.com/forum/attachment.php?attachmentid=2257&d=1182569237
Tuy nhiên: macro 4 cũng là macro, vì thế muốn dùng nó bạn phải:
- Save file theo định dạng xls hoặc xlsm... vân vân (không được Save theo định dạng xlsx)
- Khi mở file, phải Enable macro thì công thức mới hoạt động