[已解决]最上方能不显示Micosoft Excel么?

jiangtao2012

有点可笑，我就是想偶尔蒙一下一个比我更菜鸟的同事，让他看到我在用EXCEL时，不知道我在用EXCEL，所以想有没有办法让菜单栏上面的一行，不显示Micosoft EXCEL?  呵呵，挺逗的

最佳答案

月排行榜 / 总排行榜

JLxiangwei

2013-2-19 08:42

Private Sub Workbook_Open()
With Application
        .Caption = "随意"
        With .Windows(1)
            .Caption = "想改就改"
        End With
    End With
End Sub
标题.rar (12.79 KB, 下载次数: 20)

2013-2-19 08:42 上传

点击文件名下载附件

跳转到最佳答案楼层

hwc2ycy

可以啊。不过没啥意义。

股网千王

{:271:}                           {:271:}

JLxiangwei

Private Sub Workbook_Open()
With Application
        .Caption = "随意"
        With .Windows(1)
            .Caption = "想改就改"
        End With
    End With
End Sub
标题.rar (12.79 KB, 下载次数: 20)

2013-2-19 08:42 上传

点击文件名下载附件

jiangtao2012

JLxiangwei 发表于 2013-2-19 08:42
Private Sub Workbook_Open()
With Application
        .Caption = "随意"

您这一招非常好！
    不过，我还太笨，还是搞不明白怎么实现的。

    我就是点“查看代码”然后将你上面的语句Private Sub Workbook_Open()
With Application
        .Caption = "随意"
   
         拷进去，运行。实现了我所想要的。

      但是，只要关了EXCEL文件，退出EXCEL环境，再次打开时，仍然没有上面所讲的效果

      请您再具体教一教

JLxiangwei

jiangtao2012 发表于 2013-2-19 09:55
您这一招非常好！
    不过，我还太笨，还是搞不明白怎么实现的。

jiangtao2012

JLxiangwei 发表于 2013-2-19 09:59

多谢多谢！！！！！！！！！！