Tách 3 Số Thành Một Cột | Giải Pháp Excel

• Trang chủ Có gì mới Hoạt động gần nhất Tác giả
• Diễn đàn Tìm bài viết mới Tìm theo chuyên mục
• Video Video về Excel Video về tin học khác Tin tức về tin học chung
• Thông tin mới Featured content Tìm bài mới Tài Nguyên Mới Hoạt động gần nhất
• Tài nguyên Đánh giá mới nhất Tìm tài nguyên
• Facebook
• Đóng góp

Đăng nhập Đăng Ký Có gì mới? Tìm kiếm

Tìm kiếm

Mọi nơi Đề tài Diễn đàn này Đề tài này Chỉ tìm trong tiêu đề Note Bởi: Tìm kiếm Tìm nâng cao…

• Tìm bài viết mới
• Tìm theo chuyên mục

Menu Đăng nhập Đăng Ký Install the app Install How to install the app on iOS

Follow along with the video below to see how to install our site as a web app on your home screen.

Note: This feature may not be available in some browsers.

• Khách ơi! GPE thông tin đến bạn ấn phẩm "lập trình VBA trong Excel": - Phần cơ bản - Phần Nâng Cao - VBA trong Excel - Cải thiện và tăng tốc

• Trang chủ
• Diễn đàn
• Hàm và công thức Excel

You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. Tách 3 số thành một cột (1 người xem)

• Thread starter Thread starter thuong_mdc80
• Ngày gửi Ngày gửi 26/6/07

Người dùng đang xem chủ đề này

Đang trực tuyến: 2 (Thành viên: 0, Khách: 2) T

thuong_mdc80

Thành viên mới

Tham gia 4/5/07 Bài viết 31 Được thích 1 Chào các A/ C. Cột A chứa dữ liệu là những chữ số. Tôi muốn tách 3 chữ số tính từ bên PHẢI thành 1 cột riêng ( giống như việc tách phần nghìn, triệu..) VD: Cột A CộtB CộtC Cột D 123456789 tách thành 123 456 789 98651423 98 651 423 987654321 987 654 321 .... Cảm ơn. T

ThuNghi

Hãy cho rồi sẽ nhận!

Thành viên đã mất Tham gia 16/8/06 Bài viết 3,808 Được thích 4,449 Format Cell - Custom ## ### ### ##0 Còn muốn tách ra từng cột thì dùng hàm right, left kết hợp len()

Mr Okebab

Ngon Ngất Ngây

Thành viên đã mất Tham gia 6/8/06 Bài viết 3,260 Được thích 3,790

thuong_mdc80 đã viết: Chào các A/ C. Cột A chứa dữ liệu là những chữ số. Tôi muốn tách 3 chữ số tính từ bên PHẢI thành 1 cột riêng ( giống như việc tách phần nghìn, triệu..) VD: Cột A CộtB CộtC Cột D 123456789 tách thành 123 456 789 98651423 98 651 423 987654321 987 654 321 .... Cảm ơn. Nhấp chuột vào đây để mở rộng...

1. Dùng hàm : Bạn xem File dưới đây 2. Dùng VBA : Để sau Thân!

File đính kèm

• Tach So.7z Tach So.7z 4 KB · Đọc: 97

XuanThanh

Thành viên thường trực

Tham gia 20/3/07 Bài viết 278 Được thích 373 Công thức ở cột D : =RIGHT(A1,3) Công thức ở cột C : =RIGHT(LEFT((A1-D1),LEN(A1)-LEN(D1)),3) Công thức ở cột B : =LEFT(A1,LEN(A1)-LEN(C1)-LEN(D1)) Thân

anhtuan1066

Thành viên gạo cội

Tham gia 10/3/07 Bài viết 5,802 Được thích 6,913 Cũng có thể dùng hàm MOD kết hợp với INT vẫn cho ra kết quả như ý mà lại dễ hiểu nữa. B1=INT(MOD(A1,1000000000)/1000000) C1=INT(MOD(A1,1000000)/1000) D1=MOD(A1,1000) vân vân... muốn tách đến bao nhiêu thì tự suy ra theo nguyên tắc trên ANH TUẤN D

digita

Guest

thuong_mdc80 đã viết: Chào các A/ C. Cột A chứa dữ liệu là những chữ số. Tôi muốn tách 3 chữ số tính từ bên PHẢI thành 1 cột riêng ( giống như việc tách phần nghìn, triệu..) VD: Cột A CộtB CộtC Cột D 123456789 tách thành 123 456 789 98651423 98 651 423 987654321 987 654 321 .... Cảm ơn. Nhấp chuột vào đây để mở rộng...

Và đây là cách tách số dùng VBA. Code này tách số (từ cột A) ra hàng triệu (cột B), hàng ngàn (cột C) & hàng trăm hay nhỏ hơn (cột D)

