Cookies დაგვეხმარება სიტყვით ჩვენი მომსახურება. გამოყენებით ჩვენი მომსახურება, თქვენ ეთანხმებით, რომ ჩვენი გამოყენების cookies.
რჩევა: სხვა ენები Google- ით თარგმნილია. შეგიძლიათ ეწვიოთ English ამ ბმის ვერსია.
შესვლა
x
or
x
x
რეგისტრაცია
x

or

როგორ დააკავშიროთ მრავალჯერადი workbooks ერთი workbook in Excel?

ოდესმე ყოფილა მოხდა, როდესაც თქვენ უნდა დააკავშიროთ მრავალჯერადი workbooks ერთ workbook Excel? ყველაზე საშინელი ის არის, რომ სამუშაო წიგნი, რომელიც თქვენ უნდა გაერთიანდეს, შეიცავს მრავალჯერადი სამუშაოებს. შეუძლია თუ არა ვინმეს ამ პრობლემის მოგვარების კარგი საშუალება?

შეუთავსეთ სხვადასხვა სამუშაო წიგნები VBA- სთან ერთად

შეუთავსეთ სხვადასხვა სამუშაო წიგნები ერთ სამუშაო წიგნს გადაადგილების ან ასლის ბრძანებით

ადვილად კომბინირება მრავალჯერადი workbooks ერთი workbook ერთად Kutools for Excel


ადვილად დააკავშიროთ მრავალჯერადი სამუშაოები / workbooks ერთ worksheet / workbook:

შეუთავსეთ მრავალჯერადი worksheets ან workbooks ერთ worksheet ან შრომის წიგნაკი შეიძლება იყოს უზარმაზარი ამოცანა თქვენს ყოველდღიურ საქმიანობაში. მაგრამ, თუ თქვენ გაქვთ Kutools ამისთვის Excel, მისი ძლიერი კომუნალური - შეუთავსეთ დაგეხმარებათ სწრაფად დააკავშიროთ მრავალჯერადი სამუშაოები, სამუშაო წიგნები ერთ სამუშაოში ან სამუშაო წიგნში. ჩამოტვირთეთ სრული ფუნქცია X-Day-day უფასო ბილიკი Kutools ამისთვის Excel!

Kutools ამისთვის Excel: მეტია, ვიდრე 200 მოსახერხებელი Excel add-ins, უფასო ცდილობენ არ შეზღუდვა 60 დღე. ჩამოტვირთეთ და უფასო საცდელი ახლა!

რეკომენდებული პროდუქტიულობის ინსტრუმენტები Excel / Office

ოფისის ჩანართი: მოაქციეთ tabbed რედაქტირება Excel და სხვა ოფისის პროგრამული უზრუნველყოფა, ისევე, როგორც Chrome, Firefox და Safari.30 დღე შეუზღუდავი უფასო სასამართლო

Kutools ამისთვის Excel: XXX ძლიერი თვისებები მიიღოს Excel ბევრად ადვილი და გაზრდის პროდუქტიულობის დაუყოვნებლივ.60 დღე შეუზღუდავი უფასო სასამართლო


შეუთავსეთ სხვადასხვა სამუშაო წიგნები VBA- სთან ერთად

გამოცდილი და პროფესიონალი პროგრამისტებისათვის, შეგიძლიათ გამოიყენოთ VBA სკრიპტები, რათა დაამუშაონ მრავალჯერადი სამუშაო წიგნები ერთი სამაგისტრო წიგნში. თქვენ შეგიძლიათ გაუმკლავდეთ შემდეგ ნაბიჯებს:

1. ყველა სამუშაო წიგნი, რომლითაც გსურთ დაამატოთ იგივე დირექტორიაში. იხილეთ სკრინშოტი:

2. დაიწყე Excel ფაილი, რომელიც გსურთ დაამატოთ სხვა სამუშაო წიგნები.

3. დაწკაპეთ შემქმნელი > Visual Basic, ახალი Microsoft Visual Basic განაცხადების მისაღებად ფანჯარა გამოჩნდება, დააწკაპუნეთ ჩადეთ > მოდულებიდა შეყვანა შემდეგი კოდის მოდულში:

