Steve,
Thanks for all your help. I understand what you are saying in your previous post, but I choose to use an alterniative route. This is what I am going to use It accomplishes the same thing basically.
Private Sub cmdQualityResponsibilities_Click()
Me.Hide 'hides the user form
Sheet4.Activate 'makes the Quality Responsibilities sheet viewable
Sheet1.Range("a287:a301").Copy
Sheet4.Select
Sheet4.Range("a6:a20").Select
Sheet4.Paste
'
Sheet1.Range("a285:a286").Copy
Sheet4.Select
Sheet4.Range("a3:a4").Select
Sheet4.Paste
End Sub
Thanks again for your help I truely appreciate it.
qppg
Bookmarks