Sub TachSo() Range("B1") = "Hang Trieu" Range("C1") = "Hang Ngan" Range("D1") = "Hang Tram/Chuc" For i = 2 To Range("A65536").End(xlUp).Row Select Case Len(Cells(i, 1)) Case Is < 3 Trieu = "" Ngan = "" Tram = Cells(i, 1) Case 3 Trieu = "" Ngan = "" Tram = Left(Cells(i, 1), 1) Case 4 To 6 Trieu = "" Ngan = Left(Cells(i, 1), Len(Cells(i, 1)) - 3) Tram = Right(Cells(i, 1), 3) Case Is > 6 Trieu = Left(Cells(i, 1), Len(Cells(i, 1)) - 6) Ngan = Left(Right(Cells(i, 1), 6), 3) Tram = Right(Cells(i, 1), 3) End Select Cells(i, 2) = Trieu Cells(i, 3) = Ngan Cells(i, 4) = Tram Next i End Sub Nhấp chuột vào đây để mở rộng...

Vì không biết bảng số bạn bắt đầu ở dòng nào, tôi dùng hàng số 2 làm thí dụ. Bạn thay đối số dòng và cột trong câu nầy nếu cần.

For i = 2 To Range("A65536").End(xlUp).Row Nhấp chuột vào đây để mở rộng...

Mến Chỉnh sửa lần cuối bởi điều hành viên: 26/6/07 P

phamduylong

-

