[算表] vba 點擊方塊後分數跟隨序號,非位置

作者: bcs (= ="frailty..gggg XD)   2019-12-22 21:41:11
軟體:excel
版本:2016
目前寫了一段vba,功能是點擊 活頁簿db1的方塊後,會在活頁簿db2加1
語法:
Sub Button1_Click()
Sheets("db2").Range("c2").Value = Sheets("db2").Range("c2").Value + 1
Sheets("db1").Range("a2").Value = Sheets("db1").Range("a2").Value + 1
End Sub
但是我設定活頁簿db2的排序會依score自動排序。
這一來有可能原本db1_MS<->db2_c2的關係,可能db1_ibm<->db2_c2。
所以我再點db1的MS方塊,他的增數值便會給db2的ibm。
請問是否可以讓增值跟著db1_MS->db2的序號1,db1_GA->db2的序號2
作者: soyoso (我是耀宗)   2019-12-22 21:46:00
不太了解,內文活頁簿db1?是指sheets("db1")?如果是的話,這個稱為工作表,不是活頁簿活頁簿是workbooks(...),db1_MS和db2_c2又是什麼程序sub名稱,變數名稱?如會因排序,位置不同的話,可以range.find或工作表函數match來回傳儲存格或列號,再累加

Links booklink

Contact Us: admin [ a t ] ucptt.com