- ©«¤l
- 967
- ¥DÃD
- 0
- ºëµØ
- 0
- ¿n¤À
- 1001
- ÂI¦W
- 0
- §@·~¨t²Î
- WIN XP
- ³nÅ骩¥»
- OFFICE 2003
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥x¥_
- µù¥U®É¶¡
- 2010-11-29
- ³Ì«áµn¿ý
- 2022-5-17
|
¦^´_ 5# caichen3
sheet1¤u§@ªí¼Ò²Õ- Private Sub CommandButton1_Click()
- Sheet1.Range("A1:E2").Select
- Selection.Copy
- Sheet2.Activate '¥[³o¥y,ÅýSheet2¬°§@¥Î¤u§@ªí
- Sheet2.Select '©Î¥[³o¥y,ÅýSheet2¬°§@¥Î¤u§@ªí
- Sheet2.Range("A1").Select
- Selection.PasteSpecial Transpose:=True
- End Sub
½Æ»s¥N½X ¥Î2#
sheet1¤u§@ªí¼Ò²Õ- Private Sub CommandButton1_Click()
- Sheets("Sheet1").Range("A1:E2").Copy
- Sheets("Sheet2").Range("A1").PasteSpecial xlPasteAll, Transpose:=True
- End Sub
½Æ»s¥N½X |
|