编程论坛 → VFP论坛

请教控制EXCEL的问题

fanjinyu9108 发布于 2025-04-11 14:49， 522 次点击

vfp打开EXCEL后，怎么选择其中的一个表呢？以前用oExcel.WorkSheets(1).Activate，现在我需要按照标的名字选择，我的需求是先找有没有这个表，如果有就选择，没有就报错

5 回复

fanjinyu91082025-04-11 14:52

只有本站会员才能查看附件，请登录

比如选择汇总这个表

csyx2025-04-11 15:07

换成工作表名即可

程序代码：

try
oExcel.WorkSheets('汇总').Activate
catch
messagebox(oExcel.ActiveWorkbook.Name + '中不存在名为 [汇总] 的工作表', 48, '错误')
endtry

[此贴子已经被作者于2025-4-11 15:24编辑过]

csyx2025-04-11 15:23

方法很多了，你也可以通过遍历活动工作簿内的所有工作表来判断

程序代码：

cSheetName = '汇总'
lFound = .f.
For each oSheet in oExcel.Sheets
    If oSheet.name == cSheetName
        lFound = .t.
        Exit
    EndIf
EndFor
If lFound
    oExcel.Sheets(cSheetName).Activate
Else
    MessageBox(oExcel.ActiveWorkbook.Name + ' 中没有名为 [' + cSheetName + '] 的工作表', 48, '错误')
EndIf

fanjinyu91082025-04-11 16:45

好的，非常感谢，问题基本解决了

hsfisher2025-06-11 00:10