ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ½Ð±Ð¦p¦ó³]©w¤u§@ªí¦WºÙ¬°ÅܼÆ

¦^´_ 1# blue2263
½Ð°Ñ¦Ò¡C
Sub test()
    Dim x2 As Worksheet
    Dim sh As String
    sh = "10302"
    Set x2 = Sheets(sh)
    x2.Select
End Sub
[b]Kubi[/b]

TOP

¤£¹L¬JµM«Å§ix2¬°¤u§@ªíª«¥óÅܼơA¦p¦Pª©¤jªºµ{¦¡½Xª½±µ¨ú¥Î¡A¥i¬Ù«o¦h¦¹¤@Á|ªºÅܼƵ{§Ç¡C
[b]Kubi[/b]

TOP

        ÀR«ä¦Û¦b : ¤@­Ó¤Hªº§Ö¼Ö¡D¤£¬O¦]¬°¥L¾Ö¦³±o¦h¡A¦Ó¬O¦]¬°¥L­p¸û±o¤Ö¡C
ªð¦^¦Cªí ¤W¤@¥DÃD