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ÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......
ËÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......