VBAG01: Tuyệt đỉnh VBA - Viết code trong tầm tay

Khóa học VBA Excel này sẽ giúp bạn thành thạo VBA giúp tự động hóa quy trình, công việc trên Excel, tối ưu hiệu quả, tăng 200% năng suất làm việc.

4.84 (64 đánh giá)

Chuyên gia
G-LEARNING
Ngày update
01/2023
Học viên đăng ký
15,916

499,000đ

799,000đ

Tiết kiệm 37%

Ưu đãi chỉ còn trong 2 ngày

Mã giảm giá

Hoặc

Đăng ký cho doanh nghiệp

Giúp nhân viên của bạn truy cập không giới hạn 450 khoá học, mọi lúc, mọi nơi

Top doanh nghiệp đã đăng ký cho nhân viên

Bạn sẽ học được gì?

Hình thành tư duy lập trình VBA cơ bản giúp giải quyết các vấn đề tận gốc thông qua các bài tập thiết thực trong công việc.

Hiểu cặn kẽ các kiến thức căn bản.

Biết cách tự viết code, đọc hiểu code và sửa code VBA.

Thiết lập một tiện ích tự động xử lý số liệu.

Thay đổi menu Excel, tạo form nhập liệu bằng VBA theo ý muốn.

Viết được các mã lệnh Macro để tự động phân tích, nhập và xử lý số liệu.

Nắm được một số kỹ năng lập trình thông dụng: Phát hiện và xử lý lỗi, tạo Userform, sự kiện, in hàng loạt, thêm/sửa/xóa dữ liệu, nạp dữ liệu, trích xuất dữ liệu...

Ứng dụng nội dung khóa học VBA online vào một số công việc cụ thể trong quản lý nhân sự, kế toán, tài chính, quản lý dự án...

Khoá học này sẽ có:

Video

13h 17m giờ học

Article

3 bài viết chuyên môn

Material

24 tài liệu đính kèm

Exam questions

1 đề thi ghi nhớ kiến thức

Nội dung khoá học

18 Chương . 130 bài giảng . 13h 17m giờ học

CHƯƠNG MỞ ĐẦU

1. Hướng dẫn học tập hiệu quả với Gitiho
04:58
2. LỘ TRÌNH HỌC TẬP
3. THAM GIA NHÓM HỌC TẬP
4. TÀI LIỆU THỰC HÀNH KHOÁ HỌC
5. [QUÀ TẶNG] Gitiho Excel Addin

Tổng quan về VBA

5 bài học thử

6. 1. Giới thiệu những đặc điểm của file Excel có chứa VBA
02:41

Học thử
7. 2. Thiết lập phân quyền cho phép Excel sử dụng được VBA
03:24

Học thử
8. 3. Những chú ý khi sử dụng VBA trong các phiên bản Excel
02:29

Học thử
9. 4. Hướng dẫn làm quen với file bài giảng sử dụng trong chương trình
01:41

Học thử
10. 5. Hướng dẫn cách mở cửa sổ làm việc VBA
02:25

Học thử
11. 6. Giới thiệu về các cửa sổ làm việc chính trong môi trường VBA
06:15
12. 7. Làm quen với các thiết lập cơ bản trong VBA
03:17
13. 8. Hướng dẫn cách chia màn hình làm việc khi lập trình VBA
02:16

Cách ghi và sử dụng Macro

3 bài học thử

14. 1. Khái niệm về Macro và cách ghi Macro
07:41

Học thử
15. 2. Cấu trúc cơ bản của 1 Macro
01:58

Học thử
16. 3. Cách sử dụng Macro trong Excel
03:56

