Formulas don't work in a userform

[Jim Stewart]

Erdinç E. Karaçam gave me some formulas to total columns on a different sheet and when the information is entered manually, they work great. However, when I enter them thru a userform, they don't work.
formulas:
=Count(Sheet1!A:A)
=Sum(Sheet1!A:A)

Can anyone help?
Thanks in advance.
Jim

 

[HalfAce]

Hello Jim,
How are you trying to enter these?
Something like this will work.

Private Sub CommandButton1_Click()
Sheets("Sheet2").[B1].Formula = "=Count(Sheet1!A:A)"
Sheets("Sheet2").[C1].Formula = "=Sum(Sheet1!A:A)"
End Sub

This anything close to what you're wanting to do?

 

[Jim Stewart]

I'm enmtering them as a formula in a cell. I think I've found the problem if you can help. When the cells are filled from a userform, they are entered as text. Is there a way to make the userform convert them to n umbers?
Thanks,
Jim

 

[HalfAce]

Are they coming from a textbox or something in the userform?
And do you want them entered as the actual formulas, or as static values of what the
formulas would return?

Also, can we see the code you're using to enter them?

 

[Jim Stewart]

They are coming from multiple combo and text boxes within the userform.

 

[HalfAce]

Again, can we see the code you're currently using for your commandbutton?

When I call up a userform with a combo & textbox I can have a list of formulas in the
ListFillRange for the combobox - entered like so: '=COUNT(Sheet1!A:A) - and then type
a formula into the textbox - like so: =Sum(Sheet1!A:A) - and with the following code:

Private Sub CommandButton1_Click()
Sheets("Sheet2").[B1].Formula = ComboBox1.Text
Sheets("Sheet2").[C1].Formula = TextBox1.Text
End Sub

it puts the live formulas into the ranges specified.

Is this what you're trying to do?
If not then can you explain further?