Sådan konverteres flere kolonner i Excel til en enkelt liste i Word

Konvertering af en tabel med data med flere kolonner til en enkelt kolonne i Microsoft Word kan udføres på flere måder. Du kan bruge makrokommandoer INDEX eller OFFSET til at oprette en funktion, der genererer en enkelt kolonneliste, eller du kan bruge en visuel Basic subrutine til at opnå det samme resultat. For nem brug skal du vælge Visual Basic-metoden, da den kræver mindre justeringer. Makrometoden kræver, at du foretager flere justeringer til Excel-programmet for at opnå det ønskede resultat på alle computere, mens Visual Basic API gør dette automatisk.

1.

Åbn Excel og tilføj en ny kolonne til venstre for det dataregment, du vil konvertere til en enkelt kolonne. Gør dette ved at vælge den øverste venstre kolonne, klikke på den og derefter klikke på "Insert" i den menu, der vises.

2.

Vælg og navngiv den flere kolonnedatabord, du vil konvertere til en enkelt kolonne. Brug markøren til at markere datatabellen og højreklik på den fremhævede tabel. Naviger til "Navngiv et område" -valg i bunden af ​​menuen, og klik på det. I dialogboksen, der vises, skal du give et navn til det valgte område.

3.

Åbn fanen "Udvikler" på værktøjslinjen Access og klik på "Visual Basic" eller tryk på "Alt-F11". Gå til kommandoen "Indsæt" og åben den subrutine side.

4.

Indtast kommandoerne Sub og Combine for at etablere, hvad du vil have til dit slutresultat. Tilføj det første punkt i det område, du ønsker at kombinere i en enkelt kolonne, og klik på "Vælg" for at starte forespørgslen. Tilføj koden for at inkludere alle celler i det datablad, der har indgange. Definer udvælgelsen enten ved antallet af celler, der skal inkluderes i API'en eller navnet på rækkevidde. Indsæt kommandoen for at starte i den næste kolonne, når forespørgslen når slutningen af ​​celler med indtastede data. Tilføj kommandoen "Loop" for at fortsætte din API, indtil der ikke findes flere celler med data. VBA scriptet skal se ud som dette: Sub Combine () Range ("B1" eller dit navngivne område) .Vælg Do While ActiveCell> "" Range (ActiveCell, ActiveCell.End (xlDown)). Kopifunktion: = Område (" A100 [+] "eller dit navngivne område) .End (xlUp) .Offset (1, 0) ActiveCell.Offset (0, 1) .Vælg Loop End Sub

5.

Vælg "Run" på VBA menuen, vælg "Kør Sub / User Form" eller tryk "F5" på tastaturet og gå til Excel programmet. Kopier de data, der vises i kolonne "A1", og åbn dit Word-program. Højreklik på den tomme side, der vises, og vælg "Indsæt". Din enkeltkolonne liste er afsluttet.

Tips

  • Med VBA kan du implementere en bred vifte til at beregne, hvis du vælger ikke at navngive en rækkevidde. Du kan nævne en række "A5000 +", og API'en ignorerer tomme celler, indtil rutinen er færdig.
  • Når du bruger makrofunktioner som OFFSET eller INDEX, skal du sørge for at bruge TRUNC-kommandoen til at fortsætte beregningen for at undgå en fejlmeddelelse om utilstrækkelig plads til at fortsætte funktionen.
 

Efterlad Din Kommentar