, zie de schoten, de eerste kaart is de vorm die je nodig hebt, nu wil je op een andere kaart worden geformatteerd.,,,,, deze speciale functie kan je helpen om een kaart van het formaat van de kaart is als volgt:,, 1.De keuze van de vorm van de kaarten te kopiëren, met 2.En dan op de rekening, en daarna, kopiëren, een screenshot:,,,,,, 3.En dan kies een andere kaart, je moet je opnieuw, en daarna thuis > >,, pasta, plakken, in de dialoog, in de vorm van pasta, inspectie, opties.Zie de schoten:,,, 4.Oké, dan, het formaat van de kaart, en zijn van toepassing op deze kaart, en herhaal de procedure, op elke kaart Formaat.Eindelijk krijg je als volgt:,,,,,,, een kopie van de kaart Formaat andere schema 's voor het creëren van een model, dat red je ook je formaat een grafiek model, en dan voor de andere vormen van de kaart van het type in de grafiek model.,,, 1.De keuze van de vorm van je nodig, voor het ontwerp rekening te houden, en als model,,,,,,,, zie: 2, foto 's.In de "Red de kaarten in het raam van het model", "model" een naam geven, en daarna de "redden".Het zal redden van de kaart van het type en de rest in de MAP, model kunnen kiezen als je een nieuwe kaart.,,,,,, 3.In het creëren van uw model kaart, en dan kan je veranderen. Dit model voor andere soorten, moet het formaat, de klik van de kaarten, de keuze van soorten, wijziging van de kaart, uit de context van de menu 's, een screenshot:,,,,,, 4.In de kaart van het type, veranderen, dialoog, klik, een model van een ruit, kies je de kaarten van het model, mijn model,,,,,,, vijf opties.En klik op het sluiten van deze dialoog, en de vorm van de kaart gekopieerd naar de geselecteerde kaarten.Kijk 's:,,,,,, 6.En herhaal de stappen 3 - 5 - formaat in een andere kaart.,,,, een kopie van de kaart en de vorm van de VBA de code, deze twee methoden, je moet plakken of wijziging van de kaart van de totstandkoming van een voor een, als er meer van de kaart moet worden gewist, de volgende Code kan je zal helpen de vorm van een tabel die onmiddellijk in de huidige tabel 1,.,,,.De keuze van de vorm moet worden toegepast op andere kaarten.Op het Alt+F11, open de sleutel, Microsoft visuele van toepassing.,,,,, 3.- steek, >, modules en paste de volgende modules: de,,,,, in het raam van de VBA - code: een kopie van de kaarten, tabellen, zoon, copychartformats (") updateby20140219 donkere WS als voor tabel donkere donkere xchart cht ChartObject figuur de schemering van de bxtitle voor BTITLE booleaanse booleaanse booleaanse de schemering is kampioen stitle donkere sxtitle koord touw. De groei van de schemering sytitle indicatoren als de schemering ITOTAL zolang iseries zolang de donkere, donkere sombere wel zon variatie van verschillende varianten van application.screenupdating = hypothese xchart = application.activechart ISOURCE = xchart.seriescollection.count geregeld WS = application.activesheet elke cht in ws.chartobjects als naam van de xchart.parent.parent.name. =En _ cht. De naam = xchart.parent.name dan andere cht. Grafiek index =. Seriescollection.count BTITLE =. Hastitle als BTITLE dan stitle =. Als charttitle.characters.text voorbij. Hasaxis (xlcategory) en bxtitle =. As (xlcategory). Hastitle als bxtitle dan sxtitle =. As (xlcategory). Als axistitle.characters.text hasaxis (xlvalue voorbij.) en op basis van de titel =. As (xlvalue). Hastitle als titel dan op basis van sytitle =. As (xlvalue). Als het einde van het axistitle.characters.text als xchart.chartarea.copy. Geplakt: xlformats ITOTAL seriesco = = = = = = = = = = = =.Aantal pakken als ITOTAL = studenten voor iseries = 1 + index = (index City wel zon te verdelen. SeriesCollection (iseries). In de formule ", en") = (verschillende delen. SeriesCollection (iseries +). In de formule ", en") (UBound (verschillende)) = City wel zon (UBound (City wel zon)). SeriesCollection (iseries). De formule = toetreding (verschillende ",") voor de iseries = ITOTAL naar de index + 1 stap 1. SeriesCollection (iseries). Verwijder dan als bxtitle. As (xlcategory). Hastitle = echt. As (xlcategory). Axistitle.characters.text = sxtitle als kampioen en dan is. As (xlvalue) hastitle = echt.(xlvalue). As. Axistitle.characters.text = sytitle als BTITLE dan. Hastitle = echt einde. Charttitle.characters.text = stitle als application.screenupdating = echt voorbij,,, 4, en volgens de F5, de code van de huidige werkzaamheden, en in alle andere cijfers in de tabel de toepassing en de keuze van de vorm, de schema 's, onmiddellijk.,,