QAxObject* excel = new QAxObject( "Excel.Application" );
excel->dynamicCall( "SetVisible(bool)", TRUE );
QAxObject *workbooks = excel->querySubObject( "Workbooks()" );
QAxObject* workbook = workbooks->querySubObject( "Add()" );
QAxObject* Sheets = workbook->querySubObject( "Sheets" );
QAxObject* Sheet;
Sheets->querySubObject("Add");
Sheets->querySubObject("Add");
Sheets->querySubObject("Add");
Sheet =Sheets->querySubObject( "Item(int)" ,1);
Sheet->dynamicCall( "Select()" );
Sheet->setProperty("Name","name1");
ExportToPage1(Sheet,model_1); Sheet =Sheets->querySubObject( "Item(int)" ,2);
Sheet->dynamicCall( "Select()" );
Sheet->dynamicCall("Name","name2");
ExportToPage2(Sheet,model_2);
Sheet =Sheets->querySubObject( "Item(int)" ,3);
Sheet->dynamicCall( "Select()" );
Sheet->setProperty("Name(QString)","name3");
ExportToPage2(Sheet,model_3);
Sheet = Sheets->querySubObject( "Item(int)" ,4);
Sheet->dynamicCall( "Select()" );
Sheet->setProperty("SetName(QString)","name4");
ExportToPage2(Sheet,model_4);
#include "mainwindow.h"
#include "ui_mainwindow.h"
#include <ActiveQt/qaxobject.h>
#include <ActiveQt/qaxbase.h>
#include <QMessageBox>
#include <QDebug>
MainWindow::MainWindow(QWidget *parent) :
QMainWindow(parent),
ui(new Ui::MainWindow)
{
ui->setupUi(this);
// получаем указатель на Excel
mExcel = new QAxObject( "Excel.Application",this);
mExcel->dynamicCall( "SetVisible(bool)", TRUE );
// на книги
workbooks = mExcel->querySubObject( "Workbooks" );
// на директорию, откуда грузить книгу
workbook = workbooks->querySubObject(
"Open(const QString&)", "D:\\Guest\\collection.xls" );
// на листы (снизу вкладки)
mSheets = workbook->querySubObject( "Sheets" );
// указываем, какой лист выбрать.
sheet = mSheets->querySubObject( "Item(int)" ,2); //( "Item(const QVariant&)", QVariant("Common") );
//gp
sheet->dynamicCall( "Select" );
qDebug()<<sheet->property("Name").toString();
}
MainWindow::~MainWindow()
{
delete ui;
delete sheet;
delete mSheets;
workbook->dynamicCall("Close()");
delete workbook;
delete workbooks;
mExcel->dynamicCall("Quit()");
delete mExcel;
}
QString MainWindow::getCellValue(int row, int col)
{
// получение указателя на ячейку [row][col] ((!)нумерация с единицы)
QAxObject* cell = sheet->querySubObject("Cells(const QVariant&,const QVariant&)",
QVariant(row), QVariant(col));
// получение содержимого
QVariant result = cell->property("Value()");
qDebug()<<"row=="<<row<<" col=="<<col<<" result=="<<result.toString();
// освобождение памяти
delete cell;
return result.toString();
}
void MainWindow::on_pushButton_clicked()
{
QMessageBox::information(this,"Считанное значение",
getCellValue(ui->spinBoxRow->value(), ui->spinBoxCol->value()));
}
QAxObject* excel = new QAxObject( "Excel.Application", this );
excel->dynamicCall( "SetVisible(bool)", TRUE );
QAxObject *workbooks = excel->querySubObject( "Workbooks" );
QAxObject *workbook = workbooks->querySubObject( "Open(const QString&)", "E:\\OLGA\\table.xls");
QAxObject *sheets = workbook->querySubObject( "Sheets" );
QAxObject *statsheet=sheets->querySubObject("Item (const QVariant&)",QVariant("Лист1"));
statsheet->dynamicCall("Select");
QAxObject *range=statsheet->querySubObject("Range(const QVariant&)",QVariant(QString("A4:A4")));
range->dynamicCall("Clear");
range->dynamicCall("SetValue(const QVariant&)",QVariant("6"));