Chuyển số liệu từ một sheet này sang một sheet khác? (1 người xem)

[thangtctk]

ở chỗ em làm hàng năm thường thực hiện giao kinh phí cho các đơn vị cấp dưới theo một mẫu biểu thống nhất từ một file dữ liệu tổng hợp. Em nhờ các bác hướng dẫn em cách làm để lấy số liệu như trong file em gửi kèm theo sau đây.

 

[anhtuan1066]

Đầu tiên bạn phải có danh sách ấy trước... Tôi giả sử danh sách ấy nằm ở sheet1, cell A1:A10... bạn vào sheet1, quét chọn từ A1 đến A10.. rồi vào menu Insert\Name\Define... Gõ tên danh sách vào khung "Name in Workbook" ... chẳng hạn là DS.. OK...
Giờ nếu bạn muốn có 1 danh sách xổ xuống giống như tại cell B2 trong file trên thì chọn vào cell này... vào menu Data\Validation.. khung Allow bạn chon LIST.. khung Source bạn gõ vào tên danh sách mà hổi nảy bạn vừa định nghĩa, theo VD này thì tôi gõ =DS bấm OK.. vậy là xong

Bạn vào sheet Solieu, Insert\Name\Define có tên là TH, với Refer to =Solieu!$B$7:$I$12
Qua sheet Mauphuluc, tại cell C7 bạn gõ vào công thức:
=VLOOKUP($B$2,TH,A7+2,0) rồi kéo fill xuống đến C12
Giờ chọn vào Validation thử xem

Nhân tiên cũng xin nói thêm.. Vì VLOOKUP tôi lấy số cột dựa vào cell trong cột A, chính là cột bạn đang đánh số thứ tự... Vì thế mà cột này ko dc xóa hoặc đánh số sai... nếu ko sẽ ra kết quả tầm bậy ngay... Ngoài cách này ra thì còn nhiều cách khác nửa, chẳng hạn số cột bạn tự gõ vào (chắc chắn sẽ ko bao giờ sai) hoặc có thể dùng hàm ROW()
Mến
ANH TUẤN

 

[mailunglinh]

Bạn vào sheet Solieu, Insert\Name\Define có tên là TH, với Refer to =Solieu!$B$7:$I$12
Qua sheet Mauphuluc, tại cell C7 bạn gõ vào công thức:
=VLOOKUP($B$2,TH,A7+2,0) rồi kéo fill xuống đến C12
Giờ chọn vào Validation thử xem
Chúc thành công
ANH TUẤN

Anh Tuấn ơi cho em hỏi ké 1 tí: muốn tạo list chổ ô $B$2 ở sheet Mauphuluc thì phải làm sao? Anh chỉ em với.

 

[SoiBien]

@mailunglinh
Trong 4R đã có bài viết rất chi tiết về vấn đề bạn hỏi, bạn tìm bài viết về Data Validation nhé.
Thân.
Bạn xem thêm tại đây
http://www.giaiphapexcel.com/forum/showthread.php?t=98

 

[dmtdmtbb]

- Bác Tuấn nhanh tay gớm, nhưng lở làm rồi nên gởi lên thôi

 

[thangtctk]

Em cảm ơn bác anhtuan1066 nhiều, bác đã chỉ cho em cách làm rất ngắn gọn, dễ làm từ trước đến nay em toàn làm thủ công nên mất rất nhiều thời gian. Bác Anhtuan ơi cho em hỏi một chút về ý nghĩa của công thức mà bác đã lập =VLOOKUP($B$2,TH,A7+2,0)
em không hiểu A7+2 ở trong công thức có nghĩa là như thế nào, mong bác nói rõ thêm.
Một lần nữa em xin cảm ơn bác. Chúc bác luôn mạnh khoẻ và hạnh phúc, và tiếp tục đóng góp ý kiến để xây dựng GPE ngày càng mạnh

 

[voda]

- Cho mình góp thêm ý cho vui.
-Với dmtdmtbb: Có thể dùng sự kiện Worksheet_Change để khỏi thêm cmbbox vào sheet không?

 

[duongsatdn]

