“完成率”在excel中这样显示才漂亮！

追问

怎么用啊

回答

Private Sub worksheet_open()
Dim wb As Workbook
Dim ws As Worksheet
Dim myindex As Integer
Set wb = ThisWorkbook
Set ws = wb.Worksheets(Worksheets.Count)
ws.Select
End Sub

追问

大哥具体操作步骤啊

回答

一、你得先设置可以启用VBA方法是执行“工具”－“宏”－“安全性”－选择“中”－“确定”
二、执行以下操作
(1)打开你那个表格文件
（2）按ALT＋F11，出现VBA窗口
（3）在菜单栏执行“插入”－“模块”
（4）将以上代码复制到那个光标闪动的编辑窗口内。
（5）保存，关闭文件。
三、重新打开后，在出现的提示窗口中选择启用宏，然后确定。打开文件后，就是你要的效果。