Học thử
17. 4. Cách tạm dừng Macro đang chạy hoặc gặp lỗi
01:58
18. 5. Lưu file có chứa Macro
03:47
19. 6. Cách kiểm tra từng đoạn code thu được từ việc chạy từng dòng code
09:37
20. 7. Cách đánh dấu ngắt đoạn code
02:26
21. 8. Cách ghi chú nội dung trong các đoạn code
05:55
22. 9. Những code hay sử dụng từ việc ghi Macro
08:04
23. 10. Hệ thống bài tập về Record Macro
24. 11. Chữa bài tập record macro - 01 - Thao tác kẻ đường viền Borders
09:29
25. 12. Chữa bài tập record macro - 02 - AutoFit - Cell Styles
05:24
26. 13. Chữa bài tập record macro - 03 - Sắp xếp dữ liệu A-Z
09:35
27. 14. Chữa bài tập record macro - 04 - Định dạng kiểu số và ngày tháng
07:27
28. 15. Chữa bài tập record macro - 05 - Filldown - giữ lại kết quả công thức
11:59

Tìm hiểu về Module trong VBA

1 bài học thử

29. 1. Khái niệm về Module và các thao tác làm việc với Module
06:41

Học thử
30. 2. Kinh nghiệm khi đặt tên Module
05:24
31. 3. Cách viết code trong Module
03:54
32. 4. Những lưu ý khi đặt tên Macro
01:37

Kỹ thuật viết code trong VBA

2 bài học thử

33. 1. Khái niệm về lập trình hướng đối tượng trong VBA
02:38

Học thử
34. 2. Tìm hiểu về Đối tượng, phương thức, thuộc tính
06:44

Học thử
35. 3. Lưu ý về việc xuống dòng khi viết code
09:19
36. 4. Các ký tự đặc biệt khi viết code
10:00
37. 5. Cách sử dụng msgbox trong VBA
10:04
38. 6. Cách sử dụng input box trong VBA
04:03
39. 7. Hướng dẫn cách xây dựng tư duy lập trình
12:27
40. 8. Bổ trợ: cách viết code trong VBA
03:24

Kỹ thuật khai báo và sử dụng biến trong lập trình VBA

1 bài học thử

41. 1. Khái niệm về Biến trong lập trình
05:00

Học thử
42. 2. Kỹ thuật khai báo biến và cách thiết lập bắt buộc khai báo biến
08:38
43. 3. Các kiểu biến trong VBA
06:35
44. 4. Phân biệt 2 dạng Biến nhận giá trị cố định và biến nhận giá trị không cố định
03:32
45. 5. Mối quan hệ giữa các kiểu dữ liệu trong excel với vba và cách chuyển đổi kiểu dữ liệu
12:42

Cách viết code VBA với đối tượng Range, Cell

1 bài học thử

46. 1. Khái niệm về ô/vùng ô cố định hay không cố định trong VBA
07:17

Học thử
47. 2. Cách viết theo địa chỉ cố định
07:51
48. 3. Cách viết theo địa chỉ không cố định
05:18
49. 4. Cách viết Range kết hợp Offset
08:06
50. 5. Các phương thức và thuộc tính hay sử dụng với đối tượng Range
09:41
51. 6. Tìm hiểu về Select - Selection khi record macro
06:24
52. 7. Tìm hiểu về dòng cuối trong lập trình VBA
08:35
53. 8. Ứng dụng dòng cuối trong một số công việc thường gặp
10:52

Cách viết code VBA với đối tượng Worksheet

5 bài học thử

54. Tải tài liệu kèm theo bài học
55. 1. Đặc điểm của đối tượng Worksheet và cách viết code
04:56

Học thử
56. 2. Cách viết code với tên Sheet đích danh
10:19
57. 3. Cách viết code với phương pháp gán biến cho đối tượng Worksheet
07:20
58. 4. Hướng dẫn cách phân biệt đối tượng ActiveSheet với thuộc tính Activate
06:09
59. 5. Những phương thức, thuộc tính hay sử dụng của đối tượng Worksheet
07:23
60. 6. Hướng dẫn quy trình 1: cách lấy nội dung từ Sheet này sang Sheet khác
21:03

