| Hjem | Hardware | Nettverk | Programmering | Software | Feilsøking | Systems | 
Software  
  • Adobe Illustrator
  • animasjon programvare
  • Antivirus programvare
  • Audio programvare
  • Sikkerhetskopiere data
  • brenne CDer
  • brenne DVDer
  • Datakomprimeringsprotokoll
  • database programvare
  • Desktop Publishing
  • Desktop Video
  • Digital Video Software
  • Drupal
  • pedagogisk programvare
  • Engineering programvare
  • Arkiv Forlengelsen Typer
  • Financial Software
  • Freeware, Shareware & Abandonware
  • GIMP
  • Graphics Software
  • Hjem Recording Software
  • Microsoft Access
  • Microsoft Excel
  • Microsoft Publisher
  • Microsoft Word
  • Åpen Kildekode
  • Andre dataprogrammer
  • PC Games
  • Photoshop
  • Portable Document Format
  • PowerPoint
  • presentasjon programvare
  • produktivitet programvare
  • Quicktime
  • Remote Desktop Management
  • SQL Server
  • Skype
  • Programvare betaversjoner
  • programvare konsulenter
  • Software Development Selskaper
  • Software Licensing
  • regneark
  • Skatt forberedelse programvare
  • Utility programvare
  • Web Clip Art
  • Windows Media Player
  • Tekstbehandlingsprogrammet
  •  
    Datamaskin >> Software >> Microsoft Access >> Content
    Hvordan hente ut tabeller fra flere Word-dokumenter og importere dem til Excel
    Excel kan ikke importere Word- tabeller så lett som det kan andre data . En måte å få Word tabeller i Excel er først å konvertere dataene i Word- tabeller til komma - separerte verdier , bedre kjent som CSV. Men dette er en tidkrevende oppgave. En annen løsning er å bruke Excel programmeringsspråk, Visual Basic for Applications , å lese et Word- tabellens data og kopiere den til et Excel-regneark . Ved hjelp av denne tilnærmingen innebærer å bruke de virtuelle objekter av Word , inkludert " Table" objekt. Instruksjoner
    en

    Bruk Windows Utforsker til å kopiere en Word-fil som inneholder minst ett bord til mappen "C : \\". Endre navnet på filen som " table.docx . " Du skal skrive en innledende program som vil lese en tabell celle fra denne filen.
    2

    Klikk på " Utvikler " fanen , og klikk deretter på " Visual Basic" -knappen for å gå inn i Visual Basic programmering miljø . Lim inn følgende program i VB-koden vinduet. Dette programmet skaper en kobling til Word , som gjør excel å bruke Word virtuelle objekter akkurat som om programmet kjørte inni et Word-dokument . Denne prosessen kalles " Automation ".

    Public Sub LoadWordTablebak ( )

    Dim pgmWord Som Word.Application

    Set pgmWord = CreateObject ( " Word.Application ")

    pgmWord.Documents.Open . ( "c : \\ table.docx ")

    MsgBox pgmWord.ActiveDocument.Tables ( 1 ) Cell ( 1 , 1 )

    pgmWord.ActiveDocument . Lukk

    pgmWord.Quit

    End Sub
    3

    Klikk på " Verktøy "-menyen , klikk på " Referanser "-kommandoen . Bla gjennom vinduet som vises for å finne " Microsoft Word " element, deretter klikker du avmerkingsboksen for dette elementet. Denne handlingen lar Excel tilgang til visuelle objekter i et Word-dokument .
    4

    Klikk noen uttalelse i programmet , og klikk deretter på "Kjør" -menyen er " Kjør"-kommandoen . Programmet vil vise en meldingsboks som viser innholdet i en tabell celle i et Word-dokument . Du vil nå utvide programmet til å laste inn en komplett tabell fra en Word-dokument .
    5

    Lim inn følgende reviderte programmet under " End Sub " statement av det opprinnelige programmet . Dette programmet ber brukeren om filnavnet til et Word-dokument . Brukeren må også skrive inn nummeret til en tabell i dokumentet. Programmet bruker automatisering metoden på det første programmet til å laste kopiere den angitte tabellen celle for celle inn i et Excel-regneark .

    Public Sub LoadWordTable2 ( )

    Dim docname As String
    < p > Dim TableId As Integer

    Dim c , r, startRow As Integer

    Dim curCell

    Dim pgmWord Som Word.Application

    Sett curCell = ActiveCell < br >

    Set pgmWord = CreateObject ( " Word.Application ")

    docname = InputBox ("Skriv inn Word-dokument navn")

    docname = InputBox ("Skriv inn Word-dokument navn")

    Mens ( docname < > "")

    TableId = InputBox ("Skriv tabell nummer" )

    pgmWord.Documents.Open ( "c : \\ bordet. docx ")
    p Med pgmWord.ActiveDocument.Tables ( TableId )

    startRow = ActiveCell.Row

    For c = 1 To . Columns.Count

    for r = 1 To . Rows.Count

    curCell.Value = . Cell (r, c )

    'Flytt til neste rad

    Sett curCell = curCell.Offset ( 1 , 0 )

    Neste r

    'Flytt til neste kolonne

    Sett curCell = Cells ( startRow , curCell.Column + 1 )

    Neste c

    End With

    pgmWord.ActiveDocument.Close

    docname = InputBox ("Skriv inn Word-dokument navn")

    Wend

    pgmWord . Avslutt

    End Sub
    6

    Klikk på " Excel " programikon på oppgavelinjen i Windows for å gå tilbake til Excel , og klikk deretter på " Makroer "-knappen i " Developer "-kategorien . Dobbeltklikk på " LoadWordTable " makro til å kjøre denne makroen.
    7

    Skriv inn navnet på et Word- dokument som inneholder en tabell når du blir bedt om å gjøre det vises. Skriv inn nummeret på tabellen du vil når meldingen om at bordet vises. For eksempel , hvis du ønsker den andre tabellen i dokumentet , skriver du inn " 2". Excel vil laste bordet inn i gjeldende regneark.
    8

    Fortsett å legge Word- tabeller med programmet etter behov. Trykk på " Enter" på " dokumentet navnet" bedt om å avslutte programmet .

    früher :

     Weiter:
      Relatert Artike
    ·Hvordan legge til Tillegg for Excel 2007 
    ·Hvordan sette inn en link til et annet dokument i en ce…
    ·Hvor å Endre Microsoft Access filrettigheter for Datab…
    ·Hvordan lage en gruppe positive tall Negative i Excel 
    ·Hvordan finne Kamper i Excel regneark 
    ·Hvordan sjekke for DLL-filer mangler i Microsoft Access…
    ·Lær Microsoft Excel gratis på nettet 
    ·Hvordan lage en ukentlig 24 timers kalender med Excel 
    ·Nyttige funksjoner i Excel 
    ·Hvordan holde en løpende sum av tid brukt i en aktivit…
      Anbefalte artikler
    ·Hvordan Rasteriser tekst i Photoshop 8 
    ·Hvordan lage fasttelefon Bruke Skype 
    ·Hvordan skrive en forskningsrapport Chart 
    ·Hvordan brenne en DVD fra en oppgradert Vista Digital L…
    ·Hva er Java Virtual Machine Launcher 
    ·Hvordan lage en gulrot Accent 
    ·Hvordan lage en PDF som vil Rull side til side 
    ·Hvordan lage ordene står på et klikk på en SMART Not…
    ·Hvordan få en gammel versjon av Avira AntiVir 
    ·Hvordan legge til bilder til PowerPoint presentasjoner 
    Copyright ©  Datamaskin  http://www.datamaskin.biz/