Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

VBµ÷ÓÃEXCEL»æÍ¼£¬ÈçºÎÐÞ¸ÄXÖá×ø±ê - VB / »ù´¡Àà

СµÜÓÃVBµ÷EXCEL×÷ͼ
objExlApp.Workbooks.Add
  objExlApp.Charts.Add
  objExlApp.ActiveChart.ChartType = xlLine
  objExlApp.ActiveChart.HasLegend = True
  objExlApp.ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("O24"), PlotBy:=xlRows
  objExlApp.ActiveChart.SeriesCollection.NewSeries
  objExlApp.ActiveChart.SeriesCollection(1).XValues = "={1,2}"
  .........
»æÖÆXÖáʹÓÃÒÔÉÏÓï¾ä£¬ÕâÑùÖ»ÄÜÔÚXÖá×îÔçÁ½¸öµã±ê×¢ºá×ø±ê£¬Èç¹û»­Í¼Ê±×¢Ïú×îºóÒ»¾ä»°£¬ÄÇôËùÓеã»á°´Ë³Ñ°±ê×¢ºá×ø±ê£¨1£¬2£¬3.....£©
µ«ÊÇÎÒÒª»æÖƵĵãºÜ¶à£¬ÎÒÏ£ÍûÔÚÕû¸öXÖáÉÏÖ»±ê×¢µÚÒ»µãºÍ×îºóÒ»µã£¬»òÕ߸ɴíXÖá²»Òª×ø±ê£¬ÇëÎÊ£¬ÓÐÏà¹ØÊôÐÔÐÞ¸ÄÂ𣿣¿
żȻƮ¹ý£¬²»ÊǺܻᣬ¹Ø×¢ÖУ¬UpUp

ÔÚExcelÀïÂ¼ÖÆºê£¬È»ºó²Î¿¼×Ô¶¯Éú³ÉµÄVBA´úÂë¾Í¿ÉÒÔÁË£¡


¹Ø×¢ÖС­¡­¡­¡­¡­¡­

ͼ±íÒÔǰÊÇÔÚexcel×ö£¬ÏÖÔÚÒª½«ÆäÓ¦Óõ½VBÖС£


Ïà¹ØÎÊ´ð£º

vb - VB / »ù´¡Àà

vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......

ÇóÖú£ºC´úÂë¸Äд³ÉVB´úÂë - VB / »ù´¡Àà

Ë­ÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