Come utilizzare VBA per recuperare Microsoft Windows Nome utente

January 18

Internet a banda larga, facile da configurare router e computer relativamente poco costosi hanno portato ad un'esplosione nella crescita di reti domestiche e piccoli uffici. La gente usa la potenza della connettività per condividere l'accesso e lavorare su tutti i tipi di file - in particolare quelli creati nei programmi di Microsoft Office. Quando la condivisione di file creati in Office - a prescindere se creato con Access, Excel, PowerPoint o Word - è spesso difficile determinare quale utente ha creato un file. Tuttavia, con un po 'relativamente semplice codice VBA, è possibile aggiungere l'attuale nome utente di Windows - non il "Author o registrato Nome utente" in Office - del creatore al documento, file di modulo di presentazione o un foglio in una questione di minuti.

istruzione

1 Aprire l'applicazione di Microsoft Office in cui si desidera aggiungere il codice macro VBA necessario per visualizzare il nome utente corrente. Fare clic sulla piccola freccia in giù accanto al globo Office o sull'icona del programma nell'angolo in alto a destra della finestra. Fare clic sul link "Altri comandi".

2 Fai clic su "Personalizzare Ribbon", quindi fare clic e attivare l'opzione "Sviluppatore" nel riquadro a destra della finestra. Fare clic sul pulsante "OK".

3 Aprire un documento a cui si desidera aggiungere il codice VBA. Aprire una versione vuota del documento, foglio di calcolo o presentazione forma - o uno che voi utenti possono personalizzare - come è necessario salvare l'oggetto come un modello.

4 Fare clic sulla scheda "File" sulla barra degli strumenti, poi "Salva con nome". Selezionare l'opzione "Modello con attivazione macro" nell'elenco a discesa "Salva come". Inserire un nome per il modello, quindi fare clic su "Salva".

5 Fare clic sulla scheda "Sviluppatore" sulla barra degli strumenti, quindi fare clic su "Macro". Tipo "CurrentWindowsUser" nella casella "Nome macro", quindi fare clic su "Crea".

6 Copiare e incollare il seguente codice nella "NewMacros (Codice)" finestra:

Sub CurrentWindowsUser ()

Dim MyText As String

MyText = Environ ( "username")

Selection.TypeText (MyText)

End Sub

7 Fare clic sull'icona "Salva" sulla barra degli strumenti VBA.

8 Fare clic sulla scheda "File", quindi salvare. Chiudere il documento modello.

9 Fare clic su "File", "Nuovo", quindi "I miei modelli". Evidenziare il nuovo modello nella lista, quindi fare clic su "OK".

10 Posizionare il cursore nel punto in cui si desidera inserire il nome utente di Windows corrente. Fare clic sulla scheda "Sviluppatore", poi "Macro".

11 Evidenziare la macro "CurrentWindowsUser", quindi fare clic sul pulsante "Esegui". L'attuale nome utente di Windows compare nel file oggetto di Microsoft nella posizione selezionata.

Consigli e avvertenze

  • È inoltre possibile utilizzare il pulsante "Personalizza barra multifunzione" nell'area impostazioni dell'applicazione Microsoft Office per aggiungere un pulsante per il codice di macro e VBA per la barra degli strumenti. Questo consente di eseguire il codice macro con un solo clic del mouse. Fai clic su "Altri comandi", "Personalizzazione barra multifunzione", quindi selezionare "Macro" sulla lista a discesa con l'etichetta "Scegliere Comandi Da". Evidenziare la macro "CurrentWindowsUser" e fare clic su "Aggiungi" per aggiungere la macro a una delle schede di applicazione.