Cum se creează o foaie de calcul în Excel din Access folosind VBA

Autor: Eugene Taylor
Data Creației: 9 August 2021
Data Actualizării: 11 Aprilie 2024
Anonim
Cum se creează o foaie de calcul în Excel din Access folosind VBA - Articole
Cum se creează o foaie de calcul în Excel din Access folosind VBA - Articole

Conţinut

Crearea unei foi de lucru Excel în Access vă poate economisi timp atunci când aveți nevoie să exportați datele într-o foaie de lucru Excel. Visual Basic for Applications (VBA) poate fi un instrument puternic pentru automatizarea proceselor din aplicațiile Microsoft Office. Cu VBA puteți utiliza obiectul Aplicație Microsoft Excel pentru a crea o foaie de calcul Excel din Access. Obiectul Excel este punctul de plecare pentru restul modelului de obiect. Exportați datele mai rapid în Excel salvând datele direct într-o foaie de lucru Excel.


instrucțiuni de ghidare

Salvați datele într-o foaie de lucru Excel utilizând VBA (Jupiterimages / Photos.com / Getty Images)

    instrucțiuni de ghidare

  1. Executați Microsoft Office Access, faceți clic pe "Blank Database" și faceți clic pe butonul "Create" pentru a crea o bază de date necompletată. Faceți clic pe fila "Instrumente pentru baze de date" și faceți clic pe "Visual Basic" pentru a deschide fereastra Microsoft Visual Basic. Faceți clic pe meniul "Inserați" și faceți clic pe "Modul" pentru a insera un nou cod de modul.

  2. Faceți clic pe meniul "Instrumente" și faceți clic pe "Referințe". Glisați și bifați caseta de lângă "Microsoft Excel" Object Library "(bibliotecă de obiecte Microsoft Excel). Faceți clic pe "OK".

  3. Începeți prin tastarea următorului cod în VBA pentru a crea o nouă procedură sub:


    Private Sub createSpreadSheet ()

  4. Continuați să tastați următorul cod pentru a crea trei variabile de obiect noi care vor fi folosite pentru a crea foaia de lucru Excel:

    Dim newExcelApp Ca Excel.Application Dim newWbk Ca Excel.Workbook Dim newWkSheet Ca Excel.Worksheet

  5. Adăugați următorul cod pentru a executa Excel și a le afișa:

    Setați newExcelApp = Excel.Application newExcelApp.Visible = Adevărat

  6. Introduceți codul următor pentru a adăuga un nou registru de lucru și o foaie de lucru:

    Setați newWbk = newExcelApp.Workbooks.Add Set newWkSheet = newWbk.Worksheets (1)

  7. Adăugați date în noua foaie de lucru tastând următorul cod:

    newWkSheet.Cells (1, 1) .Value = "Foaie nouă de lucru ..."

  8. Salvați noul registru de lucru creat prin introducerea următorului cod:

    newWkSheet.SaveAs ("C: myworksheet.xlsx")

  9. Editați calea din pasul anterior și introduceți directorul și numele fișierului la alegere.


  10. Introduceți codul următor pentru a încheia procedura secundară:

    End Sub

  11. Apăsați "F5" pentru a executa procedura și a crea o nouă foaie de lucru Excel.