VBA/Macro to transfer data between sheets

[Fanwood]

I'm having a hard time moving data from one sheet to another. I am not sure I fully understand how to use something like
"LastRow = Sheets(“Sheet1”).Range(“A” & Rows.Count).End(xlUp).Row." in the correct way

Trying to Accomplish:
Take data from sheet3, Row Q3:AG3
Copying it
Go to sheet1 and paste the data to the next available row that is blank, starting in the A column.
The data in sheet3 (first row) starts at A8 and continues from there.

I hope I have provided enough information

Thank you!

 

[Fanwood]

I was being a dummy and figured out what I was trying to do!

I'm sure there is a better way but this is what I ended up using:

Sub Macro1()
'
' Macro1 Macro
'
Sheets("Sheet3").Select
Range("Q3:AG3").Select
Selection.Copy
Sheets("Sheet1").Select
Range("A" & Rows.Count).End(xlUp).Offset(1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
'
End Sub

 

[Norie]

Perhaps.

Sub Macro1()
'
' Macro1 Macro
'
    Sheets("Sheet3").Range("Q3:AG3").Copy
    Sheets("Sheet1").Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial Paste:=xlPasteValues
'
End Sub