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

[µo°Ý] Ãö©ó¹wÄý¦C¦L©Îª½±µ¦C¦L

[µo°Ý] Ãö©ó¹wÄý¦C¦L©Îª½±µ¦C¦L

¹wÄý¦C¦L.rar (24.86 KB)

¥Ø«e¶i«×¡G¤Ä¿ï¹wÄý¦C¦L«á¡A·|¦Û°Ê¿ï¨ú³Ì«á¤@­Ó¤u§@ªí¥H¥~ªº¤u§@ªí
¶i¤J¹wÄý¦C¦L¡A¥÷¼Æ2
¦ý¬O³o³¡¤ÀµLªk¹ê²{¡A·j´M¤F¨S¦³µ²ªG
¥u·j´M¨ìª½±µ¦C¦L¡A¦ý¬O¤£ª¾¹D¦p¦ó¤U«ü¥O¡A½Ð°Ý¬O§_¦³«e½úª¾¹D¡AÁÂÁ¡I

¦^´_ 1# av8d


    ÁÂÁ«e½úµoªí¦¹¥DÃD»P½d¨Ò,«á¾ÇÂǦ¹©«¾Ç²ß¦Û­qªí³æ
¦Û­qªí³æ¬O¥t¤@»â°ì¾Ç°Ý,ªì¾Çªº½m²ß½d¨Ò,½Ð«e½ú°Ñ¦Ò
ªí³æ±±¨î±o¤£¦n,½Ð¦U¦ì«e½ú«ü±Ð

¹wÄý¦C¦L_20231028.zip (31.95 KB)

ÂI¿ï®Ö¨ú¤è¶ô>¸õ¥Xªí³æ:
20231028-1.jpg
2023-10-28 11:05


¿ï¨ú²M³æ Á`ªí ¶µ°µ¹wÄý¦C¦L:
20231028-2.jpg
2023-10-28 11:06


¿ï¨ú²M³æ ¤u§@ªí1 ¶µ°µ¹wÄý¦C¦L:
20231028-3.jpg
2023-10-28 11:07
¬Ý±oÀ´¬OÀ³¸Óªº,À´±oÀ³¥Î¤~¹³¾Ç¥Í,Áy¥Ö«pÂI¾Ç·|§óÂÔ·V¿n·¥

TOP

¦^´_ 2# Andy2483

¹wÄý¦C¦L_20231028(·s¼W).rar (32.31 KB)

¨ü¨ì«e½ú¦h¦¸´£Äâ»PÀ°§U¡A¸Ì­±¥]§t³\¦h¤¸¯À³£¬O§Ú»Ý­n¾Ç²ßªº¡A§Ú¤w§ï¼g¦¨¥i¥H½Æ¿ïªº¥\¯à(·PÁ«e½ú¤w¾Q¸ô)
§Æ±æ«e½ú¦³ªÅªº®É­Ô¯à¹L¥Ø¤Î´£ÂI¡A¸U¤À·PÁ¡C

TOP

¦^´_ 3# av8d


    ¥DÃD¬O­n¥þ³¡¦L (³Ì«á¤@­Ó¤u§@ªí¥H¥~ªº¤u§@ªí),©Ò¥Hªí³æ¤¤ªº½Æ¿ï¥\¯à¤£·|§ïÅÜ¥þ³¡¦Lªºµ²ªG
¦pªG ²M³æ¿ï¨úªº¤u§@ªí¦W ¤~»Ý­n¦L? »Ý­n¦A·r°u¤@¤U
¬Ý±oÀ´¬OÀ³¸Óªº,À´±oÀ³¥Î¤~¹³¾Ç¥Í,Áy¥Ö«pÂI¾Ç·|§óÂÔ·V¿n·¥

TOP

¦^´_ 4# Andy2483

ÁÂÁ«e½ú´£¿ô¡Aªº½T¬O¦³¤@­Ó¤£¦L¡A¦]¬°­n·í¾Þ§@¥Îªº­¶­±(¥¼¨Ó·|¦³«Ü¦h«ö¶s)¡A¯¬¶¶¤ß¡C

TOP

¤£ºÞ³æ¿ï/½Æ¿ï/¥þ¿ï...­n°j°é°w¹ï¿ï¨ú¦C¦L, §_«h¨S·N¸q

TOP

¦^´_ 6# ­ã´£³¡ªL

ÁÂÁ­ã¤j¡A¥Ø«eµL¦Lªí¾÷¥i´ú¡A¦ý¬O«e½ú¦³¼g¦b¦C¦L«ö¶s¤¤
  1. Dim i%, j%
  2. If Val(TextBox1) = 0 Then MsgBox "½Ð¿é¤J¦C¦L¥÷¼Æ": Exit Sub
  3. Unload Me
  4. For j = 1 To Val(TextBox1)
  5.    For i = 1 To UBound(A)
  6.       Sheets(A(i)).PrintOut
  7.    Next
  8. Next
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD