首先使用excel的宏录制功能,将想做的事情录为宏,然后编辑该宏,就能看到实际步骤,将实际步骤翻译到CB中即可。例如如下宏:
Charts.Add
ActiveChart.ChartType = xlLine
ActiveChart.SetSourceData Source:=Sheets("User Score CDF Chart").Range( _
"B20:F45636"), PlotBy:=xlColumns
ActiveChart.SeriesCollection(1).Delete
ActiveChart.Location Where:=xlLocationAsObject, Name:= _
"User Score CDF Chart"
其中有些变量既不是属性也不是函数,而是枚举,使用VB脚本编辑器中的查看定义,可以查看该值具体数值。例如
xlLine值为4,xlColumns为1.
//首先定义了几个通用函数
bool __stdcall InitExcelApplication(Variant &m_App)
{
try
{
m_App = GetActiveOleObject("Excel.Application");
return true;
}
catch(...)
{
try
{
m_App = Variant::Creat
CB中向excel插入表并操作表详解-philbert
最新推荐文章于 2017-06-13 01:36:14 发布