BIGTONE559
Active Member
- Joined
- Apr 20, 2011
- Messages
- 336
Greetings,
i've read a number of articles about methods for bypassing the clip board when copying and pasting. I wrote some test code however, when it pastes it only pastes the data in one cell not the entire range of cells that had data in them.
All help is appreciated
i've read a number of articles about methods for bypassing the clip board when copying and pasting. I wrote some test code however, when it pastes it only pastes the data in one cell not the entire range of cells that had data in them.
Code:
Sub CopyPaste()
Dim sh As Worksheet
For Each sh In Application.Worksheets
If sh.Index <> Worksheets.Count Then
Worksheets(3).Range("A500").End(xlUp).Offset(1, 0).Value = sh.Range("A1:L34").Value
End If
Next sh
End Sub
All help is appreciated