|  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Så här öppnar du Word-tabeller Använda Excel VBA

    Word och Excel är båda program i Microsoft Office-paketet . Word är ett ordbehandlingsprogram och Excel ett kalkylprogram . Att veta hur man kommer åt Microsoft Word-tabeller från Microsoft Excel kan vara användbart när du arbetar med Word-tabeller . Visual Basic for Applications ( VBA ) är ett programmeringsspråk som är lätt att lära sig och använda , och i några få steg du kan skriva VBA-kod för att komma åt en Word-tabell från Excel . Instruktioner
    1

    Starta Microsoft Office Word , välj " Infoga " -menyn och klicka på " Tabell " . Välj ett bord med två kolumner och två rader .

    Klicka på cellen längst upp till vänster och skriv " Kolumn1 " , tryck på "Tab " för att flytta till den andra kolumnen och skriv " Kolumn2 " .
    < P > Klicka på den första cellen i raden nummer två och typ " Datq1 " . Tryck på " Tab " för att flytta till den andra kolumnen och skriv " Data2 "

    Spara dokumentet i " C : \\ " . Som " . MyTableDoc.doc "
    2

    Starta Microsoft Office Excel , välj " Utvecklare " fliken och klicka sedan på " Visual Basic . " Klicka på " Infoga " -menyn och välj " Modul . "

    Välj " Verktyg " -menyn och klicka på " Referenser ... " . Markera rutan bredvid " Microsoft Word Object Library . " Klicka på " OK . " Addera 3

    Skriv följande för att skapa den " getWordTableData " subrutin :

    Private Sub getWordTableData ( ) katalog

    Tryck " Enter . "
    4

    Skriv följande för att skapa nya variabler :

    Dim clmnCnt As Integer

    Dim rowCnt As Integer
    5

    Type följande för att skapa Word objekt :

    Set wrdApp = CreateObject ( " Word.Application " ) katalog

    Set wrdDoc = wrdApp.Documents.Open ( " C : \\ myTableDoc.doc " )

    6

    Skriv följande för att loopa igenom tabellen i " myTableDoc.doc " och visa dess innehåll genom en meddelanderuta : .

    för clmnCnt = 1 till wrdDoc.Tables ( 1 ) Kolumner . Count

    För rowCnt = 1 Till wrdDoc.Tables ( 1 ) . Rows.Count

    MsgBox wrdDoc.Tables ( 1 ) . Cell ( rowCnt , clmnCnt ) . Range.Text

    Nästa rowCnt

    Nästa clmnCnt
    7

    Skriv följande för att frigöra din variabel från minnet :

    Set wrdApp = Nothing

    Set wrdDoc = Nothing

    Tryck " F5 " för att köra din subrutin .

    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur du importerar data till en dialogruta med Visual Ba…
    ·Konvertera 2-byte heltal till 4 - Byte Lång I Visual B…
    ·Lägga API
    ·Hur vill kolla en RadioButton på Vb.Net
    ·Hur man använder inloggningsskript Ställa Skrivare
    ·Fylla ett Visual Basic Listbox med unika objekt från e…
    ·Hur man skapar delrapporter i VB NET
    ·Hur man skriver ett program för att konvertera tempera…
    ·Hur att koda en If Else uttalande i VB6
    ·Hur vill kolla mouseDown i Visual Basic
    Utvalda artiklarna
    ·Variabla argumentlistor för Python
    ·Hur man skriver ett Connection String som en klass fil
    ·En Java 3D API Tutorial
    ·Hur man använder DirListBox i VB6
    ·Hur byta namn filer med VBS
    ·Hur man gör Gel Ink
    ·Hur sortera data i Visual Basic
    ·Basic Hjälp för Microsoft Visual
    ·Hur man upptäcker en Safari-webbläsare i JavaScript
    ·Lägga till en in -knappen till NIB
    Copyright © Dator Kunskap http://www.dator.xyz