Hi,
Uisng tony h's advice, I went back and corrected the problem.
I rewrote the Function code as a Sub and fixed the range references.
Here is the code :
Sub ConvertCalc1()
If OptionButton2.Value = True Then
TextBox2.Value = TextBox1.Value * _
(Application.WorksheetFunction.Index([VOLUMN_Table], Application.WorksheetFunction.Match(ComboBox1, [VOLUMN_ROWS], 0), _
Application.WorksheetFunction.Match(ComboBox2, [VOLUMN_COLUMNS], 0)))
Else
TextBox2.Value = TextBox1.Value * _
(Application.WorksheetFunction.Index([WEIGHT_Table], Application.WorksheetFunction.Match(ComboBox1, [WEIGHT_ROWS], 0), _
Application.WorksheetFunction.Match(ComboBox2, [WEIGHT_COLUMNS], 0)))
End If
End Sub
Thanks for all the suggestions
Mark
Bookmarks