End(xlUp), etc. doesn't work unless you are looking at that tab?

[Alex0013]

Hey All,

Quick question, I have some very basic code copying and pasting from one tab to another, however, for some reason, the Copy doesn't work, unless I'm looking at that tab. If I'm looking at another tab, nothing get's copied. But when I'm looking at the source tab, it works perfectly. Any thoughts? Does End(xlUp) not work unless you are looking at it??

    Set wsTeams = Sheets("Teams")
    Set wsResult = Sheets("Teams Grid")
    wsTeams.Range(Range("A1"), Range("B" & Rows.Count).End(xlUp)).Copy
    wsResult.Range("B2").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=True

Again, the code works perfect if I'm currently on the "Teams" tab. But if I execute the macro from then Teams Grid tab, nothing copies over.

Thoughts?
Thanks!
Alex

 

[MARK858]

wsTeams.Range([COLOR="#FF0000"]wsTeams.[/COLOR]Range("A1"), [COLOR="#FF0000"]wsTeams.[/COLOR]Range("B" & Rows.Count).End(xlUp)).Copy

or

wsTeams.Range("A1:B" & wsTeams.Range("B" & Rows.count).End(xlUp).Row).Copy

 

[Alex0013]

Ah....now I feel dumb...thanks so much! For some reason my brain was telling me I didn't need to identify each Range...but of course I do...

Thanks so much!

 

[MARK858]

You're welcome