Hi JC

The code is OK if PDFs is a active sheet.
if is not try

Dim ws2 As Worksheet
Dim ws2R As Integer
Set ws2 = Worksheets("PDFs")
ws2R = 20
ws2.select
ws2.Range(Cells(1, 1), Cells(ws2R, 9)).Select

"JC" <jcridgeway@gmail.com> wrote in message
news:1131068720.253318.235130@z14g2000cwz.googlegroups.com...
>
>
> Dim ws2 As Worksheet
> Dim ws2R As Integer
> Set ws2 = Worksheets("PDFs")
> ws2R = 20
> ws2.Range(Cells(1, 1), Cells(ws2R, 9)).Select
>
> In the code above I always get runtime error 1004 on the last line.
> PDFs is a valid sheet name.
> Can someone please tell me why this does not work?
> Thank you
> - jc -
>