- ©«¤l
- 184
- ¥DÃD
- 45
- ºëµØ
- 0
- ¿n¤À
- 407
- ÂI¦W
- 0
- §@·~¨t²Î
- WIN 7
- ³nÅ骩¥»
- office 2010
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2010-8-19
- ³Ì«áµn¿ý
- 2024-4-23
|
[µo°Ý] ¦p¦ó±N¸ê®Æ¶K¦b¿ï¨ú³sÄò¸ê®ÆÄæ¤U¤èªºªÅ¥ÕÀx¦s®æ?
¥»©«³Ì«á¥Ñ pupai ©ó 2019-2-17 11:55 ½s¿è
½Ð°Ý
Sub ¨C¤é³øªí()
Range("A2:B2", Range("A2").End(xlDown)).Copy
Sheets("Sheet2").Select
Range("A1").End(xlDown).PasteSpecial xlPasteValuesAndNumberFormats
'¿ï¨ú³sÄò¸ê®ÆÄæ¤U¤èªºªÅ¥ÕÀx¦s®æ
Range("a1").End(xlDown).Offset(1, 0).Select
End Sub
·í¤À¶Sheet2¤¤ªºRange("A2")¦³¸ê®Æ¡A´N¥i¥H°õ¦æ¤Wz¥¨¶°
¦ýRange("A2")¨S¦³¸ê®Æ,¥¨¶°´N·|°õ¦æ¥¢±Ñ
½Ð°Ý§Ú¸Ó¦p¦óקï¤Wz«ü¥O
ÁÂÁÂ |
-
-
Book1.rar
(13.11 KB)
|