Tạo biểu đồ thanh - Ví dụ về mã VBA

Tạo biểu đồ thanh trong VBA

Hướng dẫn sau đây sẽ mô tả cách tạo biểu đồ thanh bằng VBA.

Các bước:

1. Vào cửa sổ dự án VBA bằng cách nhấp chuột phải vào tên trang tính và chọn “Mã Xem” hoặc bằng cách chọn “ALT, F11”.

2. Ở phía bên tay phải, nhấp chuột phải vào tên dự án của bạn và chọn chèn “mô-đun”.

3. Sao chép và dán mã sau vào mô-đun mới bạn vừa tạo:

Sub MakeChart () Dim myRange As Range Đặt myRange = Application.InputBox _ (Nhắc: = "Chọn đầu vào biểu đồ", Loại: = 8) Biểu đồ. Thêm ActiveChart.ChartType = xlColumnClustered ActiveChart.SetSourceData Nguồn: = myRange, _ PlotBy: = xlColumns ActiveChart.Location Trong đó: = xlLocationAsNewSheet End Sub

4. Nhấp vào nút lưu.

5. Nhấp vào biểu tượng Excel nhỏ ở trên cùng bên phải dưới menu “Tệp” để thoát khỏi cửa sổ dự án VBA và quay lại Excel.

6. Tiếp theo, chạy macro bằng cách nhấn “Alt F8” để hiển thị danh sách các macro có sẵn và chọn “MakeChart”.

countif
countif
countif
countif
countif
countif
wave wave wave wave wave