返回列表 上一主題 發帖

請問如何設定一個按鈕

請問如何設定一個按鈕

圖片中工作表ON 儲存格b6~12的值設個按鈕讓他匯入到另一個工作表AOA的C3~O3
下次匯入時會匯入到C4~O4



  1. Private Sub CommandButton1_Click()
  2. AOAend = Sheets("AOA").Columns(3).Find("*", , , , , xlPrevious).Row
  3. Sheets("AOA").Cells(AOAend + 1, "C") = [b6]
  4. Sheets("AOA").Cells(AOAend + 1, "F") = [b7]
  5. Sheets("AOA").Cells(AOAend + 1, "G") = [b8]
  6. Sheets("AOA").Cells(AOAend + 1, "J") = [b9]
  7. Sheets("AOA").Cells(AOAend + 1, "M") = [b10]
  8. Sheets("AOA").Cells(AOAend + 1, "O") = [b12]
  9. End Sub
複製代碼
回復 1# john711101

TOP

回復 1# john711101


    你的資料有個問題,本身就沒有順序
上面大大幫你寫的程式碼會因為您原本就沒有按照順序設計表格,而導致數值放錯位置
請先更改您輸入介面的順序跟AOA的順序相同之後才可使用
PKKO

TOP

回復 6# john711101


    不用PO圖片了,我知道是什麼
那是因為你AOA工作表C1:E1有設定合並儲存格的關係,一般做為資料庫的工作表最好不要有合併儲存格,因為比較會產生錯誤,不然學"林大"的隱藏合併儲存格也可以解決這問題!

TOP

謝謝各位先輩指導!

TOP

        靜思自在 : 【行善要及時】行善要及時,功德要持續。如燒開水一般,未燒開之前千萬不要停熄火候,否則重來就太費事了。
返回列表 上一主題