Att veta hur man byter kolumner i Microsoft Access med Visual Basic for Applications (VBA) kan hjälpa dig undvika att förlora data . Access är en relationsdatabas ledningssystem. Du behöver inte ta bort kolumnen och skapa en ny för att byta namn på ett fält med hjälp av VBA . Att inte behöva ta bort kolumner är viktigt när du arbetar med viktiga data . Det är också viktigt att komma ihåg att säkerhetskopiera databasen innan du gör några ändringar
1 . .
Starta Access 2007 , välj ” Databas Verktyg ” och klicka på ” Visual Basic . ”
Skriv följande för att skapa en ny sub :
Sub renameColumns ( )
Tryck på ” Enter ”.
2
Skriv följande att förklara din ” sträng ” och ”databas ” variabel .
Dim sqlString As String
Dim DBS som databas
3
Skriv följande för att skapa en ny tabell som heter ” MinTabell ” och två områden: .
sqlString=” CREATE TABLE MinTabell ( Förnamn TEXT (25 ) , Efternamn TEXT ( 25 ));”
DoCmd . RunSQL ( sqlString )
4
Skriv följande för att byta namn på fälten i ”. MinTabell : ”
dbs. TableDefs ( ” MinTabell ” ) . Fält ( ” Förnamn ” ) . Name=” fnamn ”
dbs. TableDefs ( ” MinTabell ” ) . Fält ( ”Efternamn ” ) . Name=” LName ”
Klicka i ditt ” renameColumns ” sub och tryck på ” F5 ” för att köra den .
コメント