EXCEl 怎么在一个工作表内添加两段代码!

已举报 回答 关注
EXCEl 怎么在一个工作表内添加两段代码!
问在线客服
扫码问在线客服
  • 回答数

    3

  • 浏览数

    6,788

3个回答 默认排序
  • 默认排序
  • 按时间排序

已采纳
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Long
If Target <> "" And Target Like "*+*" Then
i = InStr(Target, "+")
Target.Characters(i, Len(Target) - i + 1).Font.Superscript = True
End If
'如下面的【e3】单元格不在本工作表内,则其前面加类似:sheet2,看情况而定
If [e3].value<>"" then
ActiveSheet.Name = [e3]
endif
End Sub
取消 评论
新建一张工作表,把两张表都复制进去,试试。
取消 评论
是否中毒?建议先杀毒。 office文档在编辑时都会自动生成tmp临时文件且是隐藏文件,直到编辑完成保存完毕,都会自动清除。有一种情况,tmp文件不会被删除,就是软件非正常退出,如电脑死机硬重启、office软件无响应直接关闭进程等。 : 嗯,不过杀毒没效果,之前出现过一次这种现象,后来系统自动好了,可惜这两天又出现这种情况,每次手动删除很麻烦,一直没找到解决办法,重装OFFICE软件也没用! 回答: 如果你正常保存出现的这个问题,建议重新安装excel : 问题已解决,是杀毒软件的问题,已经卸载后不会出现,杀毒软件是“microsoft security essentials ”,多谢各位关注。
取消 评论
ZOL问答 > EXCEl 怎么在一个工作表内添加两段代码!

举报

感谢您为社区的和谐贡献力量请选择举报类型

举报成功

经过核实后将会做出处理
感谢您为社区和谐做出贡献

提示

确定要取消此次报名,退出该活动?