ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ½Ð°Ý©ñ¦b¤u§@ªí¤ºªº¥i¥H³]©w§Ö³tÁä¶Ü?

[µo°Ý] ½Ð°Ý©ñ¦b¤u§@ªí¤ºªº¥i¥H³]©w§Ö³tÁä¶Ü?

¦p¤U,¬O§_¥i³]©w¦¨¿ý»s¥¨¶°®É¨ººØ§Ö³tÁä©O?
·Q³]©w«ö¤Uctrl+E®É°õ¦æ
  1. Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  2.     msgbox("´ú¸Õ)
  3. End Sub
½Æ»s¥N½X

https://msdn.microsoft.com/zh-tw/library/office/ff197461%28v=office.14%29.aspx

TOP

¥»©«³Ì«á¥Ñ n7822123 ©ó 2018-9-29 01:49 ½s¿è

¦^´_ 1# starry1314


¤èªk¤@:
«öAlt+F8


¤èªk¤G:
¥ý°õ¦æ µ{§Ç "TTT" §Y¥i
  1. Sub TTT()
  2.   Application.OnKey "^e", "TAA"
  3. End Sub
  4. Sub TAA()
  5.   MsgBox ("´ú¸Õ")
  6. End Sub
½Æ»s¥N½X
µ{¦¡¬O¨Ì»Ý¨D¼gªº¡A»Ý¨Dªí¹F¤£²M·¡
©ÎªÌ¨S¦³¤W¶Çªþ¥ó¡A·R²ö¯à§U

TOP

        ÀR«ä¦Û¦b : ÀR§¤±`®¦¤v¹L¡B¶¢½Í²ö½×¤H«D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD