title: The error I get is Mismatch type on the line 'If lineod<>"" then'
body: <pre><code>Private Sub cmd_autoassign_search_Click()
  Dim inputod As Double
  inputod = Me.tb_pipe_ID_autoassign.Text
  Dim wb As Workbook
  Set wb = ThisWorkbook
  Dim ptf As Worksheet
  Set ptf = wb.Sheets(&quot;PTF&quot;)
  If inputod &lt;&gt; &quot;&quot; Then
  
  With tb_sizeA
  .Value = CDbl(Application.VLookup(inputod, ptf.Range(&quot;B8:D47&quot;), 2, 0))
  End With
  Else
  End If
  End Sub
  </code></pre>