Sub GetSheets()
Path = "C:\Users\dt\Desktop\dt kte\"
Filename = Dir(Path & "*.xls")
  Do While Filename <> ""
  Workbooks.Open Filename:=Path & Filename, ReadOnly:=True
     For Each Sheet In ActiveWorkbook.Sheets
     Sheet.Copy After:=ThisWorkbook.Sheets(1)
  Next Sheet
     Workbooks(Filename).Close
     Filename = Dir()
  Loop
End Sub

Tip: ზემოთ კოდის, შეგიძლიათ შეცვალოთ გზა, რომელსაც იყენებთ.

4. შემდეგ დააჭირეთ doc- შერწყმა-მრავალჯერადი-workbooks- ღილაკს ღილაკს კოდის გასაშვებად და ყველა სამუშაო ვერსია (მათ შორის, ცარიელი სამუშაოები) სამუშაო სახელმძღვანელოში გაერთიანდა სამაგისტრო შრომის წიგნაკში.

შენიშვნა: ეს VBA კოდს შეუძლია მთელი სამუშაო წიგნების შერწყმა სამაგისტრო შრომის წიგნაკში, თუ გინდა რომ დაუშვას სამუშაო წიგნების განსაზღვრული სამუშაოები, ეს კოდი არ იმუშავებს.


შეუთავსეთ სხვადასხვა სამუშაო წიგნები ერთ სამუშაო წიგნს გადაადგილების ან ასლის ბრძანებით

თუ თქვენ Microsoft- ის Excel- ის ფურცელი ხართ, თქვენ არ გაქვთ არჩევანი, მაგრამ მხოლოდ ყველა ფურცლის მონაცემების კოპირება და გადაწერა მათ ახალ სამუშაო წიგნში და გადაადგილება ან ასლი ბრძანების გამოყენება. გამოყენებით გადატანა ან ასლი ბრძანება დაგეხმარებათ ახალ სამუშაო წიგნში ექსპორტის ან ერთი ან რამდენიმე სამუშაოების ასლის გადაღება.

1. გახსენით ყველა სამუშაო წიგნი, რომ გსურთ ერთი სამუშაო წიგნის შერწყმა.

2. აირჩიეთ შაბლონის შრომის წიგნაკის ყველა სამუშაო სახელწოდება. თქვენ შეგიძლიათ აირჩიოთ მრავალჯერადი დანიშვნა ქვემოთ Ctrl გასაღები ან გადაიტანოს გასაღები. მარჯვენა ღილაკით დააჭირეთ ღილაკს worksheet, და დააჭირეთ გადატანა ან ასლი კონტექსტური მენიუდან.

3. in გადატანა ან ასლი დიალოგური ფანჯარა, შეარჩიეთ სამაგისტრო შრომის წიგნაკი, რომლითაც გსურთ სხვა სამუშაო წიგნების შერწყმა ჩამოწერის სიიდან შერჩეული ფურცლების გადატანა წიგნში. და შემდეგ მიუთითეთ შერწყმული სამუშაოების მდებარეობა. იხილეთ სკრინშოტები:

4. შემდეგ დააჭირეთ OK. შერჩეული სამუშაოები გადადის სამაგისტრო წიგნში.

5. გაიმეორეთ ნაბიჯები 2- დან 4- მდე სხვა სამუშაო წიგნები სამაგისტრო შრომის წიგნაკში. შემდეგ ის აერთიანებს ღია სამუშაოების ყველა სამუშაოებს ერთ სამუშაო წიგნში. იხილეთ სკრინშოტები:


ადვილად კომბინირება მრავალჯერადი workbooks ერთი workbook ერთად Kutools for Excel

