A VBA makró használata az Excelben az Access elindításához és az Access adatbázis megnyitásához
Megjelenítené a számításhoz megfelelő adatokat, vagy más okból megnyitna hozzáférési adatbázist? Számos olyan alkalmazás létezik, ahol érdemes Access -adatbázist hívni Excel -en keresztül.
Amit egy táblázatban hiperhivatkozással végezhet, az nem jelent problémát az Excel makróval. A megfelelő programkóddal villámgyorsan előhívhatja a választott adatbázist. Ennek több módja is van. A következő parancsokkal határozhatja meg konkrétan a hozzáférést:
Hívás alhozzáférés ()
Dim hozzáférés objektumként
Hozzáférés beállítása = CreateObject ("Access.Application")
Access.Visible = Igaz
Access.OpenCurrentDatabase "c: \ files \ testdatenbank.mdb"
MsgBox "Nyitott adatbázis".
Access.CloseCurrentDatabase
Hozzáférés beállítása = semmi
End Sub
Az OPENCURRENTDATABASE parancs után idézőjelben adja meg az adatbázis elérési útját. A makró elindítása után az Excel először megnyitja az Access és az Access, majd a megfelelő fájlt.
Az Excel ezután egy üzenetablakot jelenít meg, az alábbi ábra szerint:
Az információs ablakra azért van szükség, mert különben az adatbázis tartalma nem lenne látható, ha az adatbázist később bezárják az Excelben.
A makró megadásához nyomja meg az ALT F11 billentyűkombinációt az Excelben. Ez előhívja a VBA szerkesztőt. Az INSERT - MODULE paranccsal üres modullapot helyezhet be. A makró elindításához nyomja meg az ALT F8 billentyűkombinációt az Excelben.
