C++ 向Excel中写字符串

2017-05-24 09:08:39 666 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

C++ 二进制操作 Excel 原理（Excel 写操作）利用Excel文件的编码规则，对文本文件进行Excel格式的文本输入。阅读详情

我用的类是这几个：
CApplication app;
CWorkbook book;//工作薄
CWorkbooks books;//工作薄集合
CWorksheet sheet;//工作表
CWorksheets sheets;//工作表集合
CRange range;//单元格区域

写二维数组这样写：
COleSafeArray olesaWrite;
olesaWrite.Create(vt, sizeof(sabWrite)/sizeof(SAFEARRAYBOUND), sabWrite);
...
...
...
range.put_Value2(olesaWrite);
但是写字符串怎么写？

...全文

【STM32实战】利用STM32CubeMX配置PWM互补输出驱动电机本文详细介绍了如何利用STM32CubeMX配置STM32高级定时器的PWM互补输出功能，以驱动电机等需要半桥/全桥电路的应用。通过图形化界面设置定时器参数、使能互补通道并配置关键的死区时间，结合代码示例演示了如何启动PWM输出和动态调整占空比，确保输出安全、精确的互补信号，避免MOS管直通风险，提升驱动可靠性。阅读详情

godfeel

ATL 3,248 成员 48,530 内容

+ 关注 + 加入社区

切换为时间正序

zgl7903 2017-06-06

打赏
举报


// Copyright (C) 1992-1998 Microsoft Corporation
// All rights reserved.
//
// This source code is only intended as a supplement to the
// Microsoft Visual C++ Language  Reference and related
// electronic documentation provided with Microsoft Visual C++.
// See these sources for detailed information regarding the
// Microsoft Visual C++ product.

// NOTE: This example will only work with Excel8 in Office97
// Compile with cl /GX comexcel.cpp
// TO DO: Edit the #import paths
//#pragma message ("Make sure you go to Tools.Options.Directories and add the paths to mso97.dll and vbeext1.olb.  Mso97.dll will usually be in c:\\\"Program Files\"\\\"Microsoft Office\"\\Office, and vbeext1.olb will be in c:\\\"Program Files\"\\\"Common Files\"\\\"Microsoft Shared\"\\VBA")
#import "C:\\Program Files\\Common Files\\Microsoft Shared\\Office11\\mso.dll" no_namespace rename("DocumentProperties", "DocumentPropertiesXL")   
#import "C:\\Program Files\\Common Files\\Microsoft Shared\\VBA\VBA6\\VBE6EXT.OLB" no_namespace   
#import "C:\\Program Files\\Microsoft Office\\OFFICE11\\excel.exe" rename("DialogBox", "DialogBoxXL") rename("RGB", "RBGXL") rename("DocumentProperties", "DocumentPropertiesXL") no_dual_interfaces

#pragma warning (disable:4192)

#include <stdio.h>
#include <tchar.h>

void dump_com_error(_com_error &e)
{
    _tprintf(_T("Oops - hit an error!\n"));
    _tprintf(_T("\a\tCode = %08lx\n"), e.Error());
    _tprintf(_T("\a\tCode meaning = %s\n"), e.ErrorMessage());
    _bstr_t bstrSource(e.Source());
    _bstr_t bstrDescription(e.Description());
    _tprintf(_T("\a\tSource = %s\n"), (LPCTSTR) bstrSource);
    _tprintf(_T("\a\tDescription = %s\n"), (LPCTSTR) bstrDescription);
}

// If this is placed in the scope of the smart pointers, they must be
// explicitly Release(d) before CoUninitialize() is called.  If any reference
// count is non-zero, a protection fault will occur.
struct StartOle 
{
    StartOle() { CoInitialize(NULL); }
    ~StartOle() { CoUninitialize(); }
} _inst_StartOle;

void main()
{
    using namespace Excel;

    _ApplicationPtr pXL;

    try 
    {
      pXL.CreateInstance(L"Excel.Application");

      pXL->Visible = VARIANT_TRUE;

      WorkbooksPtr pBooks = pXL->Workbooks;
      _WorkbookPtr pBook  = pBooks->Add((long)xlWorksheet);
      _WorksheetPtr pSheet = pXL->ActiveSheet;

      RangePtr pRange; 
      pRange = pSheet->Range["A21"];
      pRange->Value2 = 75L;
      //pRange->NumberFormatLocal = "@";

      _CommandBarsPtr pCmdbars = pXL->CommandBars;
      int iCmdbars = pCmdbars->GetCount();

      Sleep(1000);
      pRange = pSheet->Range["20:20"];
      pRange->Insert( (long)Excel::xlDown );
      pRange->Merge();
    
      Sleep(1000);

      pBook->Saved = VARIANT_TRUE;
      pXL->Quit();
    } 
    catch(_com_error &e) 
    {
      dump_com_error(e);
      
      pXL->Quit();
    }
}

好大一个土豆 2017-06-06

打赏
举报

Range range;
CString str(_T("string value"));
long row = 2, col = 3;
range.SetItem(_variant_t(row), _variant_t(col), _variant_t(str));

忘世麒麟 2017-06-05

打赏
举报

http://blog.csdn.net/wangshiqilin_fjy/article/details/24353327 当年总结的,仅供参考!

C++ 向Excel中写字符串

相关推荐