求教高手delphi 控制wps表格判断是否查询成功的语句

星星的放牧者 2014-05-10 12:28:58

我是调用ComObj的方法来控制的WPS表格，
find语句用的DesRange:=EtApp.WorkSheets[a].columns[1].Find(edit4.text);
现在想实现如果find不成功程序跳转到其他步骤比如showmessage或者查询其他sheets，
小弟初学试了很多方法都不行，求请高手指教，不甚感激

...全文

110 回复打赏收藏转发到动态举报

写回复

回复

切换为时间正序

请发表友善的回复…

发表回复

请高手破解注册码，软件没有加壳，所有请告诉把注册码搞出来

本人虚心求教，几遍之后任然百思不得其解，求高手帮忙。

0/ Excel数据处理新利器来了，准备好了吗？1/ 比网红函数VLOOKUP还全面的功能。——查（查询）2/ 取其精华，去其糟粕。——筛（筛选）3/ 拆分就像同学会，拆散一对是一对。——拆（拆分）4/ 天下大势，合久必分，分久必合。——合（合并）5/ 隔空取物，犹如探囊取物——提（提取）6/ 百转千回后的峰回路转。——转（转换）7/ 它判断真假的唯一标准。——判（判断）8/ 人以群分，物以类聚。——聚（聚合）9/ 我自己的难题自己造函数，不求教别人。——技法（自定义函数）

回答：1、首先要把，整个表格选中，中表格的第一个单元格拖动到最后一个单元格就可以了。2、然后我们按顺序点击“文件”—“打印区域“—“设置打印区域”，这样就把我们整个表格设置成了打印区域了。我们现在可以看到在表格中又两条虚线，这是一个是默认的打印区域，一个是我们刚刚设置的打印区域。现在还是按默认的打印的。3、接下来我们打开“打印预览”之后，我们在菜单上点击“分页预览”。4、在显示出来的页面中我们会看...

所以只有用各种办法来模拟。但是在用的过程中，我用同样的数据来更新表格，窗口会被撑宽，按道理width是由各个columns宽度加起来才对，但结果却很奇怪。。已经试过各种方法来限制宽度了，但结果都是一样的被撑宽。。。环境：win8.1 python3.3图1，原图，我希望点了update之后它就能更新数据，而宽度不会发生变化。图2，结果就成这个样子了。 import tkinter as tkim...

830

社区成员

53,573

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章