Skapa ett användarkonto i Microsoft Excel 2003 lägger automatiskt den blåa Användare Form namnlisten överst i formuläret fönstret . Du kan anpassa utseendet på din Excel- användare formuläret genom att ta bort namnlisten från formuläret fönstret . För att radera den "User Form " namnlisten , använder Microsoft Visual Basic Editor för att ändra användarens formulärmodul kod . Instruktioner
1
Starta Microsoft Excel 2003. Tryck på " Alt " och " F11 " tangenterna på datorns tangentbord samtidigt att lansera Microsoft Visual Basic Editor ansökan inne Excel .
2
Klicka på " Infoga " i huvudmenyn. Välj " UserForm " från rullgardinsmenyn .
3
Dubbelklicka på " UserForm1 " fönstret för att öppna koden fönstret . Markera och ta bort all kod i fönstret
4
Klistra in följande kod i fönstret : .
Option Explicit
Private Sub UserForm_Initialize ( ) katalog
Call RemoveCaption ( Me ) katalog
End Sub
5
Klicka på " Infoga " i huvudmenyn. . Välj " Modul " från rullgardinsmenyn
6
Klistra in följande kod i modulen fönstret :
Option Explicit
Private Declare Lib Funktion FindWindow " , User32 " _Alias " FindWindowA " ( _ByVal lpClassName As String , _ByVal lpWindowName As String ) As Long
Private Declare Function GetWindowLong Lib " User32 " _Alias " GetWindowLongA " ( _ByVal HWND As Long , _ByVal nIndex Som Long ) As Long
Private Declare Function SetWindowLong Lib " User32 " _Alias " SetWindowLongA " ( ByVal HWND As Long , _ByVal nIndex As Long , _ByVal dwNewLong As Long ) As Long
Private Declare funktion DrawMenuBar Lib " User32 " ( _ByVal HWND As Long ) As Long
Sub RemoveCaption ( objForm As Object ) katalog
Dim lStyle Som LongDim hMenu Som LongDim mhWndForm As Long
Om Val ( Application.Version ) < 9 ThenmhWndForm = FindWindow ( " ThunderXFrame " , objForm.Caption ) ' XL97ElsemhWndForm = FindWindow ( " ThunderDFrame " , objForm.Caption ) XL2000 + End IflStyle = GetWindowLong ( mhWndForm , -16 ) lStyle = lStyle och Inte & HC00000SetWindowLong mhWndForm , -16 , lStyleDrawMenuBar mhWndForm
End Sub
Sub ShowForm ( ) katalog
UserForm1.Show False
End sub
7
Klicka på " x " -knappen i det övre högra hörnet på Visual Basic Editor-fönstret för att stänga programmet och alla fönster . Du behöver inte spara innehållet i koden lådor .
8
Klicka på " Tools " i huvudmenyn . Välj " Macro " följt av " Makron . " Välj " ShowForm . " Klicka på " Kör " knappen . Excel Användaren formuläret visas nu utan namnlisten .