Học thử
61. 7. Hướng dẫn quy trình 2: những chú ý khi làm việc với code ẩn/hiện Sheet
13:47

Học thử
62. 8. Hướng dẫn quy trình 3: những chú ý khi khóa Sheet
06:10

Học thử
63. 9. Hướng dẫn quy trình 4: những chú ý khi in nội dung trong Sheet
06:06

Học thử

Cách viết code VBA với đối tượng Workbook

4 bài học thử

64. 1. Đặc điểm của đối tượng Workbook và cách viết code
03:40
65. 2. Hướng dẫn cách phân biệt đối tượng ThisWorkbook với ActiveWorkbook
09:15
66. 3. Những phương thức, thuộc tính hay sử dụng của đối tượng Workbook
12:13
67. 4. Cách gán biến khi làm việc với nhiều Workbook
11:26
68. 5. Những lưu ý về đường dẫn tới thư mục chứa Workbook
07:30
69. 6. Quy trình mở và lưu 1 Workbook
09:12

Học thử
70. 7. Gộp dữ liệu từ nhiều Workbook vào 1 Workbook - Phần 1
10:07

Học thử
71. 8. Gộp dữ liệu từ nhiều Workbook vào 1 Workbook - Phần 2
12:04

Học thử
72. 9. Gộp dữ liệu từ nhiều Workbook vào 1 Workbook dạng tổng quát
15:11

Học thử

Các cấu trúc thường gặp trong lập trình VBA

73. 1. Cấu trúc gộp nhóm các dòng code với With-End with
03:29
74. 2. Giới thiệu về hàm IF trong VBA
04:53
75. 3. Tìm hiểu cấu trúc IF trong lập trình VBA - Phần 1: Cấu trúc giản lược
09:41
76. 4. Tìm hiểu cấu trúc IF trong lập trình VBA - Phần 2: Cấu trúc đầy đủ
05:31
77. 5. Tìm hiểu cấu trúc IF trong lập trình VBA - Phần 3: Cấu trúc lồng ghép
08:46
78. 6. Ứng dụng cấu trúc kết hợp nhiều mệnh đề trong lệnh IF
17:15

Tìm hiểu về vòng lặp trong VBA

79. Tài liệu chương 10
80. 1. Khái niệm về vòng lặp trong lập trình
02:56
81. 2. Tìm hiểu cấu trúc vòng lặp For... Next - Phần 1
08:18
82. 3. Tìm hiểu cấu trúc vòng lặp For... Next - Phần 2
07:17
83. 4. Tìm hiểu về bước nhảy và cách thoát khỏi vòng lặp For
03:07
84. 5. Tìm hiểu cấu trúc vòng lặp For each... Next
05:50
85. 6. Bài tập thực hành: sử dụng vòng lặp For để gộp dữ liệu từ nhiều file vào 1 file
08:32
86. 7. Tìm hiểu cấu trúc vòng lặp Do... While
08:37
87. 8. Những lưu ý khi sử dụng vòng lặp Do... While
03:43
88. 9. Bài tập thực hành: sử dụng vòng lặp Do While để gộp dữ liệu từ nhiều file vào 1 file
11:36

Các loại lỗi và cách xử lý lỗi khi lập trình

89. 1. Các loại lỗi thường gặp khi lập trình VBA
05:06
90. 2. Kỹ thuật cơ bản để khắc phục lỗi cú pháp và lỗi thi hành
07:46
91. 3. Lệnh tránh lỗi và những lưu ý khi sử dụng
05:22

Lập trình UserForm cơ bản

2 bài học thử

92. Tài liệu chương 12
93. 1. Khái niệm về UserForm và các thành phần thường sử dụng
05:01

Học thử
94. 2. Các chức năng chính trong hộp công cụ của UserForm
05:47

