Form Issue

[VBABEGINER]

HI Team,

I have created this form since last 3-4 months and working all well..
I dont understading now, suddenly it is not working.

Sheet 3 has activex control command button. On button click, Userform1.Show written.

but now from last 10 mins it is showing me, RUN TIME ERROR 13, type mismatch....LOL

How do i get solve this..

 

[jproffer]

Did you change the name of the form? Or did someone change the name of the form?

 

[VBABEGINER]

No. I have checked that. form name are correct.

Did you change the name of the form? Or did someone change the name of the form?

 

[VBABEGINER]

ohhh...in name property of Form, "Userform1 " done. May b mistnkly update or key pressed...GOT IT...COOL

 

[VBABEGINER]

Ok, just small help require on the same..
On the form, I have taken combo box. and trying to set Col A data in it.

Workbook name - Copy of Timesheet_H&B
worksheet name - Sheet2

how do i achieve that in below code..

Dim iA As Long
iA = Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Row
ComboBox1.RowSource = Worksheets("Sheet2").Range("A2:A" & iA)

 

[jproffer]

Try this:

ComboBox1.RowSource = "'[Timesheet_H&B.[B][COLOR=#ff0000]xlsx[/COLOR][/B]]Sheet2'!$A$1:$A" & iA

You'll have to change "xlsx" to whatever type of file your workbook Timesheet_H&B is.

 

[VBABEGINER]

Thanks for this..
But code for this..

iA = Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Row

 

[VBABEGINER]

I have designed like this now..

Dim iA As Long
iA = Workbooks("Timesheet_H&B.xlsm").Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Row
cmbActivity.RowSource = "'[Timesheet_H&B.xlsm]Sheet2'!$A$2:$A" & iA

Tested iA in another module too, to see whether value taking in variable or not. iA taking value correctly. But in Form combo box, values are not listed...

 

[jproffer]

If the names of your combobox, workbook and worksheet are correct, what you have there should work. Only other thing to try would be to put the UserForm name in front of cmbActivity...such as:

FrmName.cmbActivity.Rowsource =..................

It depends on where the code is as to whether that's needed or if you could just use "Me" instead of the form name, but it's always safe to use the full name, even if it's located where "Me" would work or where it's not needed at all.

 

[VBABEGINER]

Yes, not its work...by putting form name..Cheers...Thanks so much for your prompt answers...Bless you