...VLOOKUP($B$2,TH,A7+2,0)
em không hiểu A7+2 ở trong công thức có nghĩa là như thế nào, mong bác nói rõ thêm.

"Nhân dịp" bác AnhTuan đi công tác, tôi xin mạn phép trả lời bạn: trong công thức trên sẽ tìm trong vùng có tên là "TH", cột thứ nhất có giá trị là "Hà Nội", chính là giá trị của ô B2; A7+2 sẽ trả về 1+2=3; với A7=1; tức là tìm trong cột thứ 3 của "TH", chính là cột "Tiền lương". Tương tự như vậy với các công thức VLOOKUP($B$2,TH,A...+2,0) khác. Thân mến!

 

[dmtdmtbb]

- Cho mình góp thêm ý cho vui.
-Với dmtdmtbb: Có thể dùng sự kiện Worksheet_Change để khỏi thêm cmbbox vào sheet không?

- Dùng sự kiện SelectionChange + copy tên TP vào ô B2
không cần phải tạo cbbox cho sheet nữa .

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i, j: i = 7
If Cells(2, 2) = "" Then
   Exit Sub
Else
   Do
     If Sheet1.Cells(i, 2) = "" Then
        Exit Do
     Else
        If Sheet1.Cells(i, 2) = Cells(2, 2) Then
          For j = 1 To 7
             Cells(5 + j, 3) = Sheet1.Cells(i, 2 + j)
          Next j
        End If
     End If
   i = i + 1
   Loop
End If
End Sub

 

[dunghtta1]

Bác oi giup em

Em có chương trinh tinh invoi giông vd trên mong bác chỉnh sửa giúp em với em dùng hàm Vlook up

 

[sinhtothuyan]

Xin cám ơn rất nhiều! Tài liệu này giúp ít cho mình lắm.

 

[hackeridc]

- Bác Tuấn nhanh tay gớm, nhưng lở làm rồi nên gởi lên thôi

Bác cho em hỏi trường hợp của em thì xử lý thế nào ạ?

Chẳng là em có một danh sách khách hàng tạo bằng Data Validation phục vụ cho việc xuất hàng, chi tiết trong link file ở dưới (em k up được trực tiếp lên 4zum - bác thông cảm) và ý muốn là:

1. Sau khi chọn và điền xong thông tin xuất hàng ở sheet Export. LÀM THẾ NÀO ĐỂ KHI ẤN NÚT SAVE TOÀN BỘ DỮ LIỆU SẼ CHUYỂN SANG DONG THỨ TỰ THỨ 1 của sheet Report?

2. Ở lần chọn và điền thông tin xuất hàng tiếp theo, lại tiếp tục ấn nút save THÌ LÚC NÀY TOÀN BỘ DỮ LIỆU SẼ CHUYỂN SANG DÒNG THỨ TỰ THỨ 2 của sheet Report? (tức là ghi nối tiếp dòng)

3. Cứ như thế để em có một sheet Report thống kê tổng hợp.

Rất mong bác và các thầy hướng dẫn.

Link file: https://www.mediafire.com/?7za7fz95x80hn7d

 

[Ba Tê]

Bác cho em hỏi trường hợp của em thì xử lý thế nào ạ?

Chẳng là em có một danh sách khách hàng tạo bằng Data Validation phục vụ cho việc xuất hàng, chi tiết trong link file ở dưới (em k up được trực tiếp lên 4zum - bác thông cảm) và ý muốn là:

1. Sau khi chọn và điền xong thông tin xuất hàng ở sheet Export. LÀM THẾ NÀO ĐỂ KHI ẤN NÚT SAVE TOÀN BỘ DỮ LIỆU SẼ CHUYỂN SANG DONG THỨ TỰ THỨ 1 của sheet Report?

2. Ở lần chọn và điền thông tin xuất hàng tiếp theo, lại tiếp tục ấn nút save THÌ LÚC NÀY TOÀN BỘ DỮ LIỆU SẼ CHUYỂN SANG DÒNG THỨ TỰ THỨ 2 của sheet Report? (tức là ghi nối tiếp dòng)

