Перейти до основного вмісту

Qt та Excel. Початок


Спроба розібратися з доступом до файлів .xls за допомогою <QtActive>.

.pro

CONFIG += qaxcontainer


.h

#include <ActiveQt/qaxbase.h>
#include <ActiveQt/qaxobject.h>

public:
QAxObject *excel;
QAxObject *wbooks;
QAxObject *book;
QAxObject *sheets;
QAxObject *list;
QAxObject *cell;


.cpp

excel = new QAxObject("Excel.Application", this); // пуск
excel->setProperty("Visible", 0); // робимо його невидимим
excel->setProperty("DisplayAterts", 0); // щоб не лаявся і не ставив запитань
wbooks = excel->querySubObject("Workbooks");
QString fileName(“D:\\Files\\myFile.xls”);
book = wbooks->querySubObject("Open (const QString&)", fileName); відкриваємо файл
sheets = book->querySubObject("Sheets");
list = sheets->querySubObject("Item(QVariant&)", 1); //лист 1.

cell = list->querySubObject("Cells (Int, Int)", 2, 1); // [B:1]
cell->dynamicCall("value", QString("%1").arg(ui.doubleSpinBox->value())); // вставляємо дані з doubleSpinBox.
QString newName(“D:\\Files\\newFile.xls”);

book->dynamicCall("SaveAs(const QString&)", newFile); // зберігаємо в новий файл
// book->dynamicCall("Save()"); // або старий

wbooks->dynamicCall("Close()");
excel->dynamicCall("Quit()");


начебто працює :)

Мітки:

Популярні дописи з цього блогу

Qt Округлення до певного розряду

Округлення - тривіальна задача в математиці, але в Qt немає функції округлення до певного розряду. Проте в QtMath є такі функції як qFloor (qreal) і QCeil (qreal), в результаті яких int. А також можна використовуючи round (double), отримати double. Дуже швидко я знайшов ось цей ресурс звідки взяв вихідну формулу. Вона без сумніву працює, але дає результати, які не відповідаю моїм очікуванням: toRound(187.156, 2); //187.15 toRound(187.156, 1); //187.1 toRound(187.156, 0); //187 toRound(187.156, -1); //180 toRound(187.156, -2); //100 Після невеликої корекції самої функції, її підсумковий варіант виглядає так: double wcsv::toRound(double val, int r) {   double outpValue;   double tempVal;   tempVal=val*pow(10,r);   if (double(int(tempVal))+0.5==tempVal){     int(tempVal)%2 == 0       ? outpValue=double(qFloor(tempVal))/pow(10,r)       :outpValue=d...
Дописати коментар
Докладніше

CSV в QTableWidget

Питання виникло в зв'язку з виниклою необхідністю прочитати .xls файл в Linux'і. Я так думаю у більшості користувачів Linux, є якийсь небудь офісний пакет, такий як OpenOffice або LibreOffice або щось там ще, за допомогою якого можна легко конвертувати .xls в .сsv. А .сsv - це текст, який можна читати в будь-якій системі. Пропоную читати файл у QTableWidget. Зберемо простеньку програму. Файл file_csv.csv виглядає так:   На форму покладемо QTableWidget, QListWidget, QPushButton. void MainWindow::readFile(){     QFile file("file_csv.csv"); //файл (треба буде зробити діалог)     QStringList listA; //лист в який запишемо данні     int row = 0; //кількість рядків у майбутній таблиці (ми ж не знаємо скільки їх там ;)     if (file.open(QIODevice::ReadOnly)){         while (!file.atEnd()){             QString line = file.r...
Докладніше

Драйвер MySQL для Qt (Win)

Для одного проекту знадобилося отримати доступ до бази даних на локальному сервері MySQL 5.1 . Природно, що з ходу нічого не вийшло. Перевіривши на наявність драйвера , виявилося, що його там немає зовсім. Гаразд , збираємо самі. У мене стоїть Denwer 3 з базою 5.1.40. MySQL 5.1.40 знайти не вдалося , є 5.1.46 . Встановлюю в С : \ MySQL разом з lib'ами . QtSQK повинен бути встановлений разом з QtSource . Запускаю Qt 4.7.3 for Desktop ( mingw)     set QTDIR = C: \ QtSDK \ QtSource \ 4.7.3     set mySQLDIR = C: \ MySQL     cd % QTDIR %\ src \ plugins \ sqldrivers \ mysql     qmake " INCLUDEPATH + =% mySQLDIR %\ include " " LIBS + =% mySQLDIR %\ lib \ opt \ libmysql.lib "- o Makefile mysql.pro     mingw32 - make   Йдемо в% QTDIR %\ src \ plugins \ sqldrivers \ mysql і копіюємо в С: \ QtSQK \ Desktop \ Qt \ 4.7.3 \ mingw \ plugins \ sqldrivers файли ...
Докладніше