საბედნიეროდ, ამისთვის rookies და ახალი ხელები Microsoft Excel, არსებობს ხელმისაწვდომი ინსტრუმენტები, რათა დაგეხმაროთ სწრაფად დააკავშიროთ ასობით workbooks ერთ. ფუნქცია შეუთავსეთ in Kutools ამისთვის Excel ხდის ბევრად უფრო ადვილად დააკავშიროთ მრავალი Excel ფაილი. პროგრამა გამოიყენება Excel- ში განმეორებითი და გადაჭარბებული ოპერაციების გასათავისუფლებლად. ეს მართლაც მნიშვნელოვან როლს ასრულებს იმ შემთხვევაში, თუ თქვენ უნდა გაუმკლავდეთ დიდი რაოდენობით Excel ფაილის თქვენს ყოველდღიურ საქმიანობაში. ახლა, ვნახოთ, თუ როგორ უნდა მიიღოთ ეს ფუნქცია მრავალჯერადი სამუშაო წიგნების კომბინაციაში.

Kutools ამისთვის Excel : მეტი ვიდრე 300 მოსახერხებელი Excel Add-Ins, თავისუფლად ვეღარ შეასრულა შეზღუდვები, სულ მცირე, 60 დღე.

1. ჩართეთ Excel და დააწკაპუნეთ კუტუსი პლუს > შეუთავსეთ. შემდეგ დიალოგს გაახსენებთ შეგახსენოთ, რომ ყველა კომბინირებული სამუშაო წიგნი უნდა იყოს შენახული და ფუნქცია არ შეიძლება გამოყენებულ იქნას დაცულ სამუშაოებზე, გთხოვთ OK ღილაკს.

2. იმ შეუთავსეთ სამუშაოები ოსტატი, აირჩიეთ ერთობლივი სამუშაო წიგნებისგან ერთ სამუშაო წიგნში გაერთიანების მრავალჯერადი სამუშაოები, და შემდეგ დააჭირეთ შემდეგი ღილაკი. იხილეთ სკრინშოტი:

2. შემდეგ თქვენ შეგიძლიათ ნახოთ ყველა გახსნილი სამუშაო და წიგნები შეუთავსეთ სამუშაოები - ნაბიჯი 2 of 3 დიალოგური ფანჯარა. დაწკაპეთ დამატება > ფაილი / Folder დაამატოთ სხვა Excel ფაილი ან ფოლდერები whih შეიცავს Excel ფაილი თქვენ დააკავშიროთ. ფაილების შერჩევის შემდეგ დააჭირეთ ღილაკს შემდეგი ღილაკს წასვლა წინ. იხილეთ სკრინშოტი:

doc შერწყმა მრავალჯერადი workbooks arrow1

3. იმ შეუთავსეთ სამუშაოები - ნაბიჯი 3 of 3 დიალოგური ფანჯარა, გთხოვთ შემდეგ პარამეტრებს:

  • თქვენ შეგიძლიათ გამორიცხოთ ყველა ცარიელი სამუშაო მაგიდა შერწყმით შერჩევით მთავარი დან როდესაც იწყება ცარიელი სამუშაო ფურცელი ჩამოსაშლელი სია.
  • შეამოწმეთ თითოეული რიგის პირველი სტრიქონი (კომენტარი) ვარიანტი შეავსოთ worksheet ინფორმაცია ყველა კომბინირებული worksheet.
  • თქვენ შეგიძლიათ გაუკეთოთ ახალი კომბინირებული სამუშაოების სახელის შეცვლას შრომის წიგნაკის სახელები, ან ორიგინალური სამუშაოების სახელების სახელებიდან ან მის შემდეგ. შრომის წიგნაკის ჩასმა ვარიანტი.
  • დაწკაპეთ ფერი ღილაკს.

4. შემდეგ აირჩიეთ ფოლდერი კომბინირებული შრომის წიგნაკის შენახვაზე და გახსენით იგი პირდაპირ, როგორც გჭირდებათ. ახლა ყველა განსაზღვრული workbooks ერთმანეთთან ერთად.

შენიშვნები:

1. თქვენ მოგეთხოვებათ, თუ გსურთ ამ სცენარის შენახვა. დაწკაპეთ დიახ გადარჩენა, როგორც გჭირდებათ, შემდეგ შეიტანეთ სცენარის სახელი, (იხილეთ ეკრანის ჩვენება). სცენარის შენახვის შემდეგ, საჭიროა მხოლოდ დაჭერით სცენარი ღილაკს, რათა აირჩიოთ სცენარის სახელი step2- ის ოსტატისთვის პირდაპირ გამოსაყენებლად.