Học thử
95. 3. Những thiết lập cơ bản khi bắt đầu với UserForm
09:32
96. 4. Kỹ thuật đặt Tab cho các thành phần trong UserForm
05:47
97. 5. Cách thay đổi định dạng dữ liệu hiển thị trong Textbox
14:03
98. 6. Tự động thay đổi kết quả dựa trên sự thay đổi của đối tượng khác
07:51
99. 7. Giới hạn kiểu dữ liệu được phép nhập trong Textbox
04:02
100. 8. Cách nạp 1 danh sách vào Combobox
06:40
101. 9. Cách đóng UserForm và cách gọi ra UserForm
03:41
102. 10.Cách lưu dữ liệu từ UserForm vào Sheet
10:47
103. 11. Những chú ý khi lưu dữ liệu từ Userform vào Sheet
05:19
104. 12. Cách đưa dữ liệu từ Sheet vào UserForm
08:44
105. 13. Sử dụng Command Button để gọi ra 1 UserForm khác
06:39
106. 14. Bài tập thực hành: Ứng dụng UserForm để tạo form nhập dữ liệu
02:03

Lập trình sự kiện trong VBA

107. 1. Khái niệm về sự kiện trong lập trình
06:37
108. 2. Hướng dẫn cách lập trình sự kiện với cách viết trực tiếp
04:03
109. 3. Hướng dẫn cách lập trình sự kiện với cách viết gián tiếp
02:28
110. 4. Bài tập thực hành: Lập báo cáo chi tiết gắn với sự kiện Worksheet_Change
08:37
111. 5. Cách giới hạn phạm vi nơi kích hoạt sự kiện
07:24
112. 1. Tìm hiểu về thanh công cụ của Excel
01:52
113. 2. Cách gọi 1 Macro trên thanh công cụ
02:14
114. 3. Cách đổi tên hiển thị của chức năng trên thanh công cụ
01:38
115. 4. Cách viết tiếng việt có dấu cho chức năng trên thanh công cụ
03:29
116. 5. Cách tạo thẻ mới, nhóm mới để xây dựng MENU làm việc
04:32
117. 6. Cách chèn ảnh đại diện cho các chức năng trên thanh công cụ
02:27
118. 7. Cách tùy chỉnh vị trí hiển thị trên thanh công cụ
02:10

Các bài tập chuyên đề: Ứng dụng VBA trong công việc

119. 1. In phiếu lương hàng loạt
120. 2. Chương trình quản lý nhân sự, in hợp đồng lao động
121. 3. Chương trình quản lý thu-chi cá nhân
122. 4. Chương trình quản lý và in Ủy nhiệm chi
123. 5. Ứng dụng tạo ribbon vào chương trình quản lý kho
05:35

Kết quả các bài tập chuyên đề: Ứng dụng VBA trong công việc

124. Tài liệu chương 16
125. Chuyên đề 01 - in phiếu lương hàng loạt
17:52
126. Chuyên đề 02 - Yêu cầu 1 - lấy số hợp đồng
12:52
127. Chuyên đề 02 - Yêu cầu 2 - lệnh in theo bộ phận
10:03
128. Chuyên đề 02 - Yêu cầu 3 - báo cáo tình trạng hợp đồng
10:23

Tài liệu tham khảo - File mẫu sử dụng VBA trong công việc

129. Phần mềm quản lý nhân sự trên Excel bằng VBA
130. Bài kiểm tra trắc nghiệm 30 phút

Exam: Đề kiểm tra Kỹ năng Sử dụng VBA

1. Bài kiểm tra đánh giá cuối Khóa học

Mô tả khoá học

Từ người mới bắt đầu đến chuyên gia VBA Excel chuẩn Microsoft sau khóa học VBA Excel của Gitiho.

Hiểu được những khó khăn của việc tự học VBA, trải qua nhiều năm đào tạo hàng ngàn học viên cá nhân và doanh nghiệp, giảng viên Dương Mạnh Quân sẽ cung cấp những bài giảng chi tiết, hướng dẫn từng bước một để học viên có thể thành thạo từng phần, trước khi cung cấp tư duy và phương pháp để xử lý các bài toán tự động hóa công việc, quy trình trên Excel nâng cao.

