Thiết lập trang tính vba

Khi sử dụng VBA để lấy và gán dữ liệu vào Phạm vi hoặc Ô trong một Trang tính của Tệp Excel, điều đầu tiên bạn cần làm là nắm bắt mẹo khai báo và sử dụng các thành phần trên bằng lệnh VBA

Vì vậy để có thể khai báo Sheets, Range và Cells của một File Excel bằng VBA, thì ngay trong nội dung này, mình sẽ chia sẻ với các bạn phương pháp để thực hiện

Để dễ hình dung hơn về cách khai báo 1 File Excel bằng VBA thì File Excel gọi là Workbook, tiếp theo là Worksheet, còn lại là Range và Cells

Khi sử dụng dữ liệu trong bảng tính Excel bằng VBA, bạn sẽ có các ràng buộc về Trang tính và Sổ làm việc như. Range và Cells thuộc Sheets và Sheets thuộc Workbook nào?

Để tinh thông hơn các bạn đi tiếp từng phần nhỏ nhé

1] Sách bài tập

Thông thường khi làm việc với Workbook thì bạn không cần khai báo trong VBA, nhưng khi truy vấn dữ liệu từ các File Excel khác thì các bạn có thể khai báo như sau

'khai báo workbook biến wb
Dim wb As Workbook
'gán workbook lúc này vào biến wb
Set wb = ThisWorkbook

hoặc khai báo cho một Workbook khác

Dim wb As Workbook
'chẳng hạn: đường dẫn ?:Desktop2018-calendar.xlsx
Set wb = Workbooks.Open["đường dẫn"]

2] Bảng tính

Các Sheets trong VBA sẽ được tự động tạo thành khi bạn tạo Sheets từ File Excel. Sheet có nhiều kiểu khai báo như khai báo theo tên, khai báo theo số thức tự Index trong VBAProject

• Cách khai báo theo số Index Sheets của Excel

Số chỉ mục của Trang tính được gán theo thứ tự tạo Trang tính. Khi bạn tạo thêm Trang tính thứ 2, số Chỉ mục của Trang tính này là 2 và sẽ không bao giờ thay đổi khi bạn biến đổi địa điểm xếp hạng của Trang tính

'khai báo workbsheet biến ws

  


Dim ws As Worksheet
'gán biến worksheet thứ 1 vào biến ws




Set ws = Sheets[1]

• Hoặc khai báo theo tên của Sheet

Dim ws As Worksheet
Set ws = Sheets["ten-sheet1"]

• Cách lấy Sheets đang sử dụng

Dim ws As Worksheet
Set ws = ActiveSheet

• Cách chuyển Sheets đang sử dụng

deadline. Khi bạn đang ở Sheet1, khi thực hiện câu lệnh dưới đây, nó sẽ tự động chuyển sang Sheet2

Sheet[2].Activate

hoặc

Sheet[2].Select

3] Phạm vi và Ô

Khi truy xuất Range và Cells các bạn có một số Note sau

• Truy xuất định dạng tên đại diện hàng và cột. deadline. A1, B1, C1…
• Truy xuất theo địa chỉ hàng và cột. deadline. Các ô A1 sẽ có địa điểm là hàng 1 và cột 1, tương đương Các ô B1 sẽ có vị trí là hàng 1 và cột 2
• Cột sẽ có địa điểm theo thứ tự như cột bên trái của bảng tính Excel, còn hàng sẽ quy ước theo thứ tự của chữ cái. deadline. ?

Cell Cell Cell

Dim rg As Range
'
gán Cells Cells có địa điểm hàng 1 và cột 1, tức là Cells A1 vào biến rg
Set rg = Cells[1,1]

hoặc

________số 8Phạm vi Cách mạng

• Envarity name

Dim rg As Range
'gán Range từ Cells A1 đến Cells D10 vào biến
Set rg = Range["A1:D10"]

• Khai báo định dạng địa chỉ

Dim wb As Workbook
'chẳng hạn: đường dẫn ?:Desktop2018-calendar.xlsx
Set wb = Workbooks.Open["đường dẫn"]

0Khai báo Range and Cells with a Sheets đã xác nhận trước

Dim wb As Workbook
'chẳng hạn: đường dẫn ?:Desktop2018-calendar.xlsx
Set wb = Workbooks.Open["đường dẫn"]

1Cách lấy giá trị và gán vào ô

• Cách lấy giá trị từ một ô vào biến

Dim wb As Workbook
'chẳng hạn: đường dẫn ?:Desktop2018-calendar.xlsx
Set wb = Workbooks.Open["đường dẫn"]

2

