Kui teil on vaja mitme Exceli töölehe andmeid MS Wordi kopeerida ja kleepida, peaksite seda artiklit lugema. Excelis pole sellist funktsiooni, mis võimaldaks teil Exceli töövihikust andmed Wordi failiks teisendada. Wordi rakendus ei saa Excel -faile otse avada. Exceli andmeid saab aga kopeerida ja Wordi kleepida ning seejärel Wordi dokumendina salvestada.
Me kõik edastame andmeid Excelist sõnale käsitsi, mis muutub mõnikord tüütuks, kui tegemist on samade toimingute tegemisega liiga palju kordi päevas; käsitsi toimingute vältimiseks kirjutame kõigi toimingute tegemiseks VBA koodi.
Selles artiklis keskendume andmete teisaldamisele Excelist Wordi dokumenti. Automatiseerime kogu protseduuri VBA koodi kaudu. Makrokoodiga saate lihtsalt korraga ühe töölehe andmed kopeerida ja seejärel käivitatakse sõnarakendus automaatselt ning VBA -kood kasutab käsku kleepida, et sisestada andmed doc -faili.
Koodi saamiseks; VB redaktori käivitamiseks peame järgima järgmisi samme:
- Klõpsake vahekaarti Arendaja
- Valige koodirühmas Visual Basic
- On oluline samm, millest te ei tohi ilma jääda
- Viidete valimiseks klõpsake nuppu Tööriistad
- Kerige alla, kuni leiate „Microsoft Word 15.0 Object Library”
- Märkige kindlasti ruut; vaadake allolevat pilti
- Kopeerige allolev kood standardmoodulisse
Sub CopyWorksheetsToWord () Dim wdApp As Word.Application, wdDoc As Word.Document, ws Töölehe Application.ScreenUpdating = False Application.StatusBar = "Uue dokumendi loomine …" Määra wdApp = Uus Word.Application Set wdDoc = wdApp.Documents.Add ActiveWorkbook.Worksheets Application.StatusBar = "Iga ws jaoks" .Count) .Range.Paste Application.CutCopyMode = False wdDoc.Pa lõigud (wdDoc.Pa lõigud.Count) .Range.InsertPa bekezdésAfter If Not ws.Name = Töölehed (Töölehed.Count) .Nimi Siis Koos wdDoc.Pa lõigud (wds. Doc. Loend) .Klass. ActivePane.View.Type = wdNormalView Muu .View.Type = wdNormalView Lõpeta, kui lõpeb komplektiga wdDoc = Mitte midagi wdApp.Visible = Tõene komplekt wdApp = Mitte midagi rakendust. StatusBar = Vale lõppalam
Koodi testimiseks sisestage kaks lehte ja lisage juhuslikud numbrid. Mõlema töölehe ülevaade on järgmine:
1. leht:-
2. leht:-
- Pärast andmete seadistamist töölehtedel; saame makro käivitada
- Wordi rakendus käivitatakse kohe ja andmed kopeeritakse kõikidelt töölehtedelt Wordi; vaadake allolevat pilti
Kui arvate, et andmete kopeerimine on üks ülesanne, kuid iga töölehe andmete vahel peaks olema lehevahe, et igaüks saaks hõlpsasti iga töölehe andmete vahel vahet teha.
Ülaltoodud andmed kopeeritakse ühelt lehelt ja seejärel lisab VBA -kood kindlasti lehtede vahele pausi.
Järeldus: Sel viisil saame aidata paljusid Microsoft Office'i kasutajaid, kes arvavad, et andmete teisendamine Exceli failist Wordiks on natuke keeruline või võimatu. Ülaltoodud kood on näidanud, kui kergesti saab andmeid Wordi faili kopeerida ja kleepida ilma probleemideta mitmest Exceli lehest Wordi dokumendifaili.
Kui teile meeldisid meie ajaveebid, jagage seda oma sõpradega Facebookis. Samuti saate meid jälgida Twitteris ja Facebookis.
Tahaksime sinust kuulda, andke meile teada, kuidas saaksime oma tööd täiustada, täiendada või uuendada ning muuta see teie jaoks paremaks. Kirjuta meile meilisaidile