Điều gì tạo nên sự khác biệt để khóa học Tuyệt đỉnh VBA của Gitiho là chương trình học VBA online có nhiều học viên theo học nhất:

Chương trình học chi tiết, đầy đủ với hơn 130 bài giảng và 14+ giờ học VBA.
Dự án + bài tập thực hành chi tiết, đi theo từng chương/phần, giúp người học VBA Excel luôn được thực hành sau khi học.
Ebook, Add-in kèm theo để người học hiểu sức mạnh to lớn của VBA.
Giảng viên hướng dẫn, giải thích từng code chi tiết - luôn hiểu những khó khăn của dân văn phòng học lập trình VBA.
Video chất lượng, luôn cập nhật giao diện, kiến thức mới.

Những kiến thức bạn sẽ thành thạo sau khóa học này:

Nắm vững kiến thức nền tảng về VBA.
Thành thạo cách sử dụng Macro.
Thành thạo viết code với đối tượng Range, Cell.
Thành thạo viết code cho Workbook, Worksheet.
Lập trình Form.
Lập trình sự kiện.
Tư duy xử lý các bài toán bằng VBA.
Ứng dụng VBA trong công việc thực tế.

Một vài feedback thực tế từ học viên:

“Đây là 1 khóa học VBA rất bổ ích thầy dạy học có kiến thức rất sâu rộng , mình dù là 1 con gà mờ nhưng sau khi học khóa VBA này mình đã học được rất nhiều kỹ năng không chỉ là của vba mà còn các môn học khác, lời cuối cảm ơn công ty và các thầy cô đã cung cấp 1 nội dung học rất bổ ích”

“Bài giảng tuy ngắn gọn nhưng truyền tải được kiến thức trọng tâm. Sự kết hợp giữa clip và giáo trình rất hợp lí, phương thức giảng dạy thực tế với các bài tập mình thấy dễ hiểu và hiệu quả cao. Chắc chắn tôi sẽ đăng kí khóa học VBA2 sau khi tôi hoàn thành các bài tập.”

“Bài giảng kỹ lưỡng, đúng trọng tâm và ứng dụng ngay được. Ban đầu dịch ở nhà chán quá tính học chơi giết thời gian thôi. Cơ mà nó hay với hữu dụng đến bất ngờ. Giờ file excel của mình trông khá gọn gàng, thao tác làm việc cũng dễ chịu hơn, ko phải dụng cái là mất nguyên dòng công thức nữa. Xứng đáng 5 sao.”

“Tôi năm nay cũng 40 tuổi và lần đầu tiếp xúc với VBA, có thể học chậm hơn các bạn trẻ. Nhưng tôi phải nói khóa VBA Excel này rất dễ hiểu, được sự hướng dẫn của các chuyên gia tôi cũng lập được cho mình một phần mềm ứng dụng excel vào việc quản lý công nợ. Sắp tới tôi cũng có kế hoạch tiếp tục học Sql và tạo ribbon quản lý. Tôi hy vọng mình sẽ đạt được thành công hơn nữa. Cảm ơn Gitiho về khóa học VBA rất hay này”

Xem thêm: Tuyệt đỉnh Excel - Trở thành bậc thầy Excel sau 16h

Giảng viên:

G-LEARNING

Trường đào tạo & phát triển kỹ năng ứng dụng tin học văn phòng

4.7 điểm đánh giá
491 đánh giá
231,395 học viên
90 khóa học

Khoá học cùng chủ đề

EXG02 - Thủ thuật Excel cập nhật hàng tuần cho dân văn phòng

4.62 (66 đánh giá)

199,000đ

499,000đ

G-LEARNING

60,211 học viên

EXG01: Tuyệt đỉnh Excel - Trở thành bậc thầy Excel

4.8 (110 đánh giá)

499,000đ

799,000đ

G-LEARNING

