Ir teikts, ka līdz pat 50 procentiem PowerPoint prezentāciju ir dati, kas ir nokopēti tieši no programmas Excel. Šim apgalvojumam nav grūti noticēt. Bieži vien ir daudz vieglāk analizēt un izveidot diagrammas un datu skatus programmā Excel nekā programmā PowerPoint. Kad šīs diagrammas un datu skati ir izveidoti, kāpēc gan tos vienkārši nepārvietot programmā PowerPoint? Šajā sadaļā esošais makro ļauj dinamiski izveidot PowerPoint slaidus, kuros ir dati no jūsu norādītā diapazona.
Varat lejupielādēt darba piemēru Excel datu nosūtīšanai uz programmu PowerPoint .
Šajā piemērā jūs kopējat diapazonu no Excel faila un ielīmējat šo diapazonu slaidā jaunizveidotā PowerPoint prezentācijā.
Ņemiet vērā: tā kā šis kods tiks palaists no programmas Excel, jums ir jāiestata atsauce uz Microsoft PowerPoint objektu bibliotēku. Atsauci var iestatīt, programmā Excel atverot Visual Basic redaktoru un izvēloties Rīks→ Atsauces. Ritiniet uz leju, līdz atrodat ierakstu Microsoft PowerPoint xx Object Library, kur xx ir jūsu PowerPoint versija. Atzīmējiet izvēles rūtiņu blakus ierakstam.
Sub CopyRangeTo Presentation ()
1. darbība: deklarējiet savus mainīgos
Dim PP kā PowerPoint.Application
Dim PPPres kā PowerPoint.Presentation
Dim PPSlide kā PowerPoint.Slide
Dim SlideTitle kā virkni
2. darbība. Atveriet programmu PowerPoint un izveidojiet jaunu prezentāciju
Iestatiet PP = New PowerPoint.Application
Iestatiet PPPres = PP.Presentations.Add
PP.Redzams = patiess
3. darbība. Pievienojiet jaunu slaidu kā 1. slaidu un iestatiet tam fokusu
Iestatīt PPSlide = PPPres.Slides.Add(1, ppLayoutTitleOnly)
PPSlide.Atlasiet
4. darbība: kopējiet diapazonu kā attēlu
Sheets ("Slaida dati"). Diapazons ("A1:J28"). CopyPicture _
Izskats:=xlScreen, Format:=xlPicture
5. darbība. Ielīmējiet attēlu un pielāgojiet tā pozīciju
PPSlide.Formas.Ielīmēt.Atlasīt
PP.ActiveWindow.Selection.ShapeRange.Align msoAlignCenters, True
PP.ActiveWindow.Selection.ShapeRange.Align msoAlignMiddles, True
6. darbība. Pievienojiet slaidam virsrakstu
SlideTitle = "Mans pirmais PowerPoint slaids"
PPSlide.Shapes.Title.TextFrame.TextRange.Text = SlideTitle
7. darbība. Atmiņas tīrīšana
PP.Aktivizēt
Iestatīt PPSlide = nekas
Iestatīt PPPres = nekas
Iestatīt PP = nekas
Beigt apakš
1. darbībā jūs deklarējat četrus mainīgos: PP ir objekta mainīgais, kas atklāj PowerPoint lietojumprogrammas objektu, PPPres ir objekta mainīgais, kas atklāj PowerPoint prezentācijas objektu, PPSlide ir objekta mainīgais, kas atklāj PowerPoint slaida objektu, un SlideTitle ir virkne. mainīgais, ko izmanto, lai nodotu tekstu slaida nosaukumam.
2. darbība atver programmu PowerPoint ar tukšu prezentāciju. Ņemiet vērā, ka lietojumprogrammas PowerPoint rekvizītu Visible iestatījāt uz True, lai nodrošinātu, ka koda darbības laikā varat redzēt darbību.
3. darbībā prezentācijai jāpievieno jauns slaids, izmantojot slaida objekta pievienošanas metodi. Ņemiet vērā, ka izmantojat ppLayoutTitleOnly, nodrošinot, ka slaids ir izveidots ar virsraksta teksta rāmi. Pēc tam veicat papildu soli un iestatāt fokusu uz slaidu. Tas nozīmē, ka jūs skaidri sakāt programmai PowerPoint atlasīt šo slaidu, padarot to aktīvu.
4. darbībā izmantojiet metodi CopyPicture, lai kopētu mērķa diapazonu kā attēlu. Šeit kopētais diapazons ir diapazons no A1 līdz J28 cilnē Slaida dati.
5. darbība ielīmē attēlu aktīvajā slaidā un centrē attēlu gan horizontāli, gan vertikāli.
6. darbībā virsraksta tekstu saglabājat virknes mainīgajā un pēc tam nododat šo mainīgo programmai PowerPoint, lai lietotu tekstu virsraksta teksta rāmī.
Veicot 7. darbību, jūs atlaižat mainīgajiem piešķirtos objektus, samazinot iespēju, ka radīsies problēmas, ko izraisa negodīgi objekti, kas var palikt atvērti atmiņā.
Lai ieviestu šo makro, varat to kopēt un ielīmēt standarta modulī:
Aktivizējiet Visual Basic redaktoru, nospiežot Alt+F11.
Projekta logā atrodiet sava projekta/darbgrāmatas nosaukumu.
Izvēlieties Ievietot → Modulis.
Ierakstiet vai ielīmējiet kodu.
Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows Microsoft Word atver failus tikai lasīšanas režīmā, padarot tos neiespējamu rediģēt? Neuztraucieties, metodes ir norādītas zemāk
Kā labot kļūdas, drukājot nepareizus Microsoft Word dokumentus.Kļūdas Word dokumentu drukāšanā ar mainītiem fontiem, nekārtīgām rindkopām, trūkstoša teksta vai pazaudētu saturu ir diezgan izplatītas. Tomēr nevajag
Ja prezentācijas laikā esat izmantojis pildspalvu vai marķieri, lai zīmētu uz PowerPoint slaidiem, varat saglabāt zīmējumus nākamajai prezentācijai vai izdzēst tos, lai nākamajā reizē, kad to parādīsit, jūs sāktu ar tīriem PowerPoint slaidiem. Izpildiet šos norādījumus, lai dzēstu pildspalvas un marķiera zīmējumus: Līniju dzēšana pa vienai […]
Stilu bibliotēkā ir CSS faili, paplašināmās stila lapu valodas (XSL) faili un attēli, ko izmanto iepriekš definētas šablona lapas, lapu izkārtojumi un vadīklas programmā SharePoint 2010. Lai atrastu CSS failus publicēšanas vietnes stilu bibliotēkā: izvēlieties Vietnes darbības → Skatīt Viss vietnes saturs. Tiek parādīts vietnes saturs. Stila bibliotēka atrodas […]
Nepārsedziet savu auditoriju ar milzīgiem skaitļiem. Programmā Microsoft Excel varat uzlabot informācijas paneļu un pārskatu lasāmību, formatējot skaitļus tā, lai tie tiktu rādīti tūkstošos vai miljonos.
Uzziniet, kā izmantot SharePoints sociālo tīklu rīkus, kas ļauj indivīdiem un grupām sazināties, sadarboties, koplietot un sazināties.
Jūlija datumi ražošanas vidēs bieži tiek izmantoti kā laikspiedols un ātra atsauce partijas numuram. Šāda veida datuma kodēšana ļauj mazumtirgotājiem, patērētājiem un pakalpojumu aģentiem noteikt produkta izgatavošanas laiku un līdz ar to arī produkta vecumu. Jūlija datumi tiek izmantoti arī programmēšanā, militārajā jomā un astronomijā. Savādāk […]
Programmā Access 2016 varat izveidot tīmekļa lietotni. Kas tad vispār ir tīmekļa lietotne? Tīmeklis nozīmē, ka tas ir tiešsaistē, un lietotne ir tikai “lietojumprogrammas” saīsinājums. Pielāgota tīmekļa lietotne ir tiešsaistes datu bāzes lietojumprogramma, kurai var piekļūt no mākoņa, izmantojot pārlūkprogrammu. Jūs veidojat un uzturat tīmekļa lietotni darbvirsmas versijā […]
Lielākā daļa SharePoint 2010 lapu ātrās palaišanas joslā lapas kreisajā pusē parāda navigācijas saišu sarakstu. Ātrās palaišanas joslā tiek rādītas saites uz piedāvāto vietņu saturu, piemēram, sarakstiem, bibliotēkām, vietnēm un publicēšanas lapām. Ātrās palaišanas joslā ir divas ļoti svarīgas saites: Visa vietnes satura saite: […]
Vienkāršām problēmām risinātājs programmā Excel parasti ātri atrod optimālās Risinātāja mainīgā vērtības mērķa funkcijai. Taču dažos gadījumos Solver ir grūti atrast Solver mainīgā vērtības, kas optimizē mērķa funkciju. Šādos gadījumos Solver parasti parāda ziņojumu vai kļūdas ziņojumu, kurā aprakstīta vai apspriesta problēma, ko […]
