- ©«¤l
- 320
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 310
- ÂI¦W
- 0
- §@·~¨t²Î
- xp
- ³nÅ骩¥»
- 2k
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2015-6-24
- ³Ì«áµn¿ý
- 2024-12-21
|
¦ÒÃD¨Ó¤F !!
¥¿±`¤UÀ³¸Ó¦p(1) ¤@¼Ë³´¤JµL½a¦^°é
¦³¨S¦³¤Hª¾¹D¬°¦ó (2) «o¤£·|³´¤JµL½a¦^°é
(1)
Private Sub Worksheet_Change(ByVal Target As Range)
For w = 1 To 2
[A1] = Val([A1]) + 1
Next
End Sub
(2)
Private Sub Worksheet_Change(ByVal Target As Range)
For w = 1 To 1
[A1] = Val([A1]) + 1
Next
End Sub |
|