Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> software >> Microsoft Access >> .

Come aprire un foglio di calcolo Excel da Access VBA Inserisci colonna

Sapere come aprire un foglio elettronico Microsoft Excel da Microsoft Access e l'inserimento di una nuova colonna al foglio di calcolo utilizzando Visual Basic, Applications Edition (VBA ) può rendere l'applicazione di accesso più dinamico . Access è un sistema di gestione di database relazionale comunemente usato per i database più piccoli . Excel è un foglio di calcolo che offre potenti strumenti per analizzare i dati . VBA è un popolare linguaggio di programmazione utilizzato per automatizzare le attività altrimenti fatto manualmente. In pochi passi è possibile scrivere codice VBA in Access per aprire una cartella di lavoro di Excel e inserire una nuova colonna di Foglio1 . Istruzioni
1

Avviare Microsoft Office Access 2007 e selezionare " Database vuoto ", quindi fare clic su "Crea ". Fare clic su " Strumenti di database ", quindi selezionare " Visual Basic ". Fare clic sul campo "Inserisci" e selezionare "Modulo ".
2

Copia e incolla il seguente codice nel modulo . Questo codice apre un foglio di lavoro , inserire una nuova colonna a destra della "Colonna C " e inserire "Questa colonna è stata inserita da Access . "

Private Sub addExcelColumn ( ) per

Dim xlApp come Excel.Application

Dim XLBook Come Excel.Workbook

Dim xlSheet Come Excel.Worksheet

XLBook = Workbooks.Add ( Template : = " C: \\ Book1.xls " ) per

xlApp = XLBook.Parent

xlSheet = XLBook.Worksheets ( " Foglio1 " )

XLBook.Windows ( 1) . Visible = True

xlApp.Visible = True

xlSheet

Colonne . . ( "C : C " ) Selezionare

Selection.Insert Maiusc : = xlToRight

. Range (" C1" ) . Selezionare

Selection.Value = "Questa colonna è stata inserita da Access "

. Range (" D3" ) . Selezionare

End With End Sub


3

modificare la seguente riga di codice e digitare il percorso del foglio di lavoro :

XLBook Workbooks.Add = ( Template : = " C : \\ Book1.xls " ) per

Eseguire il sottoprogramma premendo

" F5 ".

 

software © www.354353.com