3. Cứ như thế để em có một sheet Report thống kê tổng hợp.

Rất mong bác và các thầy hướng dẫn.

Link file: https://www.mediafire.com/?7za7fz95x80hn7d

Nhờ giúp mà còn Protect Sheet?
Hơi bị "hưỡn" nên làm bi nhiêu thôi.
(PW nằm trên nút bấm)

 

[hackeridc]

Nhờ giúp mà còn Protect Sheet?
Hơi bị "hưỡn" nên làm bi nhiêu thôi.
(PW nằm trên nút bấm)

Woa, tuyệt vời, chuẩn quá, cảm ơn bác Ba Tê nhiều nhé . Em quên không bỏ protect sheet chứ không có ý gì đâu, bác thông cảm.

Bác xử lý giúp em trường hợp này nữa với:

1. Em muốn chuyển em nút bấm TOTITETOTE mà bác đang để ở dạng Form Control sang dạng ActiveX Control. Đồng thời khi ấn vào nút đó sau hộp thoại thông báo "XONG", ấn OK sẽ nhảy sang sheet Report để biết việc chuyển dữ liệu đã thành công.

2. Vì đặc thù công việc em có tới 3 đến 4 sheet Export (hoặc nhiều hơn nhưng hình thức là như nhau). Em muốn ở mỗi sheet này (Export1, Export2, Export3,...) đều có nút bấm dạng ActiveX Control đó và khi bấm nút ở Export1 hay Export2 hay Export3,... thì dữ liệu đều chuyển về chung ở sheet Report.

 

[Ba Tê]

Woa, tuyệt vời, chuẩn quá, cảm ơn bác Ba Tê nhiều nhé . Em quên không bỏ protect sheet chứ không có ý gì đâu, bác thông cảm.

Bác xử lý giúp em trường hợp này nữa với:

1. Em muốn chuyển em nút bấm TOTITETOTE mà bác đang để ở dạng Form Control sang dạng ActiveX Control. Đồng thời khi ấn vào nút đó sau hộp thoại thông báo "XONG", ấn OK sẽ nhảy sang sheet Report để biết việc chuyển dữ liệu đã thành công.

2. Vì đặc thù công việc em có tới 3 đến 4 sheet Export (hoặc nhiều hơn nhưng hình thức là như nhau). Em muốn ở mỗi sheet này (Export1, Export2, Export3,...) đều có nút bấm dạng ActiveX Control đó và khi bấm nút ở Export1 hay Export2 hay Export3,... thì dữ liệu đều chuyển về chung ở sheet Report.

Không hiểu sao lại có nhiều sheet Export mà mỗi sheet chỉ có 1 dòng?
Sao không dùng chỉ 1 sheet Export thôi, 100 dòng vẫn được mà, bấm nút xong thì xóa hết, nhập lại dữ liệu mới.
Chuyện thay nút bấm thì bạn Unprotect Sheet (PW: TOTITETOTE chữ IN HOA) xong xoá cái nút cũ, tạo Command Button, rồi gọi Sub cho nút lệnh này là được mà.
Ví dụ như vầy cho cái Command Button ở sheet Export:

Private Sub CommandButton1_Click()
SoProtectSheetQuaDi
End Sub

 

[hackeridc]

Không hiểu sao lại có nhiều sheet Export mà mỗi sheet chỉ có 1 dòng?
Sao không dùng chỉ 1 sheet Export thôi, 100 dòng vẫn được mà, bấm nút xong thì xóa hết, nhập lại dữ liệu mới.

Do đặc thù công việc nên em bắt buộc phải làm như vậy bác ạ. Rất mong bác Ba Tê xử lý giúp em với (dữ liệu từ các sheet Export1, Export2, Export3,... khi chuyển về duy nhất sheet Report cứ nối tiếp nhau - không quan tâm bấm nút ở sheet Export nào trước hay sau).

Cảm ơn bác Ba Tê rất nhiều!

 

[huonggiang2611]

Các bác chỉ dẫn giúp em Làm sao chuyển bộ lọc các tỉnh qua file mẫu phụ lục như trong file gốc vậy?
Cám ơn các bác!