?Nếu bạn phát hiện ra những Sheet đích thì VBA sẽ mặc định con trỏ đến ActiveSheet

• Cách gán giá trị một biến vào một ô

Dim wb As Workbook
'chẳng hạn: đường dẫn ?:Desktop2018-calendar.xlsx
Set wb = Workbooks.Open["đường dẫn"]

3

? . Khi sử dụng Ô thay cho Phạm vi khi gán hoặc lấy giá trị thì bạn sử dụng địa điểm. deadline. Trang tính [“mười trang1”]. Ô[2, 1]. Giá trị = giatriA2

Cách chọn 1 Cells or 1 Range

Dim wb As Workbook
'chẳng hạn: đường dẫn ?:Desktop2018-calendar.xlsx
Set wb = Workbooks.Open["đường dẫn"]

4

? . Khi bạn thực hiện câu lệnh Select 1 Cells or Range thì bạn phải Kích hoạt Trang tính trước

4] Một số không giới hạn về Sheets, Range và Cells

Trước khi thực hiện các ví dụ dưới đây, bạn hãy tạo 1 File Excel với các phần sau

• Create 3 Sheet has the last name. mười tờ1, mười tờ2, mười tờ3
• Tạo 1 Module trong VBA

?

im lặng 1. Đọc tên Workbook và Sheet1

Dim wb As Workbook
'chẳng hạn: đường dẫn ?:Desktop2018-calendar.xlsx
Set wb = Workbooks.Open["đường dẫn"]

5

Khi tạo xong hàm trong Module, bạn có thể nhấn F5 để chạy lệnh hoặc nhấn vào ▶ Run Macro

• Nếu bạn đang đặt con trỏ vào hàm thì Run Macro sẽ thực hiện hàm đó tại thời điểm này
• Khi con trỏ chuột đang trỏ chuột tại địa điểm ngoài bảng soạn thảo thì VBA sẽ hiện 1 bảng chọn hàm, bạn chọn vào hàm mong muốn thực hiện và Run để chạy lệnh

Kết quả. Một cửa sổ thông báo hiển thị tên Workbook và tên Worksheet

im lặng 2. Gán tên Workbook vào A1 và tên Sheet vào Ô A2 ở mỗi Sheet

Kế hoạch tiếp tục là 1, sau khoảng thời gian gán tên Workbook và Worksheet vào biến, bạn có thể ghi vào A1 và A2 của Sheet1

Qua Sheet2 và Sheet3, do tên Worbook không bao giờ thay đổi nên bạn chỉ cần gán lại Worksheet vào biến và ghi vào Sheets tương ứng

Dim wb As Workbook
'chẳng hạn: đường dẫn ?:Desktop2018-calendar.xlsx
Set wb = Workbooks.Open["đường dẫn"]

6

Kết quả. Ở cả 3 Sheet, tên Workbook sẽ được ghi vào Cells a1, tên Sheets sẽ được ghi vào Cell A2

im lặng 3. Read value Cell A1 and A2 at Sheet2 and write to Cells B1 and B2 of Sheet1

Dim wb As Workbook
'chẳng hạn: đường dẫn ?:Desktop2018-calendar.xlsx
Set wb = Workbooks.Open["đường dẫn"]

7

Kết quả. Giá trị của Ô A1 và A2 của Trang tính 2 sẽ được ghi vào Ô B1 và ​​B2 của Trang tính 1

? . http. //123liên kết. pro/AkAjl

ĐƯỢC RỒI. Trên đầy đủ là thống kê các cách khai báo và sử dụng Trang tính, Phạm vi và Ô trong Excel bằng VBA. Khi nắm bắt được cách sử dụng các thành phần của một File Excel bằng VBA, ứng dụng vào các hàm bất kỳ bạn sẽ đơn giản hơn flash

Mong ước nội dung này đã hỗ trợ các bạn trả lời câu hỏi cho vấn đề đang tìm kiếm

Chúc các bạn một ngày vui vẻ

Khám phá 2 đối tượng. Phạm vi. tế bào. Tip đi kèm. Phần 1
Bài 5 này sẽ giới thiệu về 2 đối tượng chính kế tiếp trong VBA [ Range, Cells ], các mẹo đi kèm như select , các cách điền phương thức Exel bằng VBA.
Các bạn phấn đấu xem hết video để hiểu cụ thể, cuối video có bài mẫu để thực hiện nhé.
Cảm ơn mọi người.

Ngoài xem tại bài viết này Bạn cũng có thể xem thêm các thông tin hữu ích khác. Nhiều hơn nữa chúng tôi cung cấp ở đây. Xem các cách khácthu-thuat-may-tinh/