135Hai ph ươ ng th ứ c này tr ả v ề s ố th ứ t ự c ủ a c ộ t và hàng c ủ a ô đầ u tiên c ủ a vùng d ữ li ệ u đượ c

Một phần của tài liệu Tự động hóa trong thiết kế cầu đường part 5 ppsx (Trang 27 - 29)

tham chiếu.

MsgBox Worksheets("Sheet1").Range("B3:D12").Column ‘Hiển thị giá trị

2

MsgBox Worksheets("Sheet1").Range("B3:D12").Row ‘Hiển thị giá trị

3

Columns và Rows 

Thuộc tính Columns và Rows thực chất là tập đối tượng kiểu Range chứa các cột và các hàng nằm trong phạm vi vùng dữ liệu được tham chiếu. Ví dụ sau sử dụng vòng lặp For Each … Nextđểđổi màu và điền số thứ tự cột vào các cột trong vùng dữ liệu được tham chiếu.

Public Sub VD_Columns() Dim myColumns As Range

For Each myColumns In Range("B3:C4,E2:F6").Columns

myColumns.Interior.Color = RGB(0, 255, 0) ‘Đổi màu

myColumns.Value = myColumns.Column ‘Điền số thứ tự

cột

Next myColumns End Sub

GỢI Ý Có thể sử dụng tập đối tượng Columns và Rows để truy cập đến cả một hàng hay một cột nào đó trong worksheet. Ví dụ sau sẽđiền giá trị 9 vào tất cả các ô trong cột C và các ô trong hàng 3:

Worksheets("Sheet1").Columns("C") = 9 Worksheets("Sheet1").Rows("3") = 9

ColumnWidth và RowHeight 

Thuộc tính này dùng để thiết lập chiều rộng của cột và chiều cao của hàng của vùng dữ liệu được tham chiếu.

Worksheets("Sheet2").Range("B2:C4").ColumnWidth = 15 Worksheets("Sheet2").Range("B2:C4").RowHeight = 15

Offset 

Hàm Offset tịnh tiến vùng dữ liệu theo số hàng và số cột được xác định trong các thông sốđầu vào của hàm Offset. Giá trị trả về của hàm này chính là vùng dữ liệu sau khi đã được tịnh tiến. Cấu trúc của hàm Offset là: Offsett(số_hàng, số_cột). Số_hàng nếu là số dương là tịnh tiến xuống dưới, số_cột nếu là số dương là tịnh tiến sang phải. Ví dụ sau sẽ tịnh tiến vùng dữ liệu lên trên 2 hàng và sang phải 3 cột:

136

Worksheets("Sheet1").Range("A4:B5").Offset(-2, 3).Value = 9

Replace 

Phương thức này dùng để thay thể một chuỗi ký tự bằng một chuỗi ký tự khác. Ví dụ sau sẽ thay thế từ SIN bằng COS:

Worksheets("Sheet2").Range("A1.C5").Replace "SIN", "COS"

Phương thức này cũng có nhiều tham số khác nữa để thiết lập chếđộ tìm kiếm vào thay thế như trật tự tìm kiếm, phân biệt chữ hoa chữ thường,… Chi tiết xem trong hướng dẫn đi kèm của Excel.

Select 

Phương thức này sẽ lựa chọn vùng dữ liệu được tham chiếu, giống như khi sử dụng chuột để lựa chọn một vùng dữ liệu trong worksheet. Cũng giống như phương thức Activate, vùng dữ liệu được tham chiếu phải nằm trong worksheet hiện hành, nếu không sẽ làm phát sinh lỗi khi thực thi chương trình. Ví dụ sau sẽ chọn vùng dữ liệu B2:C3 trong worksheet hiện hành:

Range(“B2:C3”).Select

Value 

Thuộc tính này chứa giá trị của vùng dữ liệu. Cần phải lưu ý rằng khi đọc giá trị của vùng dữ liệu thì vùng dữ liệu đó bắt buộc phải là một ô đơn nhất, còn khi gán giá trị thì vùng dữ liệu có thể là một ô hoặc một vùng dữ liệu gồm nhiều ô và trong trường hợp đó tất cả các ô đều có cùng một giá trị. (adsbygoogle = window.adsbygoogle || []).push({});

MsgBox Range("A1").Value ‘Đọc và hiển thị giá trị ô A1

Range("B2:C3").Value = 9 ‘Gán giá trị cho vùng dữ liệu B2:C3

GỢI Ý Trong khi làm việc với đối tượng Range, đối tượng tham chiếu đến một vùng dữ liệu, cần lưu ý những điểm sau:

✦Việc thao tác với Excel bằng mã lệnh không cần phải thực hiện lựa chọn vùng dữ liệu, vì thế nên hạn chế sử dụng các phương thức như Activate hoặc Select.

✦Trong trường hợp bắt buộc phải sử dụng các phương thức này, cần phải kích hoạt worksheet có chứa vùng dữ liệu làm worksheet hiện hành bằng phương thức Activate của worksheet đó.

✦Nên sử dụng các vùng dữ liệu được đặt tên, chẳng hạn như nên sử dụng Range(“KetQua”) thay vì sử dụng Range(“D45”). Vì khi sử dụng Range(“D45”), nếu người dùng chèn thêm một hàng ở phía trên hàng 45 thì địa chỉ của ô cần tham chiếu sẽ thay đổi, và cần phải thay đổi mã lệnh thành Range(“D46”). Nhưng nếu sử dụng vùng dữ liệu có đặt tên thì không cần phải thay đổi mã lệnh.

137 ✦Excel cho phép lựa chọn các vùng dữ liệu rời rạc bất kỳ. Trong khi sử dụng Excel, có thể

Một phần của tài liệu Tự động hóa trong thiết kế cầu đường part 5 ppsx (Trang 27 - 29)