Still having the same problem at the line:
Set wb = thisWB

I think I am missing something.
My original worksheets has 14 columns and I need to extract just 11, but this extracted columns must be pasted at different columns of the original one.