Run time error : 13 "Type mismatch

[MCE2014]

Hi,

Can someone tell me where im going worng in this line of code:

Dim FindString As String

FindString = Sheets(cmbmachine.Value).Range("A1:E1").Value

 

[Danerida]

Is cmbmachine declared as a worksheet? If so, you don't need .value after it in the brackets i.e. Sheets(cmbmachine)

Dan

 

[MCE2014]

Hi Danerida,

No it is a combobox on the userform.

Each worksheet is set as the fleet number of the machine

So i use the combobox value from cmbmachine as the search criteria when picking the worksheet the values and info is added to.

 

[Peter_SSs]

Hi,

Can someone tell me where im going worng in this line of code:

Dim FindString As String

FindString = Sheets(cmbmachine.Value).Range("A1:E1").Value

Range("A1:E1") does not have a value, it has 5 values. So you can't put them all at once to a single String variable.

If you declared FindString as a Variant instead of String then your code would read the range values into an array:

A1 value in FindString(1,1)
B1 value in FindString(1,2)
C1 value in FindString(1,3)
etc