本人是VBA的菜鳥，故來求助各位大神。
是這樣的，我現在有一個資料庫，然后想另建一個sheet名叫DATA UPDATE，然后允許使用者在DATA UPDATE把資訊輸入進去，然后點擊一個按鈕，EXCEL自動把輸入的資訊更新到DATABASE這個SHEET中有資料的下一行。這樣就不用使用者要更新資料的時候還要翻到資料表的最后一行手動收入，這樣也能更好的保護資料。
求助大神們拉！
uj5u.com熱心網友回復：
在DATAUPDATE上添加一個按鈕，雙擊寫入代碼：Private Sub CommandButton1_Click()
Sheets("DATA UPDATE").Select
Range("A2:E2").Select
Selection.Copy
Sheets("DATABASE").Select
Sheets("DATABASE").Cells(Sheets("DATABASE").UsedRange.Rows.Count + 1, 1).Select
ActiveSheet.Paste
Sheets("DATA UPDATE").Select
Range("A3").Select
End Sub
uj5u.com熱心網友回復：
Sub CommandButton1_Click()
'確定DATABASE的下一行
Dim iR As Long
iR = Sheets("DATABASE").Range("a65536").End(xlUp).Row + 1
''復制資料
Sheets("data update").Range("a1:g1").Copy Sheets("database").Cells(iR, 1)
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/134037.html
標籤：VBA