-
Apr 3rd, 2012, 05:29 AM
#1
Thread Starter
New Member
Copy Cells To empty Positions On Different Sheet
Hi Was wondering if sombody could help
I have a excel problem
i need to copy a complete row of data into a new sheet but the code needs to move to the next blank row
I was thinking of using the Selection.End(xlDown).Select command but i have to admin my VB isnt up to scratch to use it
If i had the row of data in Sheet 1 row 2 and i need the whole row pasted in the next available row in sheet 2
is there a simple code to do it
thanks
steve
-
Apr 3rd, 2012, 08:23 AM
#2
Re: Copy Cells To empty Positions On Different Sheet
There are better ways, but start with something like this:
Code:
Sub copy_row()
ActiveCell.Rows("1:1").EntireRow.Select 'selects entire row of active cell
Selection.Copy
Sheets("Sheet2").Select
Range("a65536").Select
Selection.End(xlUp).Select
ActiveCell.Offset(1, 0).Range("A1").Select
ActiveSheet.Paste
End Sub
-
Apr 7th, 2012, 12:54 PM
#3
Re: Copy Cells To empty Positions On Different Sheet
A good exercise for the Heart is to bend down and help another up...
Please Mark your Thread "Resolved", if the query is solved
MyGear:
★ CPU ★ Ryzen 5 5800X
★ GPU ★ NVIDIA GeForce RTX 3080 TI Founder Edition
★ RAM ★ G. Skill Trident Z RGB 32GB 3600MHz
★ MB ★ ASUS TUF GAMING X570 (WI-FI) ATX Gaming
★ Storage ★ SSD SB-ROCKET-1TB + SEAGATE 2TB Barracuda IHD
★ Cooling ★ NOCTUA NH-D15 CHROMAX BLACK 140mm + 10 of Noctua NF-F12 PWM
★ PSU ★ ANTEC HCG-1000-EXTREME 1000 Watt 80 Plus Gold Fully Modular PSU
★ Case ★ LIAN LI PC-O11 DYNAMIC XL ROG (BLACK) (G99.O11DXL-X)
★ Monitor ★ LG Ultragear 27" 240Hz Gaming Monitor
★ Keyboard ★ TVS Electronics Gold Keyboard
★ Mouse ★ Logitech G502 Hero
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|