Giáo trình phân tích khả năng ứng dụng lập trình bằng ngôn ngữ visual basic trên java p1

Đoạn văn bản sẽ hiển thị trong hộp thoại Tiêu đề của hộp thoại InputBox Giá trị mặc định. Nếu người dùng không nhập gì cả, hàm sẽ trả về giá trị mặc định này. Toạ độ góc trên bên trái của hộp thoại. Tên tệp trợ giúp và chủ đề cần hiển thị Mã xác định kiểu.Người sử dụng có thể lựa chọn một vùng dữ liệu trực tiếp trên worksheet bằng cách sử dụng chuột; Việc kiểm tra dữ liệu nhập vào được thực hiện tự động. Cú pháp của hàm InputBox này như sau: Application.InputBox(prompt, title, default,...
Nội dung trích xuất từ tài liệu:
Giáo trình phân tích khả năng ứng dụng lập trình bằng ngôn ngữ visual basic trên java p1 Giáo trình phân tích CkhảNnăng PứngHdụng IlậpSOFT EXCEL  HƯƠ G IV: LẬ  TRÌN  TRÊN M CRO trình bằng ngôn ngữ visual basic trên java thông báo bằng cách gán thuộc tính DisplayAlerts bằng FALSE, và cũng nên nhớ là phải trả về các giá trị mặc định trước khi kết thúc chương trình. Đổi tên worksheet  Việc đổi tên worksheet được thực hiện một cách dễ dàng, chỉ cần thay đổi thuộc tính Name có trong đối tượng worksheet. Đoạn mã sau sẽ đổi tên Sheet2 thành MySheet: Worksheets(Sheet2).Name = MySheet 7.4. Làm việc với Range và Cells 7.4.1. Duyệt qua từng ô trong vùng dữ liệu Để duyệt qua từng ô trong vùng dữ liệu, sử dụng vòng lặp For Each… Next để duyệt qua từng đối tượng trong tập đối tượng Cells. Trình tự duyệt là theo số thứ tự của ô: duyệt từ trái sang phải là từ trên xuống dưới. Ví dụ sau sẽ duyệt qua từng ô trong vùng dữ liệu A1:D3, điền số vào từng ô theo thứ tự được duyệt. Thông qua ví dụ này, ta sẽ hiểu rõ hơn về trình tự duyệt các ô trong vùng dữ liệu: Sub Duyet_O() Dim myCell As Range Dim i As Integer i=0 For Each myCell In Range(A1:D3).Cells ‘Các thao tác xử lý nằm ở đây ‘Ví dụ: điền số thứ tự duyệt vào từng ô i=i+1 myCell.Value = i Next myCell End Sub 7.4.2. Duyệt qua từng ô trong vùng dữ liệu theo hàng và cột Quá trình duyệt theo hàng hoặc cột được thực hiện sử dụng vòng lặp For Each…Next trên các tập đối tượng Rows, Columns và Cells. Đối tượng thành phần trong các tập đối tượng này đều có kiểu là Range. Ví dụ sau sẽ tính tổng từng cột của vùng dữ liệu được tham chiếu và điền giá trị tổng này vào ô ở ngay phía dưới từng cột. 1. Sub Duyet_O_Theo_Cot() 2. Dim myCell As Range 3. Dim myColumn As Range 4. Dim Tong As Double 5. For Each myColumn In Range(A1:D3).Columns 6. Tong = 0 7. For Each myCell In myColumn.Cells 8. Tong = Tong + Val(myCell.Value) 9. Next myCell 10. myColumn.Cells(myColumn.Rows.Count + 1, 1) = Tong 11. Next myColumn 12. End Sub 153 Dòng thứ 5 là vòng lặp cho phép duyệt qua từng cột trong vùng dữ liệu A1:D3. Mỗi cột lại là một vùng dữ liệu, vì thể lại tiếp tục duyệt qua từng ô trong vùng dữ liệu đó, điều này được thực hiện ở dòng thứ 7. Dòng thứ 10 dùng đế gán giá trị tổng tính được của mỗi ô vào ô dưới cùng của cột. 7.4.3. Vùng có chứa dữ liệu – Thuộc tính UsedRange UsedRange là một thuộc tính rất hữu dụng của đối tượng Worksheet. Thuộc tính này trả về vùng dữ liệu là hình chữ nhật bao của tất cả các ô có chứa dữ liệu. Góc trên bên trái của hình chữ nhật là ô đầu tiên có chứa dữ liệu, còn góc dưới bên phải của hình chữ nhật là ô cuối cùng có chứa dữ liệu. Các ô có chứa dữ liệu được hiểu là những ô có chứa thông tin như: giá trị, định dạng và chú thích. Hình sau minh hoạ rõ hơn về thuộc tính UsedRange. Mặc dù trong vùng dữ liệu trả về của thuộc tính UsedRange có chứa cả những ô không có dữ liệu, nhưng như vậy đã là hiệu quả và tiết kiệm thời gian hơn là so với việc duyệt qua tất cả các ô trong worksheet. Ví dụ sau sẽ duyệt qua tất cả các ô có chứa dữ liệu và chọn những ô có giá trị âm trên worksheet hiện hành: Sub Su_dung_UsedRange( ) Dim cel As Range, str As String For Each cel In ActiveSheet.UsedRange If cel.Value < 0 Then str = str & cel.Address & , Next If str Then str= Left(str, Len(str) - 1) ActiveSheet.Range(str).Select End If End Sub Ví dụ trên lấy về địa chỉ của tất cả các ô có giá trị âm và sử dụng dấu “,” ngăn cách giữa địa chỉ của các ô để lấy hợp của tất cả các ô (xem thêm mục “Tham chiếu đến đối tượng Range” trang 132). Sau khi kết thúc vòng lặp, chuỗi str sẽ có kiểu là “$A$1,$D$5,” nên dòng lệnh If cuối cùng sẽ cắt ký tự cuối cùng của chuỗi str để chuyển về dạng thức địa chỉ đúng “$A$1,$D$5”. Câu lệnh Len(str) trả về chiều dài của chuỗi ký tự str. Còn câu lệnh Left(str,n) trả về n ký tự nằm ở bên trái của chuỗi ký tự str. 154 CHƯƠNG IV: LẬP TRÌNH TRÊN MICROSOFT EXCEL  7.5. Làm việc với biểu đồ Tính năng biểu đồ trong Excel khá ấn tượng. Một biểu đồ có thể thể hiện nhiều kiểu dữ liệu khác nhau trong Excel. Excel hỗ trợ hơn 100 loại biểu đồ khác nhau và người dùng có thể điều khiển hầu như tất cả các thành phần trong biểu đồ bởi lẽ, mỗi thành phần trong biểu đồ chính là một đối tượng với các phương thức và thuộc tính khác nhau. Vì vậy, việc lập trình với biểu đồ là không dễ, nhưng một khi đã hiểu rõ cây phân cấp đối tượng thì kết quả sẽ ấn tượng hơn rất nhiều. Tuỳ theo vị trí mà biểu đồ trong Excel được phân thành 2 loại sau: Biểu đồ nhúng – ChartObject: là dạng biểu đồ nằm bên trong một worksheet. Trong một worksheet có thể chứa nhiều biểu đồ nhúng khác nhau và các biểu đồ này có thể được truy xuất thông qua tập đối tượng ChartObjects có trong đối tượng worksheet. Biểu đồ độc lập – ChartSheet: là dạng biểu đồ nằm trong một sheet riêng biệt, gọi là chartsheet. Mỗi một chartsheet chỉ có thể chứa một biểu đồ dạng này mà thôi. Biểu đồ dạng này có thể được truy xuất thông qua tập đối tượng Charts có trong đối tượng workbook. Biểu đồ, dù là dạng nhúng hay độc lập, đều có cùng một kiểu dữ liệu là Chart. Hơn nữa, trong hầu hết các bảng tính, các biểu đồ thường được nhúng trong worksheet để tiện cho việc trình bày. Chính vì vậy, nội dung trong giáo trình này chỉ tập trung thao tác đối với biểu đồ nhúng. 7.5.1. Tạo mới biểu đồ Cách nhanh nhất để tạo biểu đồ bằng mã lệnh l ...