title: VBA - Split function and convert it into integer value
body: <p>Cell D1 is "12 x 15KG" sometimes it might be "5 x 15KB"</p>
  
  <pre><code>this_packing = Val(Split(Worksheets("DA").Range("D1").Value, "X"))
  </code></pre>
  
  <p>The above return "Type Mismatch error 13"
  How can I get the Integer value into 'this_packing' ?</p>
  
  <p>Thanks!</p>