½Ð°Ý¦U¦ì¤j¤j¦³Ãö¹Ïªíªº¤p°ÝÃD...ÁÂÁÂ!!
- ©«¤l
- 17
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 28
- ÂI¦W
- 0
- §@·~¨t²Î
- windows7
- ³nÅ骩¥»
- office2010
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2015-12-11
- ³Ì«áµn¿ý
- 2016-2-16
|
½Ð°Ý¦U¦ì¤j¤j¦³Ãö¹Ïªíªº¤p°ÝÃD...ÁÂÁÂ!!
¤£¦n·N«ä¤pªº¤S¨Óµo°Ý¤F!.. ¹ê¦b¬O¦]¬°¤u§@¤ÓÂø¸I¨ì°ÝÃD¤Ó¦h
¥u¯à¤W¨Ó½Ð±Ð¦U¦ì¤j¤j!... ÁÂÁÂ!!
¥Ø«e¤pªº¦³»s§@¤@¥÷¹Ïªí(¹p¹F¹Ï)·Qn·Q¿ìªk±N¹Ïªí¤º®e¦Û°Ê§ó·s¬°¦P¤W¤è¶g´Á¸ê®Æªº¤º®e
¦p¹Ï¥Ü:
ªþ¥ó :
¹Ïªí§ó·s¶µ¥Ø.zip (22.88 KB)
¤pªº§Q¥Î¥¨¶°¥u¯à¼g¥X¦p¤U»yªk :- With Sheets("¼Ï¯Ã¤Hû¤ÀªR")
- ' ¹p¹F¤ÀªR¹Ïªº¸ê®Æ¨Ó·½
- .ChartObjects("¹Ïªí 2").Activate '«ü©w¹Ïªíªº¸ê®Æ¨Ó·½
- ActiveChart.PlotArea.Select
- ActiveChart.SetSourceData Source:=Range("A10:A14,A17,D10:D14,D17") '¿ï¾Ü¸ê®Æ¨Ó·½
- ActiveChart.SeriesCollection(1).Name = "=¼Ï¯Ã¤Hû¤ÀªR!$D$2" '¼Æ¦C¦WºÙ
- End With
½Æ»s¥N½X ¦ý¬O¦pªk¦Û°Ê§ó·s½Ð°Ý¦U¦ì¤j¤j¦³¨S¦³§ó¦nªº¤è¦¡¥i¥H³B²z....ÁÂÁÂ! |
|
|
|
|
|
|
- ©«¤l
- 17
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 28
- ÂI¦W
- 0
- §@·~¨t²Î
- windows7
- ³nÅ骩¥»
- office2010
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2015-12-11
- ³Ì«áµn¿ý
- 2016-2-16
|
ÁÂÁÂstillfish00 ¤j¤jªº«ü¾É¤pªº·|¥Î¤ß¾Ç²ßªº...
¤pªº¤w¸g¸Õ¹LµL»~¥Ø«e§V¤O¤ÀªR»yªk¤¤.... §Æ±æ¥i¥H¾Ç²ß§l¦¬ !...~~
¸U¤À·P¿E!... ÁÂÁÂ~..·PÁÂ!....
ªþ¤W§ó·s¹L«áªºÀÉ®×¥H«K«áÄò¦³¬Û¦ü°ÝÃDªº¤H¥i¥H°Ñ¦Ò!...
¹Ïªí§ó·s¶µ¥Ø.zip (23.75 KB)
|
|
|
|
|
|
|