VBA Copy Question

[ionelz]

Hello,
I have this line code : Sheets("Sheet1").Range("C2:C100000").Copy
So range C2:C100000

How do I say this :
Look in A1:Z1 for name "ABC" , say "ABC" is found in cell F1, and Copy that Column
Code would be :
Sheets("Sheet1").Range("F2:F100000").Copy


Thank you

 

[Joe4]

This line can NEVER be true:

If Left(LCase(cell.Value), 8) = "BOM Line" Then

"LCase" is the function for lower case. We are converting everything to lower case for the sake of comparison, since none of these would be considered the same:
"BOM Line"
"BOM LINE"
"Bom Line"

By making the entry lower case, we are standardizing it for the sake of comparion.
So the code HAS to look like:

If Left(LCase(cell.Value), 8) = "bom Line" Then

Moral of the story: Don't start messing with a line of code and make changes to it if you do not fully understand what it does! Just Copy/Paste it "as-is".

 

[ionelz]

I did not said that what you did is wrong (because I do not know), I said I can not make it work for me
And I have copy paste exactly now and still I can not make it work
Then I sent you what I have, what is working and what I would like to do

 

[ionelz]

Maybe is something wrong at Opening File Source, and looking into that, from where I want to Copy, where I want to look in A1:Z1
I hope that it is not looking in Destination file because there is no BOM Line

 

[Joe4]

Maybe is something wrong at Opening File Source, and looking into that, from where I want to Copy, where I want to look in A1:Z1
I hope that it is not looking in Destination file because there is no BOM Line

Then you need to put that code BEFORE you open the Destination file, or select the Source file before you run that part of the code.