- ©«¤l
- 561
- ¥DÃD
- 160
- ºëµØ
- 0
- ¿n¤À
- 725
- ÂI¦W
- 0
- §@·~¨t²Î
- WINDOWS
- ³nÅ骩¥»
- xp
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ®ç¶é
- µù¥U®É¶¡
- 2014-9-10
- ³Ì«áµn¿ý
- 2024-8-7
  
|
DEAR SIR
¥Î VBA
°²¦p XXX=SHEET4¤u§@ªí. ©óSHEET4¼W¤@¥\¯àÁä°õ¦æ¦p¤U.
¦Û¦æÅÜ´«À³¥Î
Sub ¶}±ÒSHEET123()
Sheet4.Visible = FALSE 'XXX¤u§@ªíÃö³¬
Sheet1.Visible = True 'SHEET1¤u§@ªí¶}±Ò
Sheet2.Visible = True 'SHEET2¤u§@ªí¶}±Ò
Sheet3.Visible = True 'SHEET3¤u§@ªí¶}±Ò
SHEET1.SELECT '¦Ü'SHEET1¤u§@ªí
RANGE("A1").SELECT '¦ÜA1Àx¦s®æ
End Sub |
|