Qt操作Excel之QAxObject(ActiveX Excel)方式0x00

Excel.Application   // 顶层：Excel应用实例├─ WorkBooks        // 工作簿集合│  └─ WorkBook      // 单个xlsx文件│     ├─ WorkSheets // Sheet集合│     │  └─ Worksheet // 单个工作表│     │     └─ Range  // 单元格/区域对象（A1、A1:C10）│     │        └─ Value / Font / Interior ...│     └─ Close()    // 关闭工作簿└─ Quit()           // 退出Excel应用进程

QtDemo/├─ CMakeLists.txt└─ main.cpp

cmake_minimum_required(VERSION 3.20 FATAL_ERROR)#项目名称project(QtDemo VERSION 1.0 LANGUAGES CXX)#C++标准（VS2015最高支持 14）set(CMAKE_CXX_STANDARD 14)set(CMAKE_CXX_STANDARD_REQUIRED ON)#强制使用VS2015 工具集 v140set(CMAKE_GENERATOR_TOOLSET "v140" CACHE STRING "Platform Toolset" FORCE)#自动处理Qt信号槽/UI/资源（必须开）set(CMAKE_AUTOMOC ON)set(CMAKE_AUTORCC ON)set(CMAKE_AUTOUIC ON)#查找Qt5.12.6（精准匹配）find_package(Qt5 5.12.6 REQUIRED COMPONENTS Core Widgets Gui AxContainer)#源文件（你可以自己加）set(SOURCES    main.cpp)#WIN32：去掉控制台黑框add_executable(QtDemo WIN32    ${SOURCES})#链接Qt库target_link_libraries(QtDemo PRIVATE    Qt5::Core    Qt5::Widgets    Qt5::Gui	Qt5::AxContainer)#VS输出目录优化set_target_properties(QtDemo PROPERTIES    RUNTIME_OUTPUT_DIRECTORY_DEBUG ${CMAKE_BINARY_DIR}/bin/Debug    RUNTIME_OUTPUT_DIRECTORY_RELEASE ${CMAKE_BINARY_DIR}/bin/Release)#自动配置VS调试PATH (需要替换目录为你实际的安装目录--Qt5.12.6)set(QT_BIN_PATH "D:/Tool/DevelopmentTool/Qt/Qt5.12.6/5.12.6/msvc2015_64/bin")set_target_properties(QtDemo PROPERTIES    VS_DEBUGGER_ENVIRONMENT "PATH=${QT_BIN_PATH};%PATH%")

#include<QCoreApplication>#include<QAxObject>#include<QDir>#include<QFile>#include<QDebug>#include<Windows.h>intmain(int argc, char *argv[]){//COM必须最先初始化CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);QCoreApplication a(argc, argv);/*连接excel控件*/	QAxObject* m_pExcel = new QAxObject("Excel.Application");	m_pExcel->dynamicCall("SetVisible(bool visible)", false);	m_pExcel->setProperty("DisplayAlert", false);	m_pExcel->setProperty("EnableEvents", false);/*先创建新的Excel文件*/#if 0/*保存Excel文件路径*/	QString strSavePath = QDir(QCoreApplication::applicationDirPath()).filePath("cmake_demo.xlsx");//获取当前的工作薄	QAxObject* m_pWorkBooks = m_pExcel->querySubObject("WorkBooks");	m_pWorkBooks->dynamicCall("Add");	QAxObject* m_pWorkBook = m_pExcel->querySubObject("ActiveWorkBook");	QAxObject* m_pWorkSheets = m_pWorkBook->querySubObject("Sheets");	QAxObject* m_pWorkSheet = m_pWorkSheets->querySubObject("Item(int)", 1);//保存文件，一定要将路径中 ‘/’转为‘\\’,前者只能被Qt识别	m_pWorkBook->dynamicCall("SaveAs(const QString&)", QDir::toNativeSeparators(strSavePath));/*设置单元格中的内容 行号+列号*/	QString number = "A1";	QAxObject* pCell = m_pWorkSheet->querySubObject("Range(QString)", number);int value = 1234;	pCell->setProperty("Value", value);#endif/*再打开已存在的Excel文件*/#if 1	QAxObject* m_pWorkBook = nullptr;	QString strExcelPath = QDir(QCoreApplication::applicationDirPath()).filePath("cmake_demo.xlsx");//获取当前工作薄	QAxObject* m_pWorkBooks = m_pExcel->querySubObject("WorkBooks");	m_pWorkBooks->dynamicCall("Open(QString)", strExcelPath); //(const QString&)qDebug() << m_pWorkBooks;if (m_pWorkBooks)	{qDebug() << "Open Excel Success";		m_pWorkBook = m_pExcel->querySubObject("ActiveWorkBook");//获取sheets		QAxObject* m_pWorkSheets = m_pWorkBook->querySubObject("Sheets");//获取某个sheet		QAxObject* m_pWorkSheet = m_pWorkSheets->querySubObject("Item(int)", 1);/*获取单元格中的内容*/		QString number = "A1";int value;		QAxObject* pCell = m_pWorkSheet->querySubObject("Range(QString)", number);		value = pCell->property("Value").toInt();qDebug() << "value:" << value;	}#endif//关闭文件	m_pWorkBook->dynamicCall("Close(Boolean)", true);//关闭Excel	m_pExcel->dynamicCall("Quit()");delete m_pExcel;	m_pExcel = nullptr;CoUninitialize();return 0;}

#创建build目录mkdir buildcd build#执行如下命令生成VS2015工程(QtDemo.sln双击打开即可)D:\Tool\cmake-3.20.0-rc2-windows-x86_64\bin\cmake .. -G "Visual Studio 14 2015 Win64" -DCMAKE_PREFIX_PATH=D:\Tool\DevelopmentTool\Qt\Qt5.12.6\5.12.6\msvc2015_64\lib\cmake

1.<Qt开发之CMake版本、Qt版本和VS2015的编译工具链适配>2.https://learn.microsoft.com/zh-cn/office/vba/api/excel.workbooks.open