¦p¦ó½Æ»ssheet1ªº¤½¦¡µ²ªG¨ìsheet2?
- ©«¤l
- 3
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 4
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- Office2003
- ¾\ŪÅv
- 10
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-19
- ³Ì«áµn¿ý
- 2012-3-19
|
¦p¦ó½Æ»ssheet1ªº¤½¦¡µ²ªG¨ìsheet2?
¥»©«³Ì«á¥Ñ ian1021 ©ó 2012-3-19 18:57 ½s¿è
¦³¤@Ó°ÝÃD·Q³Â·Ð¤j®a
§Ú²{¦bsheet2¼g¤@Ó¤½¦¡¥X¨Óªºµ²ªG¦s¨ìG34 (G34=G32+G33)
§Æ±æ«ö¤@Ó¶s¤§«áª½±µcopy¨ìsheet1ªºF6
ª½±µ»s§@¤@Ó«ö¶s¥B¼g¬°
Sub Button13_Click()
Sheets("sheet2").[G34].CurrentRegion.Copy Sheets("sheet1").[F6]
End Sub
¦ý¬Oµ²ªG¬Osheet2ªºµ²ªG¬O¿ù»~ªº
¦]¬°¨S¦³¿ìªk±Nsheet2ªº¤½¦¡ (G34=G32+G33)±a¹L¨Ósheet1
½Ð°Ý¦p¦ó¥i¥H±Nsheet2ªº¤½¦¡±a¹L¨Ósheet1 ·PÁÂ!! |
|
|
|
|
|
|
- ©«¤l
- 3
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 4
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- Office2003
- ¾\ŪÅv
- 10
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-19
- ³Ì«áµn¿ý
- 2012-3-19
|
¦^´_ 4# Hsieh
¨S°ÝÃD¤F!!
«D±`«D±`·PÁª©¤j!! |
|
|
|
|
|
|
- ©«¤l
- 3
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 4
- ÂI¦W
- 0
- §@·~¨t²Î
- XP
- ³nÅ骩¥»
- Office2003
- ¾\ŪÅv
- 10
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-19
- ³Ì«áµn¿ý
- 2012-3-19
|
¦^´_ 2# Hsieh
±z¦n ¤è«KÀ°§Ú¬Ý¤@¤U¶Ü
±ý¹F¦¨ ¦bsheet2 «ö¤U Botton 13«ö¶s´N·|§â[G34]ªºµ²ªG½Æ»s¨ìsheet1ªº[F6]
«D±`·PÁÂ.. |
-
-
Example.rar
(23.34 KB)
|
|
|
|
|
|