Cách dùng tính năng FORECAST trong Excel VBA

Hầu hết các doanh nghiệp đều sử dụng công cụ Excel để tổ chức dữ liệu theo nhu cầu và tạo cơ sở dữ liệu cho tương lai. Và một trong những tính năng hữu ích cho công việc là FORECAST (dự báo) trong Excel VBA. Trong bài viết này, hãy cùng UniTrain tìm hiểu cách sử dụng tính năng FORECAST trong Excel VBA qua 3 ví dụ dưới đây nhé.

1. Tính số tiền dự định đã chi tiêu

Ví dụ đầu tiên là tính toán số tiền dự định đã chi tiêu bằng cách dùng FORECAST trong Excel VBA. Giả sử có tập dữ liệu về Distance và số tiền chi trả theo Distance đó (như hình dưới).

Calculate Forecasted Amount Spent in Excel

Người dùng muốn biết giá trị dự định chạy 127 miles bằng cách thao tác:

Bước 1: Nhấn ALT + F11 để mở cửa sổ Microsoft Visual Basic Applications.

Bước 2: Chọn Insert > Module để tạo module mới.

Bước 3: Nhập mã vào module:

Sub VBAForecastEX1()
'ExcelDemy Publications
Dim j As Range
Dim k As Range
Set j = Sheets("Example 1").Range("B5:B15")
Set k = Sheets("Example 1").Range("C5:C15")
Sheets("Example 1").Range("C18").Value = _
WorksheetFunction.Forecast(Range("B18"), k, j)
End Sub

excel vba forecast function

Bước 4: Nhấn F5 để chạy mã.

Sau đó, kết quả sẽ hiện ra (như hình dưới):

2. Tính doanh số mỗi năm bằng FORECAST trong Excel VBA

Ví dụ tiếp theo là cách tính doanh số hàng năm bằng cách sử dụng tính năng FORECAST trong Excel VBA. Giả sử có tập dữ liệu gồm hai cột: Year (năm) và Sales (doanh số). Người dùng muốn dự báo doanh số cho năm 2021 và 2022 bằng cách thao tác:

Bước 1: Nhấn ALT + F11 để mở cửa sổ Microsoft Visual Basic Applications.

Bước 2: Chọn Insert > Module để tạo module mới.

Bước 3: Nhập mã:

Sub VBAForecastEX2()
'ExcelDemy Publications
Dim j As Range
Dim k As Range
Set j = Sheets("Example 2").Range("B5:B14")
Set k = Sheets("Example 2").Range("C5:C14")
Sheets("Example 2").Range("C15").Value = _
WorksheetFunction.Forecast(Range("B15"), k, j)
End Sub

excel vba forecast function

Bước 4: Nhấn F5 để chạy mã.

Cuối cùng, kết quả sẽ hiển thị như hình dưới:

3. Dự báo cầu trong tương lai 

Bước 1: Nhấn ALT + F11 để mở cửa sổ Microsoft Visual Basic Applications.

Bước 2: Chọn Insert > Module để tạo module mới.

Bước 3: Nhập mã:

Sub VBAForecastEX3()
'ExcelDemy Publications
Dim j As Range
Dim k As Range
Set j = Sheets("Example 3").Range("B5:B13")
Set k = Sheets("Example 3").Range("C5:C13")
Sheets("Example 3").Range("C14").Value = _
WorksheetFunction.Forecast(Range("B14"), k, j)
End Sub

excel vba forecast function

Bước 4: Nhấn F5 để chạy mã.

Sau đó, kết quả dự báo nhu cầu tháng 10 sẽ hiển thị (như hình dưới):

Xem thêm

Khóa học Ứng dụng VBA trong Excel

Hướng dẫn cách dùng VBA Editor cho người mới bắt đầu

Cách dùng tính năng LOOKUP VBA trong Excel

Cách ngắt đường liên kết bằng VBA Excel

Để lại một bình luận

Email của bạn sẽ không được hiển thị công khai. Các trường bắt buộc được đánh dấu *

1 + 1 = ? (Nhập Haii để trả lời đúng)

Bài viết liên quan
Truy vấn lồng (Subquery) trong SQL – Bí kíp giúp xử lý và truy xuất dữ liệu với mức độ phức tạp cao

Truy vấn lồng (Subquery) là một trong những công cụ hiệu quả trong SQL, giúp xử lý và truy xuất dữ liệu với mức độ phức tạp cao hơn so với

Xem thêm
[HOẠT ĐỘNG CỘNG ĐỒNG] Cuộc thi Doanh nhân tập sự – CLB Kỹ năng Doanh nhân (ACTION CLUB) – CSII Đại học Ngoại Thương TP. HCM (FTU2)

Ngày 21/06/2025 vừa rồi, với danh vị là Nhà tài trợ Học bổng – UniTrain hân hạnh tham dự chung kết cuộc thi Doanh nhân tập sự. Cuộc thi với quy

Xem thêm
Hàm TRIMRANGE() – Hàm xóa giá trị trống “đỉnh” hơn cả TRIM.

Như bạn đã biết hàm TRIM() trong Excel giúp loại bỏ các ký tự trống (khoảng trắng). Tương tự vậy hàm TRIMRANGE() được sử dụng để xóa các giá trị trống khỏi một phạm vi

Xem thêm
[HOẠT ĐỘNG CỘNG ĐỒNG] Cuộc thi Financial Student Contest (FSC) mùa 13 – CLB Tài chính – Chứng khoán (SeSC) – Đại học Ngoại Thương CSII TP. HCM (FTU2)

Chiều tối ngày 13/06/2025, Chung kết cuộc thi Financial Student Contest (FSC) mùa 13 do CLB Tài chính – Chứng khoán (SeSC) thuộc Đại học Ngoại Thương CSII TP. HCM (FTU2)

Xem thêm