乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 68|回复: 5

怎么样用VBA模拟键盘“enter"

[复制链接]

54

主题

126

帖子

6

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
342
发表于 2005-11-8 11:45:00 | 显示全部楼层 |阅读模式
怎么样用VBA模拟键盘“enter"
回复

使用道具 举报

13

主题

396

帖子

5

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
448
发表于 2005-11-8 12:56:00 | 显示全部楼层
在用sendcommand时可用vbcr实现.
回复

使用道具 举报

54

主题

126

帖子

6

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
342
发表于 2005-11-8 16:59:00 | 显示全部楼层
这样一般的可以,但是用VBA重复的调用TRIM命令的“F“时,无效,必须按键盘的回车,才可以。
所以老在这个这个地方程序中断,无法达到批量裁剪的目的。。
谢谢
回复

使用道具 举报

85

主题

1175

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1518
发表于 2005-11-8 19:20:00 | 显示全部楼层
怎么不可以?下面是我程序中的一段:
    Acadapp.ActiveDocument.SendCommand "_trim" & vbCr & trimlsp & vbCr & vbCr & "F" & vbCr & p(1) & vbCr & p(2) & vbCr & vbCr
    Acadapp.ActiveDocument.SendCommand "F" & vbCr & p(2) & vbCr & p(3) & vbCr & vbCr


回复

使用道具 举报

54

主题

126

帖子

6

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
342
发表于 2005-11-9 15:43:00 | 显示全部楼层
谢谢啊。我只用了一个vbCr,应该两个就可以
回复

使用道具 举报

0

主题

2

帖子

1

银币

初来乍到

Rank: 1

铜币
2
发表于 2005-12-15 15:14:00 | 显示全部楼层
xiexie..............
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-7-4 23:40 , Processed in 1.927923 second(s), 66 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表