- ©«¤l
- 5923
- ¥DÃD
- 13
- ºëµØ
- 1
- ¿n¤À
- 5986
- ÂI¦W
- 0
- §@·~¨t²Î
- win10
- ³nÅ骩¥»
- Office 2010
- ¾\ŪÅv
- 150
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥xÆW°ò¶©
- µù¥U®É¶¡
- 2010-5-1
- ³Ì«áµn¿ý
- 2022-1-23
![2017 Âû¦~¥þ¶Ô¼ú³¹ 2017 Âû¦~¥þ¶Ô¼ú³¹](images/common/ji.gif) ![2016µU¦~¥þ¶Ô¼ú³¹ 2016µU¦~¥þ¶Ô¼ú³¹](images/common/hou.gif) ![2015¦Ï¦~¥þ¶Ô¼ú³¹ 2015¦Ï¦~¥þ¶Ô¼ú³¹](images/common/yang.gif) ![2014°¨¦~¥þ¶Ô¼ú³¹ 2014°¨¦~¥þ¶Ô¼ú³¹](images/common/ma.gif) ![2013³D¦~¥þ¶Ô¼ú³¹ 2013³D¦~¥þ¶Ô¼ú³¹](images/common/she.gif) ![2012Às¦~¥þ¶Ô¼ú³¹ 2012Às¦~¥þ¶Ô¼ú³¹](images/common/long.gif) ![½×¾Â°^Äm¾±³¹ ½×¾Â°^Äm¾±³¹](images/common/medal5.gif) ![¼ö¯P°Ñ»P¾±³¹ ¼ö¯P°Ñ»P¾±³¹](images/common/medal7.gif) ![2011¨ß¦~¥þ¶Ô¼ú³¹ 2011¨ß¦~¥þ¶Ô¼ú³¹](images/common/tu.gif)
|
¥»©«³Ì«á¥Ñ GBKEE ©ó 2011-3-16 14:33 ½s¿è
¦^´_ 1# cmo140497 - Sub Ex()
- Dim A As String
-
- A = "a1:a10"
- Range(A) = 10 '->Range("a1:a10") ±µ¨üÅܼƪº¦r¦ê,¤u§@ªí¦³¤ÏÀ³.
-
- A = "B1:B10"
- [A] = 10 '->["a1:a10"] ¤£±µ¨üÅܼƪº¦r¦ê,¤u§@ªí¨S¤ÏÀ³.
-
- [D1:D10] = 10 'D1:D10 ¬°¤u§@ªíªº½d³ò ,¤u§@ªí¦³¤ÏÀ³.
-
- ActiveWorkbook.Names.Add Name:="TEST", RefersTo:=Sheets("Sheet2").Range("G1:G10")
- 'Sheet2¿ï©w½d³ò,©w¸q¦WºÙ ¬°TEST
-
- [TEST] = 10 '±µ¨ü¤u§@ªí©w¸q¦WºÙªº½d³ò ,Sheet2 ¤u§@ªí¦³¤ÏÀ³.
- End Sub
½Æ»s¥N½X |
|