- 帖子
- 19
- 主題
- 4
- 精華
- 0
- 積分
- 67
- 點名
- 127
- 作業系統
- win7
- 軟體版本
- excel
- 閱讀權限
- 20
- 註冊時間
- 2016-8-24
- 最後登錄
- 2026-11-2
|
小弟試了一下，應該只能滿足 [C2]輸入台北市後,按[中正區]按鈕,[C2]變成[台北市中正區]，然後返回剛才輸入的 cell
無法滿足 且在輸入狀態,可以繼續輸入其他文字
Sub 按鈕1_Click()
Area_1 = "中正區"
Now_row = ActiveCell.Row
Now_col = ActiveCell.Column
Cells(Now_row, Now_col) = "[" + Cells(Now_row, Now_col) + Area_1 + "]"
Cells(Now_row, Now_col).Select
End Sub
Sub 按鈕2_Click()
Area_1 = "大同區"
Now_row = ActiveCell.Row
Now_col = ActiveCell.Column
Cells(Now_row, Now_col) = "[" + Cells(Now_row, Now_col) + Area_1 + "]"
Cells(Now_row, Now_col).Select
End Sub
Sub 按鈕3_Click()
Area_1 = "中山區"
Now_row = ActiveCell.Row
Now_col = ActiveCell.Column
Cells(Now_row, Now_col) = "[" + Cells(Now_row, Now_col) + Area_1 + "]"
Cells(Now_row, Now_col).Select
End Sub |
-
-
按鈕傳字串.zip
(17.43 KB)
|
發表於 2024-8-19 17:10
| 