[已解决]VBA:改变字的颜色、锁定工作簿

cyj153

MR4nRuY2.rar (1.92 KB, 下载次数: 7)

2010-5-27 09:17 上传

点击文件名下载附件
VBA:改变字的颜色、锁定工作簿
如题，谢谢各位大师指教！

最佳答案

月排行榜 / 总排行榜

amulee

2010-5-27 09:25

Sub 加密()  '密码1234
    ThisWorkbook.SaveAs Filename:=ThisWorkbook.FullName, _
        Password:="1234", WriteResPassword:="1234"
End Sub
Sub 改颜色()
    Sheets("2").Cells.Font.ColorIndex = 2
End Sub

跳转到最佳答案楼层

amulee

Sub 加密()  '密码1234
    ThisWorkbook.SaveAs Filename:=ThisWorkbook.FullName, _
        Password:="1234", WriteResPassword:="1234"
End Sub
Sub 改颜色()
    Sheets("2").Cells.Font.ColorIndex = 2
End Sub

BAIXINGR

Sub AA()
    Sheets("2").Cells.Font.ColorIndex = 2
End Sub

这是改变颜色的，那个还不会

cyj153

能否将答案写在附件上，这样看得明白。谢了！

amulee

加密还可以这样，比较方便。

Sub 加密()
    ThisWorkbook.Password = "1234"
    ThisWorkbook.Save
End Sub

木文

好久不见老师了,老师好.同时学了加密.

ThisWorkbook.Password = "1234"