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

¡u¤w¸Ñ¨M¡v§é½u¹ÏX¶b¼Æ¶q°ÝÃD

¡u¤w¸Ñ¨M¡v§é½u¹ÏX¶b¼Æ¶q°ÝÃD

¥»©«³Ì«á¥Ñ play9091 ©ó 2012-3-7 19:47 ½s¿è

§Ú¦b¤W¤@­Ó©«¤l§å¶q©w¸q¦WºÙªº¤èªk¤¤¡A¤w¸g§â¦WºÙ©w¸q¦n¤F¡K¡K

²{¦b§Ú·Q­n§â©w¸q¦nªºªF¦è¡A¥H§é½u¹Ï§e²{¥X¨Ó¡C¦ý¬O¹J¤W¤F¼W¥[ªº°ÝÃD¡K¡K

°ÝÃD´y­z¡G
§Ú¦b¤@±iSheet¸Ì­±·s¼W¤F¤@±i§é½u¹Ï(Chart)¡CX¶b¬°¦Û°Ê¡AY¶b¬°®É¶¡¡K¡K
µM«á§Ú­n·s¼W¤Kµ§Æ[¬dªº¸ê®Æ¦b¨ä¤¤¡C§Ú¥Î¿ý»sVBA¶]¥X¨Óªºµ²ªG¥¦·|¥H¤U­±³oºØ¤èªk¥N¤JÅܼơC
  1.     ActiveChart.SeriesCollection(2).Name = "W"
  2.     ActiveChart.SeriesCollection(2).Values = "Y"
½Æ»s¥N½X
¦ý°ÝÃD´N¦b¡A§Ú­n¦b¤@­ÓChart¤¤¼W¥[¤Kµ§¸ê®Æ¡A©Ò¥H§Ú§â¥¦§ï¼g¦¨¤U­±ªº¼Ë¤l
  1. for L = 1 to 8
  2.   ActiveChart.SeriesCollection(L).Name = "W"
  3.     ActiveChart.SeriesCollection(L).Values = "Y"
  4. next L
½Æ»s¥N½X
·í§Ú¶]¨ì²Ä¤Gµ§ªº®É­Ô´N¥X¿ù¤F¡K¡K·Ð½Ð¥ý¶i«ü¾É¡I¡I¡I
ªì¾ÇVBA¥E¨ìtwbts

¹ï¤£°_¡A§Ú¸Ñ¨M¤F¡A¬O§ÚªºÅܶq©ñ¿ù¤F¡I¡I¡I
ªì¾ÇVBA¥E¨ìtwbts

TOP

        ÀR«ä¦Û¦b : ¡i®É¶¡¦pÆp¥Û¡j®É¶¡¹ï¤@­Ó¦³´¼¼zªº¤H¦Ó¨¥¡A´N¦pÆp¥Û¯ë¬Ã¶Q¡F¦ý¹ï·M¤H¨Ó»¡¡A«o¹³¬O¤@§âªd¤g¡A¤@ÂI»ù­È¤]¨S¦³¡C
ªð¦^¦Cªí ¤W¤@¥DÃD