- ©«¤l
- 552
- ¥DÃD
- 3
- ºëµØ
- 0
- ¿n¤À
- 578
- ÂI¦W
- 0
- §@·~¨t²Î
- win7
- ³nÅ骩¥»
- office 2010
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2015-2-8
- ³Ì«áµn¿ý
- 2024-2-26
|
¦^´_ 1# msmplay
¬Ý°_¨Ó¦n¹³½ÆÂø¤Æ¤F¡AY¥u¦³ÂI¿ï¤Ï¥Õ¥un¦p¤U¥N½X§Y¥i- Private Sub Worksheet_SelectionChange(ByVal Target As Range)
- If Target.Column <= 15 And Target.Column >= 9 And Target.Row >= 7 And Target.Row <= 18 Then '¿ï¾ÜI7:O18¤~°õ¦æ
- Range(Cells(Target.Row, "i"), Cells(Target.Row, "o")).Select'§â¿ï¾Üªº½d³òRow¦AÂX¤j¬° I ¨ì O ¿ï¾Ü
- End If
- End Sub
½Æ»s¥N½X |
|