Dacă fiecare foaie de lucru dintr-un registru de lucru Excel conține mai multe diagrame și acum doriți să mutați toate diagramele într-o foaie de lucru nouă creată, vă puteți referi la această post. Aici vă vom prezenta 2 moduri simple.
După ce ați creat diagrame pentru datele din fiecare foaie de lucru a unui registru de lucru Excel, pentru a analiza mai bine datele în conformitate cu aceste diagrame, este posibil să doriți să adunați toate aceste diagrame într-o singură foaie de lucru. Cu alte cuvinte, ați putea spera să le mutați pe toate într-o nouă foaie de lucru. Dacă există puține diagrame, puteți utiliza următoarea Metodă 1 pentru a muta unul câte unul. Cu toate acestea, dacă există o multitudine de diagrame, este mai bine să îl utilizați pe cel din urmă.
Metoda 1: Mutați manual graficul unul câte unul
- La început, creați o nouă foaie de lucru în care doriți să mutați toate diagramele.
- Apoi, deschideți o foaie de lucru și prezentați pe o diagramă din ea.
- Apoi, faceți clic dreapta pe diagramă și selectați „Mutați diagrama” din meniul contextual.
- În fereastra de dialog pop-up „Mutare diagramă”, selectați noua foaie din lista „Obiect în” și faceți clic pe „OK”.
- Imediat, graficul selectat va fi mutat.
- Acum, puteți utiliza acest mod pentru a procesa toate diagramele din toate foile de lucru una câte una.
Metoda 2: Mutare în lot cu Excel VBA
- Pentru început, lansați editorul Excel VBA conform „Cum să rulați codul VBA în Excel".
- Apoi, introduceți următorul cod într-un modul sau proiect.
Sub MoveAllCharts() Dim strNewSheet As String Dim objTargetWorksheet As Worksheet Dim objWorksheet As Worksheet Dim objChart As Object 'Creați o foaie nouă strNewSheet = "Grafice" ActiveWorkbook.Worksheets.Add(Before:=Application.Worksheets(1)).Name = strNewSheet Set objTargetWorksheet = Application.Worksheets(strNewSheet) Pentru fiecare objWorksheet din Application.ActiveWorkbook.Worksheets Dacă objWorksheet.Name <> strNewSheet Apoi „Mutați fiecare diagramă în noua foaie unul câte unul Pentru fiecare objChart În objWorksheet.ChartChartlObjects.OjLocationObjects.Objects. strNewSheet Next objChart End If Next objTargetWorksheet.Activate End Sub
- Apoi, apăsați direct „F5” pentru a rula această macrocomandă chiar acum.
- Când macro-ul se termină, părăsiți editorul VBA.
- În fereastra principală Excel, puteți vedea o nouă foaie de lucru, în care puteți vedea toate diagramele.
Comparaţie
| Avantaje | Dezavantaje | |
| Metoda 1 | Ușor de operat | Trebuie să te miști unul câte unul |
| Metoda 2 | Poate procesa toate diagramele în vrac | Utilizatorii trebuie să se ferească de macrocomenzi externe |
Reparați fișierul Excel deteriorat
Fișierul Excel este predispus la corupție, deoarece Excel se poate prăbuși din când în când. Într-o astfel de circumstanță, ar fi mai bine să pregătești un puternic și demn de încredere recuperare xlsx instrument, cum ar fi DataNumen Excel Repair. Va fi util atunci când fișierul dvs. Excel este corupt și funcția de recuperare automată a Excel nu funcționează.
Introducerea autorului:
Shirley Zhang este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv repara sql și produse software de reparații Outlook. Pentru mai multe informații vizitați www.datanumen.com