whycomputer.com >> Datornätverk >  >> Programvara

Hur man automatiskt kopierar från Excel till PowerPoint med ett VBA -makro

Om du någonsin ville påskynda överföringen av data från en Microsoft Excel -arbetsbok till din Microsoft PowerPoint -presentation, sedan med hjälp av ett makro och Visual Basic för applikationer är vägen att gå. VBA är ett datorprogrammeringsspråk som används i Microsoft Office -applikationer för att automatisera processer som kopiering av data från Excel. Ett makro låter dig spara en uppsättning instruktioner som du kan utföra om och om igen med ett klick på en knapp.

Steg 1

Starta Excel, skriv "Alan" i "A1, "" Daniel "i" A2, "" Kitzia "i" A3, "" Oscar "i" A4 "och" Yarexli "i" A5. "Tryck på" CTRL "och" S "för att spara arbetsboken i" C:\ "som" ExcelFile.xlsx. "Stäng Excel.

Steg 2

Starta PowerPoint, klicka på fliken "Utvecklare" och klicka på "Makron" för att öppna dialogrutan Makro. Skriv "copyFromExcel" under Makronamn och klicka på "Skapa" -knappen. Klicka på "Verktyg" -menyn och klicka på "Referenser" för att öppna dialogrutan Referenser. Rulla ner och markera rutan bredvid "Microsoft Excel Objektbibliotek "och klicka på" OK ".

Steg 3

Kopiera och klistra in följande för att skapa de variabler du ska använda för att kopiera data från Excel:Dim sourceXL As Excel.Application Dim sourceBook As Excel.Workbook Dim sourceSheet As Excel.Worksheet Dim dataReadArray (10) As String Dim myPress As Presentation Dim newSlide Som bild

Steg 4

Ange värden för objektvariablerna:Ange sourceXL =Excel.Application Ange sourceBook =sourceXL.Workbooks.Open ("G:\ ExcelFile.xlsx") Ange sourceSheet =sourceBook.Sheets (1) Set myPres =ActivePresentation Ange newSlide =myPres.Slides .Add (Index:=myPres.Slides.Count + 1, Layout:=ppLayoutText)

Steg 5

Läs data i Excel -filen och lagra dem i en strängmatris:sourceSheet.Range ("A1"). Välj dataReadArray (0) =sourceSheet.Range ("A1"). Värde sourceSheet.Range ("A2"). Välj dataReadArray (1) =sourceSheet.Range ("A2"). Value sourceSheet.Range ("A3"). Välj dataReadArray (2) =sourceSheet.Range ("A3"). Value sourceSheet.Range ("A4"). Välj dataReadArray (3) =sourceSheet.Range ("A4"). Värde sourceSheet.Range ("A5"). Välj dataReadArray (4) =sourceSheet.Range ("A5"). Värde

Steg 6

Lägg till data från strängmatrisen till en ny bild i din nuvarande presentation:newSlide.Shapes (1) .TextFrame.TextRange ="Data kopierad från Excel" newSlide.Shapes (2) .TextFrame.TextRange =dataReadArray (0) &vbNewLine &_ dataReadArray (1) &vbNewLine &_ dataReadArray (2) &vbNewLine &_ dataReadArray (3) &vbNewLine &_ dataReadArray (4) &vbNewLine

Steg 7

Stäng arbetsboken:sourceBook.Close

Byt till PowerPoint -fönstret och klicka på "Makron". Klicka på "Kör" för att köra "copyFromExcel" -makrot och lägga till en ny bild med data kopierade från Excel -filen som du skapade i steg 1.


URL:https://sv.whycomputer.com/programvara/1014001198.html

Programvara
  • Hur man skapar en PowerPoint -presentation från en artikel

    Microsoft Powerpoint används för att skapa visuella hjälpmedel för presentationer av företag, kyrkor, skolor och någon annan organisation eller individ som håller presentationer. Powerpoint kan också användas för att skapa sammanfattningar när en formell presentation inte krävs. Att skapa en artikel

  • Hur man skapar fakturor från Excel 2007

    Med Microsoft Office 2007, Att använda ett Excel-kalkylblad för anpassade företagsfakturor kan vara den mest kostnadseffektiva lösningen för att hjälpa till med hanteringen av ditt lilla företag. Online mallar från Microsoft Office webbplats integreras direkt i Excel för enkel åtkomst. Du kan bläddr

  • Hur man kopierar en Excel -fil till min E -enhet

    Excel -filer är kalkylarkdokument som skapats av Microsoft Office Excel -programvara. E:-enheten i din dator är troligen en flyttbar lagringsenhet, eftersom A:och B:slots är reserverade för diskettstationer, C:platsen är för hårddisken, och D:-platsen är reserverad för den optiska enheten (CD/DVD).

Datornätverk © https://sv.whycomputer.com