2. შერჩეული მუშაკებში შერჩეული ნამუშევრები გაერთიანდა ახალ სამუშაო წიგნში და სამუშაოები სახელწოდების სახელის სახელს უკავშირდება ორიგინალის სახელოსნოს სახელით ან მის შემდეგ, თუ შეამოწმე შრომის წიგნაკის ჩასმა ვარიანტი. იმავდროულად, ახალი ნამუშევარი დასახელდა Kutools ამისთვის Excel გენერირებული ყველა სამუშაო ცხრილის წინ, რომელიც ჩამოთვლილია თითოეული სამუშაო ჯგუფის დეტალური ინფორმაცია. იხილეთ სკრინშოტი:

3. თუ თქვენი ნამუშევრის სახელი ძალიან გრძელია, შესაძლოა, სახელი სიმბოლოები უფრო დიდია ვიდრე 31 კლასტერები, კომბინირებული სახელი არ გამოჩნდება და მხოლოდ ორიგინალური ფურცლის სახელის ჩვენება.

რჩევა.თუ გსურთ ამ უფასო სარგებლობის უფასო საცდელი ვერსია, გთხოვთ გადადით ჩამოტვირთეთ პროგრამული უზრუნველყოფა თავისუფლად პირველი და შემდეგ წავიდეთ ოპერაციის გამოყენებისას ზემოთ აღნიშნული ნაბიჯები.


ოფისის ჩანართი - Excel- ში მუშაკთა ჩამორჩენილი Browsing, Editing და მმართველი:

ოფისის ჩანართი მოაქვს tabbed ინტერფეისი როგორც ჩანს ვებ ბრაუზერები, როგორიცაა Google Chrome, Internet Explorer ახალი ვერსიები და Firefox to Microsoft Excel. ეს იქნება დროის დაზოგვა ინსტრუმენტი და შეუპოვარი თქვენი სამუშაო. იხილეთ დემო:

დაწკაპეთ ოფისის ჩანართის უფასო საცდელი ვერსია!

ოფისის ჩანართი Excel- ისთვის

Demo: ადვილად დააკავშიროთ მრავალჯერადი workbooks ერთი workbook ერთად Kutools for Excel




Related Articles:



რეკომენდებული პროდუქტიულობის ინსტრუმენტები

ოფისის ჩანართი

ოქროს ვარსკვლავი 1 მოიტანეთ ხელსაყრელი ჩანართები Excel და სხვა საოფისე პროგრამებისთვის, ისევე როგორც Chrome, Firefox და ახალი Internet Explorer.

Kutools ამისთვის Excel

ოქროს ვარსკვლავი 1 საოცარი! გაზარდეთ თქვენი პროდუქტიულობა წუთში. არ გჭირდებათ რაიმე განსაკუთრებული უნარები, ყოველდღე ორ საათში გადარჩენა!

ოქროს ვარსკვლავი 1 300 ახალი ფუნქციები Excel, ჩადება Excel ძალიან მარტივი და ძლიერი:

  • უჯრედის / რიგების / სვეტების შერწყმა მონაცემების დაკარგვის გარეშე.
  • მრავალჯერადი ცხრილებისა და სამუშაოების კომბინირება და კონსოლიდაცია.
  • შეადარეთ საზღვრები, დააკოპირეთ მრავალჯერადი საზღვრები, გადაიყვანეთ ტექსტის თარიღის, განყოფილებისა და ვალუტის კონვერტაციის.
  • დათვლა ფერები, Paging Subtotals, გაფართოებული დალაგება და სუპერ ფილტრი,
  • სხვა არჩევა / ჩასმა / წაშლა / ტექსტი / ფორმატი / ლინკი / კომენტარი / სამუშაო წიგნები / სამუშაოები ინსტრუმენტები ...