32,480 học viên

EXG08 - Excel cho Tài chính, Kế toán và Phân tích tài chính

5 (5 đánh giá)

499,000đ

899,000đ

G-LEARNING

1,444 học viên

Đánh giá của học viên

4.84 điểm đánh giá . 64 lượt đánh giá

Pham Thanh Tu

10:54 30/11/2022

đây là 1 bài học VBA rất bổ ích thầy dạy học có kiến thức rất sâu rộng, mình dù là 1 con gà mờ nhưng sau khi học mình đã học được rất nhiều kỹ năng không chỉ là của vba mà còn các môn học khác, lời cuối cảm ơn công ty và các thầy cô đã cung cấp 1 nội dung học rất bổ ích . thanks .

Nguyễn Quỳnh Hương

03:46 04/05/2022

khóa học VBA Excel hữu ích, nhiều ứng dụng thực tế, nhiều bài tập ví dụ và thực hành, dễ hiểu, clip đôi khi hơi bị lag nhưng vẫn không sao, nói chung là cảm thấy hữu ích và hiệu quả, đáng tiền, rất hữu dụng cho công việc

Nguyễn Cảnh Thắng

01:11 30/11/2021

Khóa học VBA online cung cấp kiến thức đầy đủ trình bày logic giúp người học có thể học theo lộ trình mà không phải bỡ ngỡ. Nội dung thì khỏi phải chê vào đâu được, hi vọng sẽ có nhiều khóa học như này nữa. Good

Thảo luận về bài học

11,525 thảo luận

Đỗ Khánh Sơn 27 Jan 2023

Tải về bị thiếu file và không cài đc ạ.

Tuấn Ba [Chuyên gia] 27 Jan 2023

Bạn liên hệ cskh và hẹn lịch hỗ trợ nhé

Nguyễn Văn Thực 26 Dec 2022

Thầy ơi
Ô Cells(3,2) khi KHÔNG NHẬP GÌ XÓA ĐI NHƯNG Sheet6.Range("B3:D3").value vẫn có giá trị ạ

E gửi Thầy file đây ạ Thầy chỉ giúp e ạ
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Long
Dim j As Long
Dim lr As Long

With Sheet5
lr = .Range("B" & Rows.Count).End(xlUp).Row
i = 3
For i = 3 To lr
If Not Application.Intersect(Target, .Cells(i, 2)) Is Nothing Then
If .Cells(i, 2) <> "" Then

Sheet6.Cells(i, 2).Value = WorksheetFunction.VLookup(.Cells(i, 2), .Range("B3:D10"), 1, 0)
Sheet6.Cells(i, 3).Value = WorksheetFunction.VLookup(.Cells(i, 2), .Range("B3:D10"), 2, 0)
Sheet6.Cells(i, 4).Value = WorksheetFunction.VLookup(.Cells(i, 2), .Range("B3:D10"), 3, 0)

Else

Sheet6.Range("B3:D10").clear

End If

End If

Next i


End With

End Sub

Nguyễn Văn Thực 26 Dec 2022

No	ID	Name	Phòng
1		Mr A	CS
2		Mr B	OQC
3		Mr A	CS
4		Mr B	OQC
5		Mr A	CS
6		Mr B	OQC
7		Mr A	CS
8		Mr B	OQC

No	ID	Name	Phòng
	1	Mr A	CS

Ngô Thị Kim Chung 16 Jan 2023

Kính gừi thầy! laftop của em: bấm F4 không cố định ô bằng dấu $, vậy bấm phím nào để cố định ô vậy ?

Tuấn Ba [Chuyên gia] 17 Jan 2023

Chào bạn bạn bấm Fn+F4 nhé.

dieuanh199952@gmail.com 15 Jan 2023

Thầy có thể xem cho em viết sai đoạn code ở chỗ nào được ko ạ mà em cứ bị bắt sai ở chỗ này

