Quesiton on Macro to Move Info To Next Open Row

bubbataks

New Member
Joined
Mar 6, 2019
Messages
10
I have the following macro set up to copy data from cells AA1, AB1 and AC1 into the next open row for columns B, C and D.

Code:

Sub Test()

Sheet1.Range("AA1:AC1").Copy Sheet1.Range("B" & Rows.Count).End(3)(2)

End Sub

The problem I'm running into is that cells AA1, AB1 and AC1 have formulas to display the cell value from another sheet. So when I run the macro, all that displays in columns B, C and D are "0"s. How can I get it so that it will copy the text over?

Thank you,
 

Some videos you may like

Excel Facts

Format cells as date
Select range and press Ctrl+Shift+3 to format cells as date. (Shift 3 is the # sign which sort of looks like a small calendar).

mumps

Well-known Member
Joined
Apr 11, 2012
Messages
10,144
Try:
Code:
Sub Test()
    With Sheets(1)
        .Range("AA1:AC1").Copy
        .Cells(.Rows.Count, "B").End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues
    End With
    Application.CutCopyMode = False
End Sub
 

bubbataks

New Member
Joined
Mar 6, 2019
Messages
10
I tried that script and it's now pasting the information, but it's appearing on a my Sheet2 when I need it to appear on my Sheet 1.

Thank you,
 

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
53,139
Office Version
  1. 365
Platform
  1. Windows
How about
Code:
Sheet1.Range("B" & Rows.Count).End(xlup).offset(1).resize(,3).Value = Sheet1.Range("AA1:AC1").Value
 

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
53,139
Office Version
  1. 365
Platform
  1. Windows
Glad we could help & thanks for the feedback
 

Watch MrExcel Video

Forum statistics

Threads
1,122,961
Messages
5,599,061
Members
414,281
Latest member
Engjamal2021

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top