Textbox2.Value (Type mismatch)

[AndrewMB]

Any ideas as to why this error occurs?



Private Sub CommandButton1_Click()

If ComboBox1.Value = "Plate" Then
Range("Date_Drop") = ComboBox2.Value
Range("Var_Drop") = ComboBox3.Value

If ComboBox3.Value = 2 Then
Range("V_Drop_One") = "=VLOOKUP(Date_Drop,C7:BN5000,2)"
TextBox2.Value = Range("V_Drop_One") - This line errors out. (Could not set the value property. Type mismatch.)

 

[AndrewMB]

Correct, 2,3,4,5,6,8,10,12,15,20,25,30,35,40 & 60 are repeated.

Rows D:R, T:AH, AJ:AX, and AZ:BN.

 

[Norie]

Andrew

So how is Combobox3 populated?

Is it populated with just one set of those values?

 

[AndrewMB]

Yes, because the thickness set applies across each category, stock, orders, plate in and plate out.

 

[Norie]

Well that's exactly what I assumed.

Have you tried the code I posted?

 

[AndrewMB]

Norie,

Just pasted it in and ran it. Works perfectly...

This is a perfect example for me, of where I want to be with regards to using VBA more efficiently.

I'm self taught and fairly new to it, the fact that I can get it to do things off my own back still amazes me. But when it comes to using VBA like it should be used, well I'm a mile off!

But I'll get there.

Listen Norie, thank you. I know you've spent some personal time on this one, and I appreciate it.


Many thanks.