OK, basically I am copying and pasting 3 cells from one sheet into another, I can't copy all the cells at once due to how they are arranged on the sheet, so I was wondering if there would be an easier way of doing this than copying the cell, selecting the sheet and then pasting the cell (3 times)
[C7].Copy
Sheets("Component_list").Select
[A40].End(xlUp).Offset(1, 0).PasteSpecial
Sheets("Add_components").Select
[C9].Copy
Sheets("Component_list").Select
[B40].End(xlUp).Offset(1, 0).PasteSpecial
Sheets("Add_components").Select
[C11].Copy
Sheets("Component_list").Select
[C40].End(xlUp).Offset(1, 0).PasteSpecial
Sheets("Add_components").Select
[C7].Copy
Sheets("Component_list").Select
[A40].End(xlUp).Offset(1, 0).PasteSpecial
Sheets("Add_components").Select
[C9].Copy
Sheets("Component_list").Select
[B40].End(xlUp).Offset(1, 0).PasteSpecial
Sheets("Add_components").Select
[C11].Copy
Sheets("Component_list").Select
[C40].End(xlUp).Offset(1, 0).PasteSpecial
Sheets("Add_components").Select