由于實(shí)現(xiàn)這個目的的思路比較簡單,就不再進(jìn)行思路的講解,我們看代碼的搭建部分,由于進(jìn)入工作簿后只顯示窗體,我們無法進(jìn)行后續(xù)的測試及進(jìn)入VBE窗口,我們先在窗體上增加一個按鈕:并設(shè)置按鈕的caption屬性為“顯示工作簿”:雙擊這個控件,進(jìn)入代碼界面,在Click事件中加入下面代碼:Private Sub CommandButton1_Click() Application.Visible = TrueEnd Sub 代碼截圖: 代碼解讀:此處的代碼讓我們在只顯示窗體的界面條件下可以進(jìn)入工作簿,同時大家要注意屏蔽原有代碼中關(guān)閉工作簿時不保存退出代碼,如下:我們雙擊thisworkbook,在工作簿的open事件中寫入下面的代碼:Private Sub Workbook_Open() Application.Visible = False UserForm1.ShowEnd Sub 代碼截圖:代碼解讀: 上述代碼在工作簿打開時會讓工作簿的Visible屬性設(shè)置為FALSE,即不可見。同時顯示窗體UserForm1.