Re: [算表] Excel VBA:選取儲存格後自動複製

看板Office作者 (David)時間15年前 (2008/11/07 00:20), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串2/2 (看更多)
Alt+F11 雙擊"ThisWorkbook" 寫入以下程式碼 Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As _ Range) If Target.Column = 2 Then Target.Copy [A65536].End(xlUp).Offset(1, 0) End If End Sub ※ 引述《mushi0307 (mushi)》之銘言: : 軟體:excel : 版本:2003 : 我想要做一個材料的估價單 : 先把所有的材料打好在同一欄 : 然後在選擇一樣一樣材料後 : 他會依序的加入在估價單的材料名稱內 : 不知道要怎樣設定 : 才會讓選擇的材料 加入過去名稱那裡 : A B : _________________ ____________ : | 材料名稱 | 手錶 | : |_________________|____________| : |_________________| 手機 | : |_________________|____________| : |_________________| 隨身聽 | : |_________________|____________| : |_________________| 照相機 | : |_________________|____________| : |_________________| 電腦 | : |_________________|____________| : 類似上面的圖 : 第一次選擇B的內容 : 就會加到A裡面去 : 在選擇B的內容後 : 就會在加到A裡面去 : 然而選擇的東西不會在同一格 : 會一直往下增加 : 大概是這樣子 : 感激不盡 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.164.51.73

11/09 01:32, , 1F
感謝您,明天一早我試試看 謝謝
11/09 01:32, 1F
文章代碼(AID): #194nbVxg (Office)
文章代碼(AID): #194nbVxg (Office)