VC怎样在Excel文件中查找某个字符串

[zcnc2012]

VC怎样在Excel文件中查找某个字符串

[netthree]

代码如下： ////////////////////////////////////////////////////////////////////////////////////// //LookIn #define xlComments COleVariant( -4144L ) #define xlFormulas COleVariant( -4123L ) // will find value in any cell #define xlValues COleVariant( -4163L ) // ignores hidden cells //LookAt #define xlWhole COleVariant( 1L ) // whole word search #define xlPart COleVariant( 2L ) // partial word search //SearchOrder (vOpt works here) #define xlByRows COleVariant( 1L ) #define xlByColumns COleVariant( 2L ) //SearchDirection (required but usually has no effect) #define xlNext 1L #define xlPrev 2L // MatchCase #define xlMatchCase COleVariant( 1L ) #define xlIgnoreCase COleVariant( 0L ) // MatchByte // ignored, use vOpt _variant_t vOpt(DISP_E_PARAMNOTFOUND, VT_ERROR); ////////////////////////////////////////////////////////////////////////////////////// range_excel.AttachDispatch(sheet.GetCells()); lpDisp =range_excel.Find(COleVariant("查找的文字"), vOpt, xlValues, xlPart,xlByColumns, xlNext, xlIgnoreCase, vOpt); if(lpDisp) { //first EXCEL_Range iFirst = range_excel; iFirst.AttachDispatch(lpDisp); iFirst.Select(); iFirst.Activate(); str.Format("row=%ld col=%ld", iFirst.GetRow(), iFirst.GetColumn()); ::AfxMessageBox(str); EXCEL_Range iNext = range_excel.FindNext(vOpt); do { iNext = range_excel.FindNext( _variant_t(iNext) ); str.Format("row=%ld col=%ld\n", iNext.GetRow(), iNext.GetColumn()); ::AfxMessageBox(str); } while (iNext.GetRow() != iFirst.GetRow() || iNext.GetColumn() !=iFirst.GetColumn() ); }

[zcnc2012]

感谢netthree，我试了下，可以，尤其把所在的行与列也能得到，先给分 我想再问下，读取某个具体的单元格，你知道怎样做么

[jierandefeng]

引用 楼主 zcnc2012 的回复:

VC怎样在Excel文件中查找某个字符串

我用了这段代码发现 我设置的字符查找了两遍 也就是说 比如 我查找的表中有 “test"这个关键字3个， 就会查询出6个坐标来 第二遍是第一遍的重复，想了想也没找到改进的办法。

[心上HQG]

感谢，还想请教一下 xlWhole COleVariant( 1L )这个内容是MSDN里哪一块查的？