Using Excel VBA To Create PowerPoint With 4 Charts In Each Slide
Aug 2, 2013
I am trying to write a macro that goes in an excel file that creates a powerpoint presentation, and puts four (4) charts in each slide.. I currently have a code that is pasting all of the charts in the same slide and I can't figure out why it isn't working (side note: I haven't attempted to resize or relocate the pictures on the powerpoint slides yet)..
Code:
'Add a reference to the Microsoft PowerPoint Library by:
'1. Go to Tools in the VBA menu
'2. Click on Reference
'3. Scroll down to Microsoft PowerPoint X.0 Object Library, check the box, and press Okay
'keep button in same location
Set btn = ActiveSheet.Shapes("CommandButton17")
With btn
btLeft = .Left
btTop = .Top
End With
[code]....
View 2 Replies
ADVERTISEMENT
Dec 2, 2011
Code to go to a certain slide in Powerpoint. I kept trying to run the code in Excel VBA and it never worked.
So I said "why not try this code in Powerpoint to see if it works?' and, low and behold, it worked!
What I need is to get the code below, which works in Powerpoint VBA, to work in Excel VBA.
Code:
Sub gothere()
On Error Resume Next
ActivePresentation.SlideShowWindow.View.GotoSlide 3
If Err 0 Then ActiveWindow.View.GotoSlide 3
End Sub
View 3 Replies
View Related
Feb 18, 2013
I am using an excel spread sheet as a larger display on a huge projected screen with numbers at a large charity event. It is a reverse raffle, so as your name is called you are out of the raffle. I would like to link the cell to a specific powerpoint slide which has the name and town of the specific ticket buyer. When double clicking on the cell listing their number the ticket buyers name and town would appear as a powerpoint a window in the middlle of the excel screen for all to see and then disappear after a few seconds or disappear when the next cell is double clicked. putting excel data into powerpoint slldes but not the other way around!
View 7 Replies
View Related
Feb 19, 2012
For the chart in the excel worksheets, does anymore know who to copy it to the powerpoint slide with VBA? (either straight copy and paste, or copy and paste in as picture?)
View 4 Replies
View Related
Oct 28, 2011
Which the best procedure to copy a chart into a powerpoint slide from a excel workbook? So that when I update the chart data in the excel workbook I can update it even in the powepoint slide ....
View 1 Replies
View Related
Jan 17, 2014
I have a table in excel where I'm trying to hyperlink to specific side in a powerpoint presentation. I've found various sites instructing me to use #slidenumber (eg #4) at the end of the filename when editing the link, however many different combinations of slide numbers and names i use it refuses to open the deck at that set slide, always taking me to the beginning. I've tried using the bookmark option in excel but that gives a error messaging stating bookmarks cannot be used in xml files.
View 1 Replies
View Related
May 21, 2012
I need to transfer data to powerpoint from my '4 box' reports in excel.
Essentially copying everything in the range A40:U74 inc charts and paste them into a slide as a picture on the click of a macro button.
I have to do alot of reports like this for my project and it takes up alot of time copying and pasting etc.
I have seen different codes for this but they are either for charts only or text... the one i did see for both, didnt work at all.
View 1 Replies
View Related
Apr 14, 2014
I've been using a VBA code to look through my spreadsheet and find any graphs in any tab and move it to powerpoint. I have about 70 tabs with 7 graphs each.
I have is that the order of the graphs in the slidepack isn't in the same as found on each excel tab.I also tried renaming them (chart1-chart7) but problem still remains.
View 3 Replies
View Related
Jun 9, 2005
I need to export serveral charts to several slides within PowerPoint from Excel Using VBA. I use 2002 versions. I added chartobjects (2) under 1 but not sure if that is the correct placement to start adding more charts to slides.
Private Sub CommandButton1_Click()
'Sub PowerPointOLEAutomation()
Dim ppt As Object, pres As Object
'Create a Microsoft PowerPoint session
Set ppt = CreateObject("powerpoint.application")
'Copy the chart on the Chart Labels Demo sheet
Worksheets("sw dr").ChartObjects(1).Copy
'Worksheets("sw dr&ot").ChartObjects(2).Copy
'Create a new document in Microsoft PowerPoint
Set pres = ppt.Presentations.Add.........................
View 4 Replies
View Related
Feb 20, 2007
I am trying to export charts to powerpoint. I have a sheet where the user gives the list of excel files and sheet names (charts as sheet) to be imported. I run a loop to create this... but then i get a script out of range error.
Sub Chart2PPT()
Dim objPPT As Object
Dim objPrs As Object
Dim shtTemp As Worksheet
Dim chtTemp As Chart
Dim intSlide As Integer
Dim FSO As Object
Dim FromPath As String
Dim ToPath As String
Set FSO = New FileSystemObject
If FSO.FileExists("\server4meme.ppt") Then
Kill ("\server4meme.ppt")
End If
Set FSO = New FileSystemObject
If FSO.FileExists("\server4me ot.xls") Then
Kill ("\server4me ot.xls").........................
View 6 Replies
View Related
Sep 19, 2013
I'm looking for the below requirement:
Name
Date
Sales1
Sales2
Daniel
01/18/11
4,907.00
2,038.00
[Code] ..........
Required output....
Name
Date
Sales1
Sales2
Name
Date
Sales1
Sales2
[Code] ......
Need macro code to segregate the data...
View 1 Replies
View Related
May 12, 2009
I don't know if this is possible, but is there a way to have a macro in Excel copy and paste charts into a Powerpoint file? I've got a program that creates all the material needed for a Powerpoint slide deck and I want to automate the copy/paste work.
View 2 Replies
View Related
Nov 9, 2011
How to temporarily disable PowerPoint charts which are linked to Excel. The problem is, whenever I copy a slide and try to paste it elsewhere, Office attempts to update all of the links in the entire PowerPoint. Since the slide deck has so many links, this takes an awful lot of time to do. I don't want to break the links completely as I would lose any ability to keep them dynamic. I've checked all of the advanced options within PowerPoint, but cannot find any way to temporarily disable links from updating.
View 1 Replies
View Related
Jun 16, 2006
Right now the code takes charts & tables from all sheets in a workbook. I would like to limit this to only charts on one tab - CHARTS.
I am also looking to tweak this to open an existing presentation, as well as apply a template instead of simply pasting to blank slides.
Sub Chart2PPT()
Dim objPPT As Object
Dim objPrs As Object
Dim objSld As Object
Dim shtTemp As Object
Dim chtTemp As ChartObject
Dim objShape As Shape
Dim objGShape As Shape
Dim intSlide As Integer
Dim blnCopy As Boolean
Set objPPT = CreateObject("Powerpoint.application")
objPPT.Visible = True
objPPT.Presentations.Add
objPPT.ActiveWindow.ViewType = 1 'ppViewSlide
For Each shtTemp In ThisWorkbook. Sheets
blnCopy = False
If shtTemp.Type = xlWorksheet Then
For Each objShape In shtTemp.Shapes 'chtTemp In shtTemp.ChartObjects
blnCopy = False
If objShape.Type = msoGroup Then
' if ANY item in group is a chart................
View 9 Replies
View Related
Jun 22, 2014
I have created a powerpoint that has linked charts from excel. Stupidly, I have saved both of these files (powerpoint and excel) on my desktop.
I need to save them on another drive (so they can be accessed by others) but i am worried that if i move the original excel file, it will break the links for the charts in the powerpoint file....
I have over 150 charts so I don't fancy going through and re-pasting each chart.
View 1 Replies
View Related
Sep 28, 2012
I have a monthly task where I collect raw data, and make up various charts in PowerPoint.
I have been making the charts in PowerPoint as previously, the file size of the .ppt was too large as it was embedding the Excel sheets into the PowerPoint. Is there any way I can set up sheets in Excel so that I can update them every month and then run a macro so that it updates the graphs automatically (without the embedding)?
I think copying them over as a JPG might work but is there any other way? I have no idea about the code needed, and I'm using Office 2003.
View 3 Replies
View Related
Jun 5, 2013
The problem I am having is that the data I am transferring is going to top of column cell first and then when I run the macro again it skips down to the next empty cell in the column...what I want it to do is paste the data into the next empty cell...
Here is the code I am using
Code:
Private Sub CommandButton1_Click()
Dim oExcel As Excel.Application
Dim oWB As Excel.Workbook
Dim oWS As Excel.Worksheet
Set oExcel = New Excel.Application
oExcel.Visible = True '
View 1 Replies
View Related
May 6, 2014
I have an excel that gets updated monthly for reporting. The goal is to get the graphs to update automatically by linking them from excel into power point. This is relatively easy but what when I go to update the report for the next month the data for the old power point changes as well. Is there a way to prevent this?
View 1 Replies
View Related
Sep 25, 2011
I have 3 potx files, for one of them the links come out as:
Site Safety Metrics Rollup.xlsm!PPT1!R101C2:R118C14
the other are like:
C:EHS ReportsTFP EHS ReportSite Safety Metrics Rollup.xlsm!PPT1!R192C2:R209C14
I want to have the same format as the first one i.e., without the path. When the potx files are refreshed the link file will always be opened, so i do not need the path (this is part of a vba program).
The folder containing the files will be sent around and put in different drives.
'EHS Reports' is the main folder and that and everything else inside will remain the same. But the ppt links will not change so obviously will not update when the 'EHS Reports' folder is somewhere else.
Why did the links show up in different formats?
View 2 Replies
View Related
Jun 17, 2014
I am having difficulty trying to access excel from powerpoint and run a VLookup. I think my problem is somewhere around the xlworkbooks.application.VLookup...(line) Herre is the code i am using below
Code:
Private Sub loginbtn_Click()
If txtUsername.Text = "admin" And txtPassword.Text = "admin" Then
frmMenu2.Show
[Code]....
View 2 Replies
View Related
Oct 25, 2012
I have excel graphs linked to a power point presentation that runs in a loop and I would like have to the links update everytime slide 1 pops up or when the loop restarts, either one works for me. When I close the looping presentation and reopen it I get a message asking me if I want to update the charts, but I would really prefer the looping presentation to update itself. I know this is going to be a VBA setup, but I cant seem to figure it out. I pasted the links by: pasting special, paste link as microsoft office excel worksheet object.
View 8 Replies
View Related
Oct 6, 2013
I have a powerpoint presentation which has a bunch of Excel charts embedded as Microsoft Office Graphic Objects, but I don't have access to the source data (plus the links are broken).
how to get the underlying data. I vaguely recall once doing this with some vba that I had found somewhere the net, but I don't have the code anymore.
I have some code that works within Excel however:
Code:
Sub GetChartValues()
' this macro will recover the data from a disconnected Microsoft Graphic Object (such as we used to paste
' into PowerPoint). You will need to insert a Worksheet entitled "ChartData" to store the values.
Dim NumberOfRows As Integer
[code].....
how to make this code work in PowerPoint?
View 4 Replies
View Related
Mar 2, 2007
way to find out if an Excel file is open from PowerPoint. I know there are ways to open the Excel file, but you can get a warning message if the file is already open. So I want to check to see if it is open first before I go to the code that opens it.
View 9 Replies
View Related
Apr 21, 2013
I don't mind paying for the add-on/add-in, I need to have a chart displayed of 100 rows and 1000 cells of data.
View 6 Replies
View Related
Nov 20, 2013
I am new to VBA and i need to write a VBA code that should transfer or export any selected thing (whether it may be table, cell or chart ) in Excel Sheet to Powerpoint presentation. My excel Sheet consist of a table and a chart generated from this table.
View 9 Replies
View Related
Feb 14, 2012
So far my VBA will copy my range of cells in Excel and paste them into Powerpoint but I'm totally stuck as to how to resize the image from there. I've tried a bunch of different methods and I get some pretty crazy results but can't seem to punch through to a solution. What I'd like it to do, at the end of the VBA is:
Set the lock aspect ratio to false
Set the Height to 5.5"
Set the Width to 9.83"
Set the horizontal position to .08 from Top Left
Set the Vertical position to .58 from Top Left
I cannot seem to get my save as portion to work at all. I commented it out at the bottom. This is all in Excel and PPT 2007.
Here is what I have so far:
Sub Export_Excel_to_PowerPoint()
Dim ppApp As PowerPoint.Application
Dim ppSlide As PowerPoint.Slide
On Error Resume Next
Set ppApp = GetObject(, "PowerPoint.Application")
On Error GoTo 0
[Code]...
Ultimately the behavior I'm looking for with this macro is to copy a filtered range of cells from Excel and paste it as a picture into Powerpoint (up til this point I'm golden) then resize the image on the slide, save the presentation, then exit PPT.
View 1 Replies
View Related
Aug 8, 2013
If I have a simple spreadsheet with Name, Class, and date in Columns A, B, and C. Labeled as NAME , CLASS, and DATE acccordingly is there a way to merge that data onto a certificate in powerpoint so the result is a slide of each student?
I can do this in word easily and perhaps the easy answer is to just convert the certficate slide to word and go from there?
View 3 Replies
View Related
Mar 7, 2014
I've created a powerpoint with a number of slides, and I need to put a textbox at the bottom. I want to change the colour of the textbox border colour.
Code:
For intCount = 1 To 5
Set tmpTxtBox = pptApp.ActivePresentation.Slides(intCount).Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, Left:=120, Top:=500, Width:=500, Height:=100).TextFrame.TextRange
tmpTxtBox.Text = strTolerance
tmpTxtBox.Font.Name = "Arial"
tmpTxtBox.Font.Size = 12
tmpTxtBox.Font.Size = 12
tmpTxtBox.ParagraphFormat.Alignment = ppAlignCenter
' ??? tmpTxtBox.Line.ForeColor = RGB(255, 0, 0)
Next intCount
I've tried everything I can think of for that line with the ??? in, .line.color, .color, .bordercolor but Excel VBA doesn't like any of them , I get error 438 'object doesn't support this property or method'.
View 2 Replies
View Related
Aug 18, 2012
I'm trying to create multiple Charts with VBA, each chart on a seperate Sheet. The link below works but i need to change it some and i'm stuck. What i'm trying to do is create a new sheet for each new graph, but I need it to create a graph for the 250 associates in column B then plot 52 weeks of their % from the Row their name shows up in. First name is in (B3), his % data is in range (N3:BO3). I have the weeks numbered out 1-52 in (N2:BO2) and i'd like their name to appear in the Tab and on top of the graph. I applied the VBA code from the link below to my sheet and changed what i knew i needed to change, but it debugs. I use to do each graph manually when i had 25 associates but i would like to use this for the whole building now.
[URL]
View 9 Replies
View Related
Nov 13, 2009
how to create dashboards or charts. I am looking for similar website like http://www.datapigtechnologies.com/. this is very good website for those of you who need to do some fancy staff with excel.
View 2 Replies
View Related
