[求助]求教单元格内对内容进行判断，弹出对应窗口 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]求教单元格内对内容进行判断，弹出对应窗口

共有2946人关注过本帖树形打印复制链接主题：[求助]求教单元格内对内容进行判断，弹出对应窗口

36792209

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00

[求助]求教单元格内对内容进行判断，弹出对应窗口 发帖心情

Post By：2018/3/11 15:55:00 [显示全部帖子]

我想做的是，

鼠标点击某个单元格，如果单元格内的内容为“1”，那我点击打印按钮，就会弹出1的打印选项，

如果单元格内的内容为“2”，那我点击打印按钮，就会弹出2的打印选项，

如果单元格内为空值，则弹出文字提示窗口，

这个应该怎么写啊，我想把命令直接写在按钮上。

36792209

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00

Post By：2018/3/15 22:50:00 [显示全部帖子]

此主题相关图片如下：无标题.png

如图，

我想实现的功能是，鼠标选中“本地”，再点击打印，那打印出来的就是本地的表格，

如果鼠标选中的内容是“外地”，那点击打印后，打出来的是外地的表格。

因为我现在做了两个打印按钮，想通过识别文字自动打印对应的表格。

麻烦老师了。。

[此贴子已经被作者于2018/3/15 22:51:58编辑过]

36792209

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00

Post By：2018/3/16 12:22:00 [显示全部帖子]

Dim Book As New XLS.Book(ProjectPath & "Attachments\本地.xls")

Dim fl As String = ProjectPath & "Reports\本地.xls"

Book.Build() '生成细节区

Book.Save(fl) '保存工作簿

Dim Proc As New Process '打开工作簿

Proc.File = fl

Proc.Verb = "Print" '指定动作

Proc.Start()

这是我的打印按钮中的代码，这个代码是我选择本地打印按钮后执行的命令，还有一个是外地打印按钮，现在想把两个按钮整合在一起，通过按钮识别鼠标指定的单元格内容，如果单元格内容是本地，那就打印本地的表格，如果是外地，就打印出外地的表格，这样就不用我手动选择是打印本地还是外地的表格了。

麻烦老师了。

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1.foxdb

[此贴子已经被作者于2018/3/16 12:39:56编辑过]

36792209

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00

Post By：2018/3/17 17:08:00 [显示全部帖子]

老师，" & v & " 这个是什么意思啊？

下一主题 >> << 上一主题

主题：[求助]求教单元格内对内容进行判断，弹出对应窗口