Სარჩევი
ეს სტატია ასახავს, თუ როგორ შეგიძლიათ გადაიყვანოთ Word დოკუმენტები Excel ცხრილებად, მაგრამ შეინარჩუნოთ იგივე ფორმატირება. დავუშვათ, თქვენ გჭირდებათ თქვენი მონაცემების ფორმატირება ან დახარისხება, რომელიც არის Word დოკუმენტში. ცხადია, Excel არის უკეთესი არჩევანი ამის გასაკეთებლად. საბედნიეროდ, თქვენ არ გჭირდებათ მონაცემების ხელახლა აკრეფა ახალ Excel ფაილში. თქვენ შეგიძლიათ უბრალოდ გადაიყვანოთ Word დოკუმენტი Excel-ის ცხრილებად, ფორმატირების შენარჩუნებისას. შემდეგი სურათი ხაზს უსვამს ამ სტატიის მიზანს. გადახედეთ მას, რომ გაიგოთ, როგორ გააკეთოთ ეს მარტივად.
ჩამოტვირთეთ პრაქტიკის სამუშაო წიგნი
შეგიძლიათ ჩამოტვირთოთ პრაქტიკის სამუშაო წიგნი ქვემოთ ჩამოტვირთვის ღილაკიდან.
Word to Excel Conversion.xlsm
2 გზა Word-ში Excel-ში იმავე ფორმატით გადასაყვანად
წარმოიდგინეთ, რომ გაქვთ შემდეგი Word დოკუმენტი. ახლა გსურთ მისი გადაყვანა Excel-ის ცხრილებად. შემდეგ მიჰყევით ქვემოთ მოცემულ მეთოდებს.
1. გადაიყვანეთ Word-ში Excel-ში Copy-Paste-ით
შეგიძლიათ უბრალოდ დააკოპიროთ მონაცემები word დოკუმენტიდან და ჩასვათ იგი ექსელის ფურცელზე. ამისათვის მიჰყევით ქვემოთ მოცემულ ნაბიჯებს.
📌 ნაბიჯები
- პირველ რიგში, გადადით word ფაილზე. შემდეგ დააჭირეთ CTRL+A მთელი დოკუმენტის ასარჩევად. თქვენ ასევე შეგიძლიათ აირჩიოთ კონკრეტული დიაპაზონი მხოლოდ საჭიროების შემთხვევაში.
- ამის შემდეგ დააჭირეთ CTRL+C მონაცემების დასაკოპირებლად, როგორც ნაჩვენებია ქვემოთ.
- შემდეგ, გადადით Excel-ის ცხრილზე. შემდეგ, აირჩიეთდიაპაზონის ზედა მარცხენა უჯრედი, სადაც გსურთ მონაცემების მიღება.
- ახლა დააჭირეთ CTRL+V მონაცემების ჩასასვლელად. ალტერნატიულად, შეგიძლიათ დააწკაპუნოთ ამ უჯრედზე მარჯვენა ღილაკით. შემდეგ აირჩიეთ Seep Source Formatting (K) Paste Options .
- ამის შემდეგ, თქვენ მიიღებთ შემდეგ შედეგს.
წაიკითხეთ მეტი: როგორ დავაკოპიროთ Word-დან Excel-ში მრავალ უჯრედში (3 გზა)
2. Word-ის კონვერტაცია Excel VBA-ით
იგივე შეგიძლიათ გააკეთოთ Excel VBA-ით. ამისათვის მიჰყევით ქვემოთ მოცემულ ნაბიჯებს.
📌 ნაბიჯები
- პირველ რიგში, დაამატეთ ახალი სამუშაო ფურცელი. შემდეგ შეინახეთ სამუშაო წიგნი მაკრო ჩართული სამუშაო წიგნად .
- შემდეგი დააჭირეთ ALT+F11 VBA ფანჯრის გასახსნელად.
- შემდეგ, აირჩიეთ ჩასმა >> მოდული ახალი მოდულის შესაქმნელად, როგორც ნაჩვენებია ქვემოთ მოცემულ სურათზე.
- ამის შემდეგ დააკოპირეთ შემდეგი კოდი კოპირების ღილაკის გამოყენებით.
3105
- შემდეგ, ჩასვით კოპირებული კოდი მოდულის ფანჯარაში, როგორც ნაჩვენებია ქვემოთ.
- ახლა დააჭირეთ F5 კოდის გასაშვებად. თქვენ ასევე შეგიძლიათ ამის გაკეთება Run
- შემდეგ, თქვენ მოგეთხოვებათ აირჩიოთ Word ფაილი, რომლის კონვერტაციაც გსურთ.
- ახლა, გადახედეთ მდებარეობას თქვენთვის სასურველი word დოკუმენტიდან. შემდეგ აირჩიეთ ფაილი და დააწკაპუნეთ გახსნა .
- საბოლოოდ, თქვენ მიიღებთ მსგავს შედეგს, როგორც წინა მეთოდს.
🔎 როგორ მუშაობს კოდიმუშაობ?
Sub WordToExcelWithFormatting()
Dim Document, Word As Object
Dim File As Variant
Dim PG, Range
აუცილებელი ცვლადების გამოცხადება.
Application.ScreenUpdating = False
File = Application.GetOpenFilename _
(“Word file(*.doc;*.docx) ,*.doc;* .docx", , "ExcelWIKI.Com - გთხოვთ აირჩიეთ")
თუ ფაილი = მცდარია, გამოდით Sub
დააყენეთ Word = CreateObject( „Word.Application“)
ეს ადგენს Word ცვლადს Word დოკუმენტად.
Set Document = Word.Documents.Open(ფაილის სახელი :=File, ReadOnly:=True)
ეს ანიჭებს Document ცვლადს მომხმარებლის მიერ მითითებულ ობიექტს ან ფაილს.
Document. .Activate
PG = Document.Paragraphs.Count
ეს კოდის ხაზი ანიჭებს PG ცვლადს აბზაცების რაოდენობას word document
Set Range = Document.Range(Start:=Document.Paragraphs(1).Range.Start, _ End:=Document.Paragraphs(PG).Range .დასასრული)
Range.Select
შეცდომის შესახებ განაახლეთ შემდეგი
Word.Selection.Copy
ActiveSheet.Range("B2").Select
ActiveSheet.Paste
Document.Close
Word.Quit (wdDoNotSaveChanges)
Application.ScreenUpdating = True
End Sub
დაწვრილებით: როგორ გადავიტანოთ Word Table Excel-ის ცხრილებად (6 მეთოდი)
რაც უნდა გახსოვდეთ
- თქვენ ასევე შეგიძლიათ შეინახოთ word ფაილი PDF ფორმატში. შემდეგ გამოიყენეთ თქვენი PDF რედაქტორი Excel-ის ცხრილებად გადასაყვანად.
- არ დაგავიწყდეთ შეინახოთ სამუშაო წიგნი .xlsm წინააღმდეგ შემთხვევაში, თქვენ დაკარგავთ კოდს.
დასკვნა
ახლა, თქვენ იცით, როგორ გადაიყვანოთ Word დოკუმენტი Excel-ის ცხრილებად და შეინარჩუნოთ ფორმატირებაც. გთხოვთ, შეგვატყობინოთ, დაგეხმარათ თუ არა ეს სტატია თქვენი პრობლემის მოგვარებაში. თქვენ ასევე შეგიძლიათ გამოიყენოთ ქვემოთ მოცემული კომენტარების განყოფილება დამატებითი კითხვებისა და წინადადებებისთვის. ეწვიეთ ჩვენს ExcelWIKI ბლოგს, რომ შეისწავლოთ მეტი Excel-ის შესახებ. დარჩით ჩვენთან და განაგრძეთ სწავლა.
