Tài liệu học vba

Tham khảo tài liệu 'giải bài toán markowitz: tối ưu hóa danh mục đầu tư chứng khoán bằng vba for excel', tài chính - ngân hàng, đầu tư chứng khoán phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả

18p butmaulam 28-10-2013 468 46   Download

Mục đích: Tạo menu popup khi người dùng Right-Click khi chuột trong vùng làm việc của một worksheet. Giả sử workbook của tôi có một worksheet, thì trong ví dụ của tôi có hai đoạn mã. Đoạn thứ nhất nằm trong Module VBA: PopupMenu và đoạn mã thứ hai nằm trong module worksheet: workhere

7p yesno123 16-09-2011 110 32   Download

Một số Query bạn chỉ cần lấy 1 lần rồi sau đó khi có sự thay đổi dữ liệu gốc trong file Access, bạn chỉ cần nhấn Refresh, dữ liệu sẽ tự động update. Đặc biệt là các Query nhằm tạo báo cáo tổng hợp như: Tổng hợp công nợ nhà cung cấp, tổng hợp công nợ khách hàng, tổng hợp nhập xuất tồn vật tư hàng hoá, Bảng cân đối phát sinh.

9p yesno123 16-09-2011 228 24   Download

Điều khiển các chức năng cơ bản và nâng cao: 1. Hoán đổi vị trí các fields trong cùng Area PHP Code: With ActiveSheet.PivotTables("") .PivotFields("").Position = IIf(.Position = 1, 2, 1) ' Dời Row field qua trái hoặc Column Field lên trên:' .PivotFields("").Position = .Position - 1 ' Dời Row field qua phải hoặc Column Field xuống dưới:' .PivotFields("").Position = .Position + 1 End With 2. Chuyển vị trí fields từ Area này qua Area khác PHP Code: With ActiveSheet.PivotTables("") .PivotFields("").Orientation = xlRowField 'Row Area' .PivotFields("").

8p yesno123 16-09-2011 326 71   Download

Thế mạnh của Pivot Table là hoán vị các field để tạo ra các mẫu báo cáo khác nhau. Code hoán vị rất đơn giản: PHP Code: Field = "Mathang" With ActiveSheet.PivotTables("PivotTable1").PivotFields(Field) ' Hoán đổi qua lại vị trí 2 trường cùng 1 Area (Row Fields, Column Fields, ho ặc Page Fields)' .Position = IIf(.Position = 1, 2, 1) ' Dời đến Row Area' .Orientation = xlRowField ' Dời đến Column Area' .Orientation = xlColumnField ' Dời đến Page Area' .Orientation = xlPageField ' Dời Row field qua trái hoặc Column Field lên trên' .Position = .

5p yesno123 16-09-2011 149 22   Download

Dữ liệu của ta không chỉ có doanh thu, mà còn có lợi nhuận. Sếp bắt ta phân tích cả lợi nhuận nữa. Không nhất thiết phải có 2 sheet cho các báo cáo doanh thu riêng, lợi nhuận riêng. VBA có thể làm được điều này.

4p yesno123 16-09-2011 39 5   Download

Tiếp theo bài trên, tôi làm 1 báo cáo chi tiết từng khách hàng cũng bằng Pivot table, dùng 1 Combobox để chọn khách hàng, dùng VBA để lọc Pivot table với khách hàng đó. Câu lệnh lọc theo tên khách hàng và refresh pivot table là: PHP Code: With ActiveSheet.PivotTables("PivotTable1") .PivotFields("Mskh").CurrentPage = [J1].Value .PivotCache.Refresh End With Với J1 là linkedCell của combobox. Tôi có dùng VBA để: - Đánh số thứ tự - Kẻ khung, tô đậm, tính số dư cuối kỳ. - tính thêm 2 cột Dư nợ, dư có - Set Print Area (để khỏi in mấy object) - Đánh số trang trong Page Footer -...

3p yesno123 16-09-2011 204 30   Download

Như đã nói trong sách Pivot Table 2003, Pivot Table là 1 công cụ rất mạnh để phân tích, nhưng để nguyên Pivot table thì không in ra như 1 báo cáo đúng chuẩn được. Hôm nay tôi viết bài này, giới thiệu 1 số thủ thuật trong đó có dùng VBA để định dạng Pivot table lại thành 1 báo cáo hoàn chỉnh có thể in ra được.

6p yesno123 16-09-2011 451 121   Download

Cách thực hiện như sau: Trong bảng tính cần được bảo mật, bạn hãy nhấn ALT+F11 để mở cửa sổ Microsoft Visual Basic ra. Trong cửa sổ Project - VBA Project, nhắp đúp vào VBA Project, tiếp tục nhắp đúp vào Microsoft Excel Objects để mở các bảng tính trong tài liệu sau đó rồi chọn bảng tính mà bạn muốn giấu - rồi nhấn F4.

1p phannambinh 15-06-2011 178 73   Download