- 帖子
- 471
- 主題
- 121
- 精華
- 0
- 積分
- 579
- 點名
- 0
- 作業系統
- WIN10
- 軟體版本
- OFFICE2019
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2015-4-16
- 最後登錄
- 2023-1-17
|
用這個吧
把裡面的表單和物件類別模組放到妳想要用的檔案裡面
再用以下指令 取控制點選哪裡跳出日曆控制項
輸出位置=滑鼠點選位置
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells(1).Address = "$B$6" Then 日曆.Show '點選B6則跳出日曆
End Sub
Excel 日曆插件.rar (36.58 KB)
|
|