Thành viên đã mất Tham gia 30/12/06 Bài viết 918 Được thích 2,372 Nghề nghiệp Giáo viên Có hàm này ít ai dùng đến: 3 số đầu: MID(A1,1,3) 3 số giữa: MID(A1,4,3) 3 số cuối: MID(A1,7,3) Một lưu ý là số này phải là số 9 chữ số và số đầu tiên không phải là 0. Ví dụ số 000123456 (định dạng Format > Cells > Custom > Type=000000000 thì Excel hiểu là 123456, khi đó công thức cho 3 số đầu là 123, 3 số giữa là 456, không có 3 số cuối.

anhtuan1066

Thành viên gạo cội

Tham gia 10/3/07 Bài viết 5,802 Được thích 6,913 Cách của bạn Phamduylong ko ổn, vì người ta muốn tách ra từng nhóm 3 số tính từ bên phải qua (còn bạn thì lại tách thì trái qua). Muốn chắc chắn thì bạn vẩn phải dùng thêm hàm LEN thôi. Đả vậy do mình chưa biết chuổi cần tách ra có bao nhiêu chử số tổng cộng nên rất phiền phức khi phải tìm cách tránh lỗi #VALUE ANH TUẤN P

phamduylong

-

Thành viên đã mất Tham gia 30/12/06 Bài viết 918 Được thích 2,372 Nghề nghiệp Giáo viên Chỉnh lại theo ý bạn anhtuan1066 Kết hợp hàm LEN lấy từ phải qua trái, tahy lần lượt 2, 5, 8, 11, 14, ... nhóm 1: MID(A1,LEN(A1)-2,3) nhóm 2: MID(A1,LEN(A1)-5,3) nhóm 3: MID(A1,LEN(A1)-8,3) Tuy nhiên vẫn bị lỗi #VALUE nếu LEN(A1)-X<0

Mr Okebab

Ngon Ngất Ngây

Thành viên đã mất Tham gia 6/8/06 Bài viết 3,260 Được thích 3,790 Các bạn theo dõi hàm TachSo này nhé. Các bạn có thể tách từ ngàn tỷ, tỷ, triệu, ngàn và đơn vị. Hàm ngắn thôi mà : Mã: Sao chép. [COLOR=Blue]Option Explicit[/COLOR] [COLOR=Blue]Public Function[/COLOR] TachSo(So [COLOR=Blue]As Currency[/COLOR], i [COLOR=Blue]As Byte[/COLOR]) TachSo = Int([COLOR=Blue]CCur[/COLOR](Right(So, i * 3)) / WorksheetFunction.Power(10, ((i - 1) * 3))) [COLOR=Blue]End Function[/COLOR] Tham số i : 1. Đơn vị 2. Ngàn 3. Triệu 4. Tỷ 5. Ngàn tỷ 6. Triệu tỷ . . . . . Thân!

File đính kèm

• Tach So.xls Tach So.xls 24 KB · Đọc: 52

anhtuan1066

Thành viên gạo cội

Tham gia 10/3/07 Bài viết 5,802 Được thích 6,913 Sao lại phải rắc rối thế... Tôi bảo dám bảo đảm chỉ cần 1 hàm duy nhất là INT cũng đủ tính toán trong trường hợp này rồi và ko bao giờ xuất hiện lỗi, dù chuổi có dài bao nhiêu.

anhtuan1066

Thành viên gạo cội

Tham gia 10/3/07 Bài viết 5,802 Được thích 6,913 Giả sử bạn ấy nhập số cần tách vào cell A1, và bạn ấy có n cột chứa các số đã tách ra, với cột cuối cùng chứa 3 số cuối cùng, cột tiếp theo chứa 3 số tiếp theo... vân... vân... Ta tạm gọi cột cuối cùng là cột 1, cột kế cuối là cột 2, vân... vân... Vậy công thức tổng quát đễ tách 3 số vào cột thứ X là: =INT($A1/10^(3*(X-1)))-INT($A1/10^(3*X))*1000 Công thức này luôn luôn đúng cho dù chuổi số dài bao nhiêu, và cho dù cột thứ X ko lấy dc số nào thì nó cũng chỉ cho kết quả =0 chứ ko gây lỗi Tôi post file lên đễ có 1 VD minh họa cụ thể ANH TUẤN Lần chỉnh sửa cuối: 29/7/07 D

digita

Guest

Mr Okebab đã viết: Các bạn theo dõi hàm TachSo này nhé. Các bạn có thể tách từ ngàn tỷ, tỷ, triệu, ngàn và đơn vị. Hàm ngắn thôi mà : Mã: Sao chép. [COLOR=blue]Option Explicit[/COLOR] [COLOR=blue]Public Function[/COLOR] TachSo(So [COLOR=blue]As Currency[/COLOR], i [COLOR=blue]As Byte[/COLOR]) TachSo = Int([COLOR=blue]CCur[/COLOR](Right(So, i * 3)) / WorksheetFunction.Power(10, ((i - 1) * 3))) [COLOR=blue]End Function[/COLOR] Tham số i : 1. Đơn vị 2. Ngàn 3. Triệu 4. Tỷ 5. Ngàn tỷ 6. Triệu tỷ . . . . . Thân! Nhấp chuột vào đây để mở rộng...

Anh Okebab, Cái UDF này rất ngắn. Cám ơn anh. Chỉnh sửa lần cuối bởi điều hành viên: 27/6/07

chibi

Thành viên tích cực

Thành viên danh dự Tham gia 10/1/07 Bài viết 1,120 Được thích 623 Xin góp thêm 1 macro Mã: Sao chép. Sub tach_so() Dim i, so, so_cot, dong dong = 1 Do While Len(Cells(dong, 1).Value) > 0 so = Cells(dong, 1).Value so_cot = WorksheetFunction.RoundUp(Len(so) / 3, 0) For i = 1 To so_cot Cells(dong, so_cot + 2 - i).Value = Right(so, 3) so = Int(so / 1000) Next dong = dong + 1 Loop End Sub Mô tả: Tách các số tại cột A ra các cột B,C... (Có thể cải tạo dùng Worksheet_Change để khi nhập tại cột A thì tự động tách ra các cột B,C - Phần trên còn thiếu xoá dự liệu cũ tại các cột B, C..) Lần chỉnh sửa cuối: 27/6/07 T

thuong_mdc80

Thành viên mới

Tham gia 4/5/07 Bài viết 31 Được thích 1 Cảm ơn các Anh / Chị nhiều. Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.

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

Chương trình lập Báo cáo khảo sát Địa chất công trình GeoSection

• • 

• PhanTuHuong
• 7/10/21
• Xây dựng ứng dụng.

Trả lời 10 Đọc 7K Hôm nay lúc 14:52 PhanTuHuong 2 Xin hỏi về Công thức tính tiết theo PPCT (phân phối chương trình) trong Lịch báo giảng tự động (1 người xem)

• 2013myvietnam
• Hôm qua, lúc 20:22
• Excel và Giáo Dục

Trả lời 9 Đọc 206 Hôm nay lúc 14:25 2013myvietnam 2 V Giúp tạo bảng phân công lịch trực tự động (1 người xem)

• • 

• vudaicacvatn
• Hôm qua, lúc 17:05
• Những vấn đề chung

Trả lời 4 Đọc 90 Hôm nay lúc 08:51 thanthanhan [GPE21] ỨNG DỤNG POWER QUERY TRONG ĐỐI CHIẾU DỮ LIỆU HÓA ĐƠN ĐIỆN TỬ VÀ DỮ LIỆU KẾ TOÁN (1 người xem)

• • 

• GPE-Trợ Lý
• 21/12/25
• Học tập Online

Trả lời 1 Đọc 10K Hôm nay lúc 05:26 GPE-Trợ Lý Nhờ các cao nhân chỉ giúp file excel quá nặng. không không biết nguyên nhân (1 người xem)

• hanhlx88
• Thứ hai lúc 13:02
• Giải thích, gỡ rối, xử lý lỗi công thức

Trả lời 5 Đọc 185 Hôm qua, lúc 22:56 Mr.hieudoanxd Q Nhờ các anh chị giúp cho công thức đếm số khách hàng theo File đính kèm (1 người xem)

• QUANSUNG
• Thứ hai lúc 10:15
• Hướng dẫn sử dụng các hàm trong Excel

Trả lời 8 Đọc 237 Hôm qua, lúc 16:31 dungpham01 D Copilot bình luận các ván cờ vua từng ngày. (1 người xem)

• • 

• SA_DQ
• 3/11/25
• Chia sẻ

Trả lời 18 Đọc 843 Hôm qua, lúc 16:11 SA_DQ T Nhờ các Pro giúp thiết lập bảng excel (1 người xem)

• thanhkybk
• Thứ hai lúc 17:53
• Hàm và công thức Excel

Trả lời 10 Đọc 391 Hôm qua, lúc 15:19 thanhkybk T D

• Question Question

Tách dòng tự động theo điều kiện bằng VBA (1 người xem)

• • 

• duongnhuxuyen
• 12/12/25
• Lập Trình với Excel

Trả lời 20 Đọc 716 Thứ ba lúc 10:32 ptm0412 D Công thức tính thuế TNCN cho người lao động nước ngoài

• Dinh Hong Nhung
• Thứ hai lúc 10:04
• Hàm và công thức Excel

Trả lời 1 Đọc 175 Thứ hai lúc 15:05 Phan Thế Hiệp D Công thức tính thuế thu nhập cá nhân mới nhất theo mức 5 bậc (1 người xem)

• Dinh Hong Nhung
• 11/12/25
• Hàm và công thức Excel

Trả lời 16 Đọc 2K Thứ hai lúc 13:55 dungpham01 D L [Nhờ giúp đỡ] Tìm khoảng thời gian bị gối, hoặc trùng nhau (1 người xem)

• Lá chanh
• Thứ sáu lúc 00:53
• Hàm và công thức Excel

Trả lời 8 Đọc 210 Thứ hai lúc 05:36 lamvankhoat1 L B Tính 1 đồng Doanh thu thuần mang về thì còn lại được bao nhiêu đồng EBITDA (1 người xem)

• Bobby52
• Thứ bảy lúc 16:18
• Hàm và công thức Excel

Trả lời 0 Đọc 102 Thứ bảy lúc 16:18 Bobby52 B Bán sách Excel nâng cao để ủng hộ đồng bào bão lũ năm 2025!

• • 

• PhanTuHuong
• 10/12/25
• Câu lạc bộ hoạt động xã hội

Trả lời 6 Đọc 532 25/12/25 PhanTuHuong A Có cách nào điều chỉnh cho tên Sheet lớn ra (1 người xem)

• • 

• AnhThu-1976
• 24/12/25
• Những vấn đề chung

Trả lời 8 Đọc 310 25/12/25 SA_DQ T Xin hỏi cách để lọc dữ liệu ngày tháng của nhiều sheet (2 người xem)

• TatLap
• 25/12/25
• Lọc và sắp xếp dữ liệu

Trả lời 6 Đọc 206 25/12/25 TatLap T K xin file excel bảng đấu bóng đá (1 người xem)

• • 

• kenshithanh
• 1/4/15
• Chơi Game với Excel

Trả lời 48 Đọc 30K 24/12/25 SA_DQ Nếu diễn đàn GPE đóng cửa? (1 người xem)

• • 
  • 

• PhanTuHuong
• 14/12/25
• Thư giãn

Trả lời 26 Đọc 1K 24/12/25 TH280861 T Miền Tây mùa nước nổi (1 người xem)

• • 
  • 

• PhanTuHuong
• 5/10/20
• Thư giãn

Trả lời 31 Đọc 3K 24/12/25 SA_DQ T Lọc dự liệu với hai điều kiện (1 người xem)

• tiny1010
• 16/3/10
• Cấu trúc dữ liệu Excel và việc Xử lý dữ liệu

Trả lời 20 Đọc 7K 24/12/25 dungpham01 D Xem thêm… Chia sẻ: Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

Thành viên có số lượng bài viết cao nhất tháng

• 2013myvietnam 4
• Phan Thế Hiệp 2
• thanthanhan 1
• PhanTuHuong 1

Thành viên có điểm tương tác cao nhất tháng

• 2013myvietnam 5
• Phan Thế Hiệp 2

Thời gian đếm ngược.

000 Ngày 00 Giờ 00 phút 00 giây Thân mời tham dự sự kiện sinh nhật GPE 2025

• Trang chủ
• Diễn đàn
• Hàm và công thức Excel

• Website này sử dụng cookies. Tiếp tục sử dụng trang này, đồng nghĩa với việc bạn chấp nhận website sử dụng cookies. Chấp nhận Tìm hiểu thêm.…

Back Top Bottom