January 15
Creazione di un modulo utente in Microsoft Excel 2003 aggiunge automaticamente la barra del titolo form utente blu nella parte superiore della finestra del modulo. È possibile personalizzare l'aspetto del tuo modulo utente di Excel rimuovendo la barra del titolo dalla finestra modulo. Per eliminare il "Modulo Utente" barra del titolo, utilizzare il Microsoft Visual Basic Editor per modificare il codice del modulo form utente.
1 Avviare Microsoft Excel 2003. Premere i tasti "Alt" e "F11" sulla tastiera del computer, allo stesso tempo per avviare l'applicazione Visual Basic Editor Microsoft Excel all'interno.
2 Fai clic su "Inserisci" nel menu di navigazione principale. Selezionare "form" dal menu a discesa.
3 Fare doppio clic sulla finestra "UserForm1" per aprire la finestra del codice. Evidenziare ed eliminare qualsiasi codice nella finestra.
4 Incollare il seguente codice nella finestra:
Option Explicit
Private Sub UserForm_Initialize ()
Call RemoveCaption(Me)
End Sub
5 Fai clic su "Inserisci" nel menu di navigazione principale. Selezionare "Modulo" dal menu a discesa.
6 Incollare il seguente codice nella finestra del modulo:
Option Explicit
Private Declare Function FindWindow Lib "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 As Long) As Long
Private Declare Function SetWindowLong Lib "User32"
Alias "SetWindowLongA" (ByVal hwnd As Long,
ByVal nIndex come lungamente, _
ByVal dwNewLong As Long) As Long
Private Declare Function DrawMenuBar Lib "User32" (_
ByVal hwnd As Long) As Long
RemoveCaption secondaria (objForm As Object)
Dim lStyle As Long
Dim hMenu As Long
Dim mhWndForm As Long
Se Val (Application.Version) & lt; 9 Poi
mhWndForm = FindWindow (& quot; & quot ;, ThunderXFrame objForm.Caption) 'XL97
Altro
mhWndForm = FindWindow (& quot; & quot ;, ThunderDFrame objForm.Caption) 'XL2000 +
Finisci se
lStyle = GetWindowLong (mhWndForm, -16)
lStyle = lStyle E non & amp; HC00000
SetWindowLong mhWndForm, -16, lStyle
DrawMenuBar mhWndForm
End Sub
ShowForm Sub ()
UserForm1.Show False
End Sub
7 Fare clic sul pulsante "X" in alto a destra della finestra di Visual Basic per chiudere l'applicazione e tutte le finestre. Non è necessario salvare il contenuto delle scatole di codice.
8 Fai clic su "Strumenti" nel menu principale. Selezionare "Macro" seguito da "Macro". Selezionare "ShowForm." Fare clic sul pulsante "Esegui". Il modulo utente di Excel visualizza ora, senza la barra del titolo.