[已解决]根据单元格内容要求，自动运行另一段代码

fcdd · 发表于 2013-6-29 15:22

根据单元格内容要求，自动运行另一段代码

根据B10单元格内容大于48字节后自动运行另一段代码

如何编写代码

最佳答案

月排行榜 / 总排行榜

hwc2ycy

2013-7-1 16:58

工作表事件演示.rar (8.62 KB, 下载次数: 26)

hwc2ycy · 发表于 2013-6-29 15:34

如果想实时的话，就用CHANGE事件。

hwc2ycy · 发表于 2013-6-29 15:37

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$10" And Len(Target.Value) > 48 Then
'加入要运行的代码或者CALL SUB
End If
End Sub

复制代码

fcdd · 发表于 2013-6-29 16:22

hwc2ycy 发表于 2013-6-29 15:37

运行时错误’424’要求对象
If Target.Address = "$B$10" And Len(Target.Value) > 48 Then

按钮操作
根据B10单元格内容大于48字节后自动运行另一段代码

要求：“F15单元格在16字节添加一个空格，并Range("F15").WrapText = True
注：Range("F15").WrapText = True ’ F15单元格自动换行

hwc2ycy · 发表于 2013-6-29 16:25

你代码放哪在？

hwc2ycy · 发表于 2013-6-29 16:27

要放在特定的工作表模块里。

hwc2ycy · 发表于 2013-6-29 21:23

工作表事件演示.rar (14.11 KB, 下载次数: 16)

fcdd · 发表于 2013-7-1 10:25

hwc2ycy 发表于 2013-6-29 21:23

打不开文件

hwc2ycy · 发表于 2013-7-1 16:58

这个最佳答案由 hwc2ycy 给出，感谢 hwc2ycy 的回答。

单击隐藏图章

工作表事件演示.rar (8.62 KB, 下载次数: 26)

fcdd · 发表于 2013-7-1 17:53

hwc2ycy 发表于 2013-7-1 16:58
传个03的格式。

你的代码可以使用，正是我想要的效果

追加一个问题
表一第7行至第15行自动换行

		自动登录	找回密码
密码			注册

[已解决]根据单元格内容要求，自动运行另一段代码

相关帖子

评分