Sheets("PhieuLuong").Range("F6").Value = Sheets("Data_TienLuong").Range("E" & i).Value

Tuấn Ba [Chuyên gia] 15 Jan 2023

Bạn đẩy file lên giúp gitiho bạn nhé.

dieuanh199952@gmail.com 13 Jan 2023

Em không thể nào mở được userform sau khi dán macro vào shape

dieuanh199952@gmail.com 13 Jan 2023

nó chỉ ra đoạn vàng này nhưng e không rõ sai ở đâu ạ

Dương Tấn Phước 11 Jan 2023

Tuấn Ba [Chuyên gia] 11 Jan 2023

bạn kích chuột phải vào khung đó và làm như hình

dieuanh199952@gmail.com 10 Jan 2023

Em đang thử luyện tập sử dụng vòng lặp để gộp dữ liệu từ nhiều file nhưng mà không hiểu sao khi chạy lại không tìm thấy file để chọn ạ?

dieuanh199952@gmail.com 10 Jan 2023

mà rõ ràng em đã gộp các workbook về một folder rồi ạ

Phan Quỳnh Thương 11 Jan 2023

Thầy cho e hỏi với cách xác định dòng cuối để tìm dòng định dạng, thì viết dòng cuối + 1 như thế nào là đúng ạ?
E viết như sau ko chạy được ?
Sub Dongtongcong_vietlai()
Dim Dongcuoi As Long
Dongcuoi = Sheets("sheet2").Range("B" & Rows.Count).End(xlUp).Row
Range("Dongcuoi" + 1).Style = "Total"
End Sub

Dương Mạnh Quân [Chuyên gia] 11 Jan 2023

Biến dòng cuối ở dạng Long tức là 1 con số.

Dongcuoi + 1 cũng là 1 con số, thể hiện số dòng.

Khi viết Range phải xác định cả cột và dòng. Do đó code định dạng ở cuối sẽ viết dạng:

Range("A" & dongcuoi + 1 & “:H” & dongcuoi + 1).Style = “Total”

bạn đổi lại tên cột A, H tùy theo thực tế nhé.

Đặng Huỳnh Hoàng Đinh 31 Dec 2022

Đặng Huỳnh Hoàng Đinh 31 Dec 2022

Module e viết lại

Sub NhapDuLieu()
'Thu muc chon file
With Application.FileDialog(msoFileDialogFilePicker)
.AllowMultiSelect = True 'Chon nhieu file
.Show 'Hien cua so chon file

Dim i As Integer
For i = 1 To .SelectedItems.Count

'Gan bien cho wb
Dim wb_KQ As Workbook
Dim wb_CT As Workbook
Set wb_KQ = ThisWokbook
Set wb_CT = Workbooks.Open(.SelectedItems(i))

'DongDau_DongCuoi file Nhap
Dim DongDau_Nhap As Long
DongDau_Nhap = 8

Dim DongCuoi_Nhap As Long
DongCuoi_Nhap = wb_CT.Sheets(1).Range("A" & Rows.Count).End(xlUp).Row

'Khoang cach
Dim KhoangCach As Long
KhoangCach = DongCuoi_Nhap - DongDau_Nhap + 1

'DongCuoi file TongHop

Dim DongCuoi_Tong As Long
DongCuoi_Tong = wb_KQ.Sheets("Data_TienLuong").Range("A" & Rows.Count).End(xlUp).Row

'Copy du lieu
wb_KQ.Sheets("Data_TienLuong").Range("A" & DongCuoi_Tong + 1 & ":BM" & DongCuoi_Tong + KhoangCach).Value = _
wb_CT.Sheets(1).Range("A" & DongDau_Nhap & ":BM" & DongCuoi_Nhap).Value

'Dong NoiDung file
wb_CT.Close Savechanges:=False
Next i
End With

End Sub

nguyễn văn khánh 10 Jan 2023

Em làm giống trong bài giảng nhưng vẫn không mơr được flie chứa macro ạ

