Append to Last column

I'm looking to append data from Column A in sheet 8 to the next open column in sheet 7. I know how to append rows, but not columns...

This is what I have

Sub AddtoMaster()
Dim iLastColumn As Long

ThisWorkbook.Sheets("Sheet8").Range("a:c").Copy
ThisWorkbook.Sheets("Sheet7").Select
iLastColumn = ThisWorkbook.Sheets("Sheet7").Column.Count
Range("A" & iLastColumn).End(xlUp).Offset(1, 0).Select
ActiveSheet.Paste
Application.CutCopyMode = False


End Sub

I know this is most likely totally off, but as you can tell I based it off of a macro I used to append rows.