ეკრანის კადრი Kutools for Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Dezignext Technologies · 3 days ago
    I like using this technique better than using traditional "3D Formula" techniques in Excel.
  • To post as a guest, your comment is unpublished.
    Jonel · 1 months ago
    Note: This VBA code can merge the entire workbooks into the master workbook, if you want to combine specified worksheets of the workbooks, this code will not work.

    Can we have the module for VBA that above scene will work,
    • To post as a guest, your comment is unpublished.
      crystal · 1 days ago
      Hi Jonel,
      The following code can help you solve the problem. You need to replace folder path and "Sheet1, Sheet3" with the specified folder path and worksheets as you need.

      Sub MergeSheets2()
      Dim xStrPath As String
      Dim xStrFName As String
      Dim xWS As Worksheet
      Dim xMWS As Worksheet
      Dim xTWB As Workbook
      Dim xStrAWBName As String
      Dim xI As Integer
      On Error Resume Next

      xStrPath = " C:\Users\DT168\Desktop\KTE\"
      xStrName = "Sheet1,Sheet3"

      xArr = Split(xStrName, ",")

      Application.ScreenUpdating = False
      Application.DisplayAlerts = False
      Set xTWB = ThisWorkbook
      xStrFName = Dir(xStrPath & "*.xlsx")
      Do While Len(xStrFName) > 0
      Workbooks.Open Filename:=xStrPath & xStrFName, ReadOnly:=True
      xStrAWBName = ActiveWorkbook.Name
      For Each xWS In ActiveWorkbook.Sheets
      For xI = 0 To UBound(xArr)
      If xWS.Name = xArr(xI) Then
      xWS.Copy After:=xTWB.Sheets(xTWB.Sheets.count)
      Set xMWS = xTWB.Sheets(xTWB.Sheets.count)
      xMWS.Name = xStrAWBName & "(" & xArr(xI) & ")"
      Exit For
      End If
      Next xI
      Next xWS
      Workbooks(xStrAWBName).Close
      xStrFName = Dir()
      Loop
      Application.ScreenUpdating = True
      Application.DisplayAlerts = True

      End Sub
  • To post as a guest, your comment is unpublished.
    Chris · 2 months ago
    When I run this, each sheet in the new workbook is being named based off of the sheet names of the original document rather than the filenames. Any idea what I might be doing wrong?
    • To post as a guest, your comment is unpublished.
      crystal · 1 days ago
      Hi Chris,
      If you want to distinguish which worksheets in the master workbook came from where after merging, please apply the below VBA code to solve the problem.

      Sub MergeWorkbooks()
      Dim xStrPath As String
      Dim xStrFName As String
      Dim xWS As Worksheet
      Dim xMWS As Worksheet
      Dim xTWB As Workbook
      Dim xStrAWBName As String
      On Error Resume Next
      xStrPath = "C:\Users\DT168\Desktop\KTE\"
      xStrFName = Dir(xStrPath & "*.xlsx")
      Application.ScreenUpdating = False
      Application.DisplayAlerts = False
      Set xTWB = ThisWorkbook
      Do While Len(xStrFName) > 0
      Workbooks.Open Filename:=xStrPath & xStrFName, ReadOnly:=True
      xStrAWBName = ActiveWorkbook.Name
      For Each xWS In ActiveWorkbook.Sheets
      xWS.Copy After:=xTWB.Sheets(xTWB.Sheets.Count)
      Set xMWS = xTWB.Sheets(xTWB.Sheets.Count)
      xMWS.Name = xStrAWBName & "(" & xMWS.Name & ")"
      Next xWS
      Workbooks(xStrAWBName).Close
      xStrFName = Dir()
      Loop
      Application.ScreenUpdating = True
      Application.DisplayAlerts = True
      End Sub
  • To post as a guest, your comment is unpublished.
    Owen · 5 months ago
    It didnt work for me then I realized my files are .xlsx, so added the missing "x" to the Filename line.
  • To post as a guest, your comment is unpublished.
    Justin · 8 months ago
    This worked for me but I had to make sure I have to put "\" at the end of my path. Initially, I didn't have it and it wouldn't work.