Dương Mạnh Quân [Chuyên gia] 10 Jan 2023

Không rõ bạn có thấy dòng thông báo nào màu hồng nào không (gần vị trí thông báo màu vàng về macro)?

Nếu có bạn cần đặt unblock cho file thì mới sử dụng được nhé. Bạn tham khảo video hướng dẫn này:

https://www.youtube.com/watch?v=B7PGvAD_IFU&t=1s

dieuanh199952@gmail.com 09 Jan 2023

Thầy có thể kiểm tra hộ em đoạn code này được ko ạ?

Sub GanBien_Book1()
Workbooks("Book4").Sheets("Data").Range("A2:C4").Value = _
Workbooks("Book1").Sheets("Sheet1").Range("A2:C4").Value

Dim DongCuoi_Wb2 As Long
DongCuoi_Wb2 = Workbooks("Book2").Sheets("Sheet1").Range("A" & Rows.Count).End(xlUp).Row

Dim DongDau_Wb2 As Long
DongDau_Wb2 = 2
Dim KhoangCach_Wb2 As Long
KhoangCach_Wb2 = DongCuoi_Wb2 - DongDau_Wb2 + 1

Dim DongCuoi_Wb4 As Long
DongCuoi_Wb4 = Workbooks("Book4").Sheets("Data").Range("A" & Rows.Count) _
.End(xlUp).Row
Workbooks("Book4").Sheets("Data").Range("A" & DongCuoi_Wb4 + 1 & ":C" & KhoangCach_Wb2).Value = _
Workbooks("Book2").Sheets("Sheet1").Range("A" & DongDau_Wb2 & ":C" & DongCuoi_Wb2).Value

End Sub

Em làm nó cứ bị ra value và ko gán được dữ liệu vào cùng một workbook ạ

Tuấn Ba [Chuyên gia] 09 Jan 2023

Bạn xem 2 workbook có đang mở không?

Biện Văn Thành 08 Jan 2023

Thầy ơi? Sao tìm không thấy file excel bài giảng như trong video đề cập tới ạ? Muốn tải thì tải ở đâu ạ?

Tuấn Ba [Chuyên gia] 08 Jan 2023

Bạn tải ở chương 1 bài 4 bạn nhé.

Thảo Vy 27 Dec 2022

tất cả file VBA em tải ở gitiho nhưng báo lỗi vậy ạ. Mong giảng viên hỗ trợ giúp em ạ

Tuấn Ba [Chuyên gia] 28 Dec 2022

Bạn liên hệ cskh để được hỗ trợ nhé.

Hotline: 0774 116 285

Trần Quốc Tiến 03 Jan 2023

Tuấn Ba [Chuyên gia] 03 Jan 2023

Bạn đẩy file lên nhé.

Nguyễn Tá Hiến 05 Jan 2023

Sub locgiatri_3()

Dim i As Long, j As Long, dc As Long
With Sheet1
dc = Sheet1.Range("g65000").End(xlUp).Row
.Range("k10:k10000").ClearContents
For j = 100 To dc
For i = 1 To 99
If .Range("g" & i).Value = Range("g" & j).Value Then
.Range("k" & j).Value = 1
Exit For
Else
.Range("k" & j).Value = 0
End If
Next
Next
End With
End Sub

Tuấn Ba [Chuyên gia] 05 Jan 2023

Chào bạn bạn đẩy cả file lên để gitiho check nữa nhé.

499,000đ

799,000đ

Tiết kiệm 37%

Ưu đãi chỉ còn trong 2 ngày

Mã giảm giá

Hoặc

Hoàn tiền nếu không hài lòng

130 bài giảng, 14 giờ học

Học online, mọi lúc mọi nơi

Học trên máy tính, điện thoại

Sở hữu khóa học trọn đời

Đăng ký cho doanh nghiệp

Giúp nhân viên của bạn truy cập không giới hạn 450 khoá học, mọi lúc, mọi nơi

Top

@ 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