Controllo di un altro programma di accesso può essere fatto in diversi modi. Altre applicazioni, tra cui Microsoft Word ed Excel, possono essere controllati attraverso gli oggetti di automazione che espongono. Esempi di tali oggetti includono un documento di Word e di una funzione di ordinamento di Excel. L'accesso può creare e gestire questi oggetti come estensioni di accesso stesso.

istruzione

1 Aprire Microsoft Access e premere Alt + F per esporre i \ "Opzioni \" voce di menu. Fare clic su tale elemento, quindi fare clic su \ "Centro protezione \" a sinistra del \ "Opzioni di Access \" finestra di dialogo. Fare clic sul pulsante \ "Impostazioni Centro \", allora la \ "Impostazioni Macro \" voce a sinistra. Fare clic sul \ "Attiva tutte le macro \" opzione, quindi le finestre di dialogo tutte le finestre aperte premendo il loro "OK \" pulsanti \.

2 Premere Alt + F11 per entrare nell'ambiente di Visual Basic di sviluppo integrato (IDE). Selezionare \ "Insert, \" seguito da \ "Modulo \" sulla barra degli strumenti della IDE, per creare un nuovo file in cui inserire un programma (AKA \ "macro. \")

3 Incollare il seguente programma nella nuova finestra del codice:

Public Sub SayHelloFromAccess ()
Dim applicationExcel Come Excel.Application
Set applicationExcel = CreateObject (\ "Excel.Application \")
applicationExcel.Workbooks.Add
applicationExcel.ActiveCell = \ "Ciao da Access \"
applicationExcel.ActiveWorkbook.SaveAs (\ "c: \ FromAccess.xls \")
applicationExcel.Quit
End Sub

4 Fai clic su "Strumenti \, \" e poi \ "Riferimenti, \" sulla barra degli strumenti della IDE. Cerca la lista nella cartella \ "Riferimenti \" finestra di dialogo per la voce \ "<versione> Libreria oggetti di Microsoft Excel. \" Selezionare casella di controllo che di voce quando lo trovate, quindi premere \ "OK \" per tornare a IDE Access '.

5 Eseguire il programma facendo clic su un punto qualsiasi all'interno di esso, quindi premendo F5. Attendere che il cursore per tornare alla sua icona \ "Pronto \" dopo che assume il suo \ 'icona "Busy \".

6 Aprire Esplora risorse e utilizzarla per accedere al file appena creato da macro di accesso: \ "c: \ FromAccess.xls \". Fare doppio clic su tale file per aprire Excel, quindi fare clic su \ "Sì \" se Excel visualizza un messaggio di avviso sulla formattazione dei file. Si noti che il foglio di calcolo Excel visualizza il messaggio "Ciao \" \ dalla macro.

7 Creare una nuova cartella di lavoro in Excel e salvarlo come \ "C: \ Book1.xlsm \". Creare una piccola colonna di numeri che salgono da 1 a 10 o giù di lì, in qualsiasi parte del foglio di lavoro attivo. Selezionare la colonna, quindi digitare \ "mylist \" e premere \ "Enter \" nella casella Nome di Excel (vicino alla parte superiore sinistra della schermata principale di Excel.)

8 Salvare la cartella di lavoro, chiudere Excel, quindi premere CTRL + Alt + Delete. Fai clic su \ "manager Avviare compito, \" quindi fare clic su \ "Processi \" del Task Manager scheda. Selezionare ogni voce che legge \ "Excel, \" quindi fare clic su \ "Termina processo \" per fermare Excel. Chiudere il Task Manager.

9 Incollare il seguente programma dopo l'ultima istruzione del programma SayHelloFromAccess immesso in precedenza.

Public Sub SortExcelList ()
Dim applicationExcel Come Excel.Application
Set applicationExcel = CreateObject (\ "Excel.Application \")
applicationExcel.Workbooks.Open FileName: = \ "C: \ Book1.xlsm \"
Macro1 applicationExcel
applicationExcel.ActiveWorkbook.Save
applicationExcel.Quit
End Sub

Sub Macro1 (appXL come Excel.Application)
sel Dim come gamma
con appXL

.Application.Goto Reference:=\"mylist\"
.ActiveSheet.Sort.SortFields.Clear
.ActiveSheet.Sort.SortFields.Add Key:=Selection.Columns(1) _
, SortOn:=xlSortOnValues, Order:=xlDescending, _
DataOption:=xlSortNormal
With .ActiveSheet.Sort
.SetRange Selection
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With

End With
End Sub

10 Posizionare il cursore in qualsiasi punto della SortExcelList subroutine e premere F5. Riaprire il file \ "C: \ Book1.xlsm \" e si noti che la colonna di numeri è ora in ordine, ordinati per la nuova macro di accesso decrescente.

Se Access visualizza un errore dopo aver premuto F5, terminare tutti i processi di Excel utilizzando le istruzioni dal punto 8, quindi ripetere questo passaggio.

Consigli e avvertenze

• Le istruzioni contenute in questo articolo riguardano la modifica delle impostazioni di sicurezza di accesso. Peform queste istruzioni solo con una piena consapevolezza dei rischi connessi.