Gitiho contest

Cùng gitiho contest chinh phục kiến thức, khẳng định bản thân với hệ thống bài test phong phú, đầy đủ các chủ đề để bạn khám phá.

Lộ trình học tập

Khám phá đỉnh cao tri thức cùng Gitiho qua hành trình học tập được thiết kế tỉ mỉ và toàn diện. Với kho tàng lộ trình đa dạng, chuyên sâu trên mọi lĩnh vực, chúng tôi sẽ đồng hành cùng bạn khai phá tiềm năng, chinh phục thách thức và khẳng định giá trị bản thân. Mỗi hành trình đều được nghiên cứu công phu, tạo nên bước đệm vững chắc để bạn tự tin bứt phá và tỏa sáng trên con đường phát triển sự nghiệp."

Chương trình hội viên Gitiho

Gói Hội viên Gitiho: Trọn bộ khoá học theo Khung năng lực

480+ khóa học

15 Danh mục theo kỹ năng, ngành nghề

Năng lực Lõi, Năng lực Chuyên môn, Năng lực Bổ trợ, Năng lực Quản lý

Khám phá ngay

2000+ đã đăng ký

Gói Hội viên G-Skills: 03 kỹ năng bổ trợ thiết yếu

83 khóa học Tin học văn phòng

85 khóa học Kỹ năng mềm

29 khóa học Ngoại ngữ

Khám phá ngay

500+ đã đăng ký

Gitiho for leading business

Tối ưu và đơn giản hóa hoạt động đào tạo tại doanh nghiệp. Sẵn sàng nền tảng, nội dung đào tạo cho tất cả các vị trí, bộ phận. Ứng dụng MIỄN PHÍ ngay vào doanh nghiệp chỉ với MỘT click.

Đã được tin tưởng sử dụng bởi các doanh nghiệp

  1. Trang chủ
  2. Hỏi đáp
  3. Trang chủ
  4. Hỏi đáp
Ngô Huy Cường
Ngô Huy Cường
Thảo luận 2 thảo luận
Vỗ tay 0 vỗ tay
Lượt xem 147 lượt xem

Giáo Viên theo ng thức của bài "cách lấy nội dung từ Sheet này sang Sheet

Giáo Viên ơi , em làm theo công thức của bài "cách lấy nội dung từ Sheet này sang Sheet khác" , nhưng chỉ có thể lấy dữ nhiệu được của dòng sheet DuLieu vào sheet TongHop . Ý muốn của em là chuyển mãng dữ liệu sheet DuLieu và mãng dữ liệu sheet TongHop . Giáo Viên giúp em cách viết code thực hiện được ý định này nha . cảm ơn Giáo Viên . 



File Du Lieu




Thảo luận 2 câu trả lời
Lượt xem 147 lượt xem
Vỗ tay vỗ tay
Chia sẻ
Ngô Huy Cường 09:08 - Aug 28, 2021

Bạn có thể viết theo 1 vùng ô như sau:

Sheets("...").Range("A" & DongCuoi & ":G" & DongCuoi).Value = Sheets("...").Range("A6:G6").Value
Sheets("...").Range("A6" & ":G" & DongCuoi).Value = Sheets("...").Range("A6:G100").Value
Sheets("...").Range("A6" & ":G" & 6 + KhoangCachDong).Value = Sheets("...").Range("A2:G" & 2 + KhoangCachDong).Value

miễn là vùng cho và vùng nhận có độ lớn bằng nhau là được.

Vỗ tay vỗ tay
Ngô Huy Cường 12:08 - Aug 28, 2021

Cảm ơn Giáo Viên đã phản hồi . Tuy nhiên khi em thực hện những lệnh này thì nội dung bảng TongHop ( Kết Quả ) cho ra những nội dung dư thùa và không cần thiết ạ . Giáo Viên có thể xem xét lại code và chỉnh sửa lại chỉ giúp em ạ .  



Vỗ tay vỗ tay
Câu hỏi liên quan
Cho em hỏi làm thế nào để dữ liệu thêm mới tự động có format giống như dữ liệu đã có sẵn ạ? Phải thêm lệnh như thế nào ạ?
Da Thầy cho e hỏi. ví dụ trên cùng 1 workbook có nhiều người thao tác nhập liệu trên 1 sheet "cho dữ liệu" thì sheet "nhận dữ liệu" của sheet cho dữ liệu đó có bị ảnh hưởng gì không ạ, và cách làm đó thì ntn vậy ạ.
Em muốn kẻ khung cho toàn bộ bảng dữ liệu, kể cả vùng mới thêm vào nhưng bị lỗi. Sheets("Data").Range("A2:E" & DongCuoi + 1).Select
em lấy dữ liệu, chạy thành công. nhưng khi em copy maxco kẻ khung cho dongcuoi+1: sheet2.range( "A3:E" & dongcuoi +1).select....đoạn này là em lấy từ việc ghi maxco. chỉ thay đổi vùng ( A3:E) như trên. nhưng lại không chạy được. Thầy xem giúp em chỗ này...
Thầy cho e hỏi là, e viết lệnh như thế này nhưng khi trả về kết quả thì lại hiện thị tại dòng A1, chứ không phải là A6 ạ Sub Dongcuoi_1() Dim Dongcuoi As Long Dongcuoi = Sheets("Data").Range("A" & Rows.Count).End(xlUp).Row End Sub Sub LuuDL() Sheets("Data").Range("A"...
Thầy ơi, cho mình hỏi. Mình muốn lấy dữ liệu từ nhiều sheet (4 sheet) để vào sheet kết quả nhưng trên mỗi sheet chỉ lấy thông tin vài cột, không lấy hết. Thì mình làm như thế nào ạ?
' Bai tap copy pat Sub copy1() Dim DongCuoi As Long DongCuoi = Sheet6.Range("B14 : C" & Rows.Count).End(xlUp).Row Range("B14:C & dongcuoi ").Selection.Copy End Sub Sub Xoa_Du_Lieu() Dim DongCuoi As Long DongCuoi = Sheets("Dmuc").Range("B15 : C" & Rows.Count).End(xlUp).Row Sheets("Dmuc").Range("B15:C...
Em có 1 khung bảng dữ liệu trong 1 file excel , muốn chèn dữ liệu vào dòng cuối thì làm thế nào ạ? Em chưa biết cách đẩy file lên để thầy xem. thầy chỉ em nhé. em cảm ơn
Sub Luu_Du_Lieu() Dim DongCuoi As Long DongCuoi = Sheets("Data").Range("A" & Rows.Count).End(xlUp).Row Sheets("Data").Range("A" & DongCuoi + 1).Value = Sheets("Them moi").Range("A3").Value Sheets("Data").Range("B" & DongCuoi + 1).Value = Sheets("Them moi").Range("E3").Value Sheets("Data").Range("C" & DongCuoi...
cho hỏi làm thế nào để tạo combo box ở mục nhập tên hàng ?
Scroll Top Top

Hỗ trợ khách hàng

VỀ GITIHO

hợp tác và liên kết

Tải App Gitiho

Kết nối với chúng tôi

Địa chỉ văn phòng: Phòng 302, Tầng 3, Tòa nhà Tây Hà, KĐT mới Phùng Khoang, Phường Thanh Xuân, Thành phố Hà Nội
© 2020 - Bản quyền của Công Ty Cổ Phần Công Nghệ Giáo Dục Gitiho Việt Nam
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông