Copy/paste macro help request

**NewKidontheBlock** · 08-12-2011, 08:55 AM

Hello All!

I'm new to Excel advanced features (i.e. macros). I've searched Google all day and have not come up with a

macro that accomplishes what I need in total.

I need command button macro that will:
Copy cells M14:Q14 on Sheet1
Paste the value of the copied cells on the first empty row of column A on Sheet 2
Paste the value of same copied cells (transposed) in the first empty cell of row 3 on Sheet3 Clear the values

(but not the validation) of cells I13:I17 on Sheet 1

Many thanks for your help!
Deb

**JBeaucaire** · 08-12-2011, 10:59 AM

Copy cells M14:Q14 on Sheet1
Paste the value of the copied cells on the first empty row of column A on Sheet 2

Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Offset(1).Resize(,5).Value _
    = Sheets("Sheet1").Range("M14:Q14").Value

Paste the value of same copied cells (transposed) in the first empty cell of row 3 on Sheet3

Sheets("Sheet3").Cells(3, Columns.Count).End(xlToLeft).Offset(, 1).Resize(5).Value _
    = Application.Transpose(Sheets("Sheet1").Range("M14:Q14").Value)

Clear the values

Sheets("Sheet1").Range("M14:Q14").Value = ""

**NewKidontheBlock** · 08-12-2011, 12:43 PM

Jerry,

Thanks for the quick turnaround! I tried the code you posted....unfortunately, it only pasted the first cell of the (5) cell range on Sheet 2 (and nothing pasted to Sheet 3). What am I missing?

Thanks! Deb