excel表格怎麽制作加入購物車的功能

alt+F11打開VBE編輯器，雙擊左側工程管理器thisworkbook標簽，粘貼以下代碼，如圖操作

Sub mm()

r = Sheets("sheet2").Range("c65536").End(xlUp).Row + 1

Selection.Copy Sheets("sheet2").Range("c" & r)

End Sub