the formula doesn't work automatically when change value in another cells

[tubrak]

hi

I have this function works very well

Function SumSheets(ByVal SheetName As String) As Double
    SumSheets = Application.WorksheetFunction.Sum(Worksheets(SheetName).Range("A1,B1,A2"))
End Function

but when change the values in another cell in another sheet it doesn't work automatically I have to press the formula to run again

and I searched in internet to find solution. nothing succeed so far . i follow for all suggesion from this web site but it doesn't work
hi I have this function works but when change the values in another cell in another sheet it doesn't work automatically I have to press the formula to run again and I searched in internet to find solution. nothing succeed so far . i follow for all suggesion from this web site but it doesn't work any help from experts please?

any help from experts please?

 

[Joe4]

I think most User Defined Functions are not volatile, by default.
See if this makes a difference:

Function SumSheets(ByVal SheetName As String) As Double
    Application.Volatile
    SumSheets = Application.WorksheetFunction.Sum(Worksheets(SheetName).Range("A1,B1,A2"))
End Function

 

[tubrak]

wow ! it fixed . thanks so much

 

[Joe4]

You are welcome.
Glad I was able to help!