giá trị trung gian trong hàm VBA?

[vuanhxv]

khi viết 1 hàm excel bằng VBA thường phải qua rất nhiều bước mới có được kết quả cuối cùng.
vậy các pro cho mình hỏi làm thế nào để xuất ra 1 giá trị trung gian trong hàm đó?
Ví dụ: mình có hàm: f(x,y,...) với x,y,... là biến số.
để tìm ra f cần phải tính g,h,... (theo x,y,...)
rồi từ g,h,... mới suy ra f (là giá trị cuối cùng).
bây giờ mình muốn lấy các giá trị trung gian là: g,h,... thì phải làm sao?

 

[anhphuong]

Thì bạn viết thêm các ham tính g,h... nữa rồi từ ham tính f bạn gọi các hàm trên vào trước khi cho ra kết quả
Thân

 

[Po_Pikachu]

Thì ở bước trung gia sau khi tính vừa xong g, h bạn nhập thêm 1 đoạn code xử lý việc lấy giá trị g, h ra. Ví dụ: Sub tinh(x,y,...) x,y... ... g,h... Msgbox(g,h) ... End Sub Với: Msgbox(g,h): là lệnh đọc giá trị g, h ngay sau thời điểm tính xong g, h. Bạn có thể thay bằng 1 lệnh khác.

 

[SA_DQ]

Bạn dùng tùy chọn Optional xem sao

Ví dụ:

Option Explicit
Function TichTong(Aa As Double, bB As Double, Optional Chon As Integer)
 Select Case Chon
 Case 1
    TichTong = Aa + bB
 Case 2
    TichTong = Aa - bB
 Case 3
    TichTong = Aa * bB
 Case 4
    TichTong = Aa / bB
 Case Else
    If Aa Mod 2 = 0 And bB Mod 2 = 0 Then
        TichTong = "Cung La So Chan"
    ElseIf Aa Mod 2 = 0 Or bB Mod 2 = 0 Then
        TichTong = "Chi Mot La Chan"
    Else
        TichTong = "Hai Cung Le"
    End If
 End Select
End Function

Lúc đó cú pháp hàm có thể là 1 trong các phương án sau:
=TichTong(C117;C118)
=TichTong(C126;C127; 2)
=TichTong(C129;C130; 4)

 

[huynhtanchau]

Như bạn nói, để tính hàm f bạn đã tính các hàm g, h. Vì vậy, ngay trong đoạn code của hàm f, sau khi tính được g hoặc h, bạn có thể dùng msgbox(g) hoặc msgbox(h) để xuất g hoặc h ra màn hình.