Ghép số liệu giữa 2 sheet (1 người xem)

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

tranthuytb1306

Thành viên mới
Tham gia
20/6/14
Bài viết
4
Được thích
0
Chào anh, chị!
Em là thành viên mới của diễn đàn
Em có file đính kèm muốn ghép số liệu giữa sheet mua và sheet ban thành một
Trong file đính kèm em đã mô tả rõ yêu cầu mong muốn
Nhờ các anh chị diễn đàn giúp ah,
Em cẳm on!
 

File đính kèm

Chào anh, chị!
Em là thành viên mới của diễn đàn
Em có file đính kèm muốn ghép số liệu giữa sheet mua và sheet ban thành một
Trong file đính kèm em đã mô tả rõ yêu cầu mong muốn
Nhờ các anh chị diễn đàn giúp ah,
Em cẳm on!
Co tôi hỏi chút: Cấu trúc hai bảng của dữ liệu thật của bạn có đống nhất với nhau như File bạn gửi không?
 
Cho tôi hỏi kết quả sau khi ghép để ở Sheet nào vậy?
 
Kết quả sau ghi ghép để như thế này có được không? Nếu được chúng ta tiếp tục.
Kết quả em muốn y hêt như ban đầu anh ah, ko giống file của anh ah
Anh xem kết quả em mong muốn nhé. Do yêu cầu của sở ban ngành mà em muốn kết quả so le anh ah
 

File đính kèm

Kết quả em muốn y hêt như ban đầu anh ah, ko giống file của anh ah
Anh xem kết quả em mong muốn nhé. Do yêu cầu của sở ban ngành mà em muốn kết quả so le anh ah
Yêu cầu của Sở Ban Ngành gì mà chỉ có 4 cột, sao nghi quá, chắc còn "Thêm chút nữa"
Khi dữ liệu khoảng vài ngàn dòng, "Táng" nó vào mảng rồi "đè" nó xuống sheet một lần coi nhanh hơn được chút nào không.
[GPECODE=vb]Sub GPEX()
Application.ScreenUpdating = False
Dim sArr(), dArr(1 To 10000, 1 To 4), I As Long, K As Long
With Sheets("Mua")
sArr = .Range(.[A6], .[A65536].End(xlUp)).Resize(, 3).Value
End With
For I = 1 To UBound(sArr, 1)
K = K + 1
dArr(K, 1) = sArr(I, 1)
dArr(K, 2) = sArr(I, 2)
dArr(K, 3) = sArr(I, 3)
Next I
With Sheets("Ban")
sArr = .Range(.[A6], .[A65536].End(xlUp)).Resize(, 3).Value
End With
For I = 1 To UBound(sArr, 1)
K = K + 1
dArr(K, 1) = sArr(I, 1)
dArr(K, 2) = sArr(I, 2)
dArr(K, 4) = sArr(I, 3)
Next I
With Sheet3
.[A6:D10000].ClearContents
If K Then
.[A6].Resize(K, 4) = dArr
.[A6].Resize(K, 4).Sort Key1:=.[A6], Key2:=.[B6]
End If
End With
Application.ScreenUpdating = True
End Sub[/GPECODE]
 
Em vừa thử code của Bác Chuột,
nếu cột tên minh anh thành 1 chuỗi 011B003265 thì nó ko sort theo ngày tháng nữa
Bác xem thử file đính kèm nhé
 

File đính kèm

Lần chỉnh sửa cuối:
trong file thật của em, cột tên Minh Anh được thay bằng chuỗi 011B003265 chẳng hạn thì nó sort theo cột 011B003265 chứ ko sort theo ngày ( em muốn sort theo ngày )
Em gửi lại file anh xem tình huống này giúp em nhé
Trời 2 Nick là 1 ah? Không biết NAM hay NỮ nữa!
Của bạn đây!
 

File đính kèm

Spam chút: Cho hỏi quê bạn ở THÁI BÌNH ah?
 
Trời 2 Nick là 1 ah? Không biết NAM hay NỮ nữa!
Của bạn đây!
2 nick khác nhau đấy ah
comet_1701 là nam, tranthuytb1306 là nữ
Trần Thủy là em gái em, hướng dẫn em gái viết bài vào gpe, thế là 2 nick nó lần lộn
Thành thật xin lỗi các anh chị
File anh gửi lại đúng yêu cầu rồi ah
Em cảm ơn anh nhé
 
Ghép nhiều sheet dữ liệu

Mình muốn ghép nhiều sheet dữ liệu có cấu trúc giống nhau như chuot0106 làm nhưng mình muốn cộng số lượng mua - bán theo tên (file)ảm ơn mọi người nhiều
 

File đính kèm

Mình muốn ghép nhiều sheet dữ liệu có cấu trúc giống nhau như chuot0106 làm nhưng mình muốn cộng số lượng mua - bán theo tên (file)ảm ơn mọi người nhiều
Hic! Bài này phải kết hợp mấy chiêu mới xong.
Bạn xem đã đúng ý chưa? Nhớ hồi âm lại cho tôi dù kết quả có thế nào!
 

File đính kèm

Mình muốn ghép nhiều sheet dữ liệu có cấu trúc giống nhau như chuot0106 làm nhưng mình muốn cộng số lượng mua - bán theo tên (file)ảm ơn mọi người nhiều
Hai bảng mua và bán đều có chung 1 cấu trúc tại sao không gộp lại 1 bảng, vừa dễ nhập lại thuận tiện cho quá trình tổng hợp. Toàn tự làm khó mình thôi. Theo tôi các bạn mới nên học cách trình bày 1 bảng tính sao cho khoa học 1 chút đi.
 
Chào bạn nnd1988

Đó chỉ là ví dụ nhỏ để làm những file dữ liệu vơi số liệu rất là lớn nên mới cần đến chiêu ghép này
 

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

Back
Top Bottom