Als Excel gebruikers nodig Access is meer uitgebreide set van database- instrumenten om hun spreadsheet gegevens te manipuleren , kunnen ze op het pictogram Access ' " Excel " in de " Import " paneel aan de spreadsheet gegevens als een nieuwe Access-tabel dupliceren . Maar als de gebruikers in plaats daarvan willen een enkele kopie van de gegevens te handhaven , kunnen zij dit doen door het creëren van een link in plaats van een aparte tabel . Met behulp van VBA om deze koppeling te maken ontheft Toegang gebruikers van het hebben van om het handmatig maken , een proces dat de selectie van opties . VBA code zal kiezen voor de juiste opties , is de kans op mogelijke fout van de gebruiker verminderen . Instructies 1 Open Access , voer dan de Visual Basic geïntegreerde ontwikkelomgeving ( IDE ) door op ' Alt - F11 . " . Plaats een nieuwe code module door het selecteren van " Module " van het menu "Invoegen " de IDE 's kopen van 2 Plak volgende subroutine in een gedeelte van de nieuwe code module : Public Sub xstest ( ) DoCmd.TransferSpreadsheet acLink , 5 , _ " newtable " , " " , True , " A1 : C4 " End Sub < br > Type 3 over de tekst " " ( zonder de aanhalingstekens ) het volledige pad naam van het Excel-werkblad dat u wilt toegang te koppelen . Ook het type over de tekst " A1 : C4 " . Het volledige assortiment specificatie , met inbegrip van elk gebied rubrieken , van de tabel in het werkblad dat u wilt de link om te verwijzen naar Deze subroutine maakt een link van het Excel spreadsheet die u opgeeft om een tabel met de naam " newtable . " Access VBA zal deze tabel automatisch te creëren om de koppeling met de gegevens weer te geven . De functie argument " acLink " vertelt VBA naar een dynamische koppeling , in plaats van invoer maken en een kopie van de gegevens . 4 Klik op een van de verklaringen van de subroutine , druk daarna op " F5 " te lopen de subroutine . Druk op ' Alt - F11 " om weer in de standaard Access -omgeving , dubbelklikt u op de " newtable " icoon in de " All Tables " paneel aan de linkerkant van het scherm . Access de tabelgegevens geven , die dezelfde als die van de spreadsheet wanneer bekeken in Excel worden . ( Merk op dat Microsoft de functie waarmee toegang tot de spreadsheet gegevens te bewerken is uitgeschakeld . ) Op Twitter Press 5 " Alt - F11 " om weer in de Visual Basic IDE , dan is de volgende wijzigingen aan de " xstest " subroutine : Verander de tekst" acLink " te lezen " acImport , " en verander " newtable "lezen" newtable2 " . Deze veranderingen zullen VBA opdragen een nieuwe Access- tabel te maken dat de invoer , in plaats van links naar , de spreadsheet data . Deze actie zal toelaten Access-gebruikers om gegevens van de nieuwe tabel te wijzigen ( hoewel deze aanpassingen niet zal worden weerspiegeld in de spreadsheet ) . 6 Run de subroutine zoals u deed in stap 4 , en druk vervolgens op ' Alt - F8 " om terug te keren naar Access . Dubbelklik op de " newtable2 " icoon in linkervenster van het scherm , bewerk de nieuwe tafel als dat nodig is.
|