Search results for query: *

Hi All I finally got to the bottom of this. Please see code below: Sub UpdateBiogs() ' This requires that you set a reference to Excel in Tools, References ' You could later change these to As Object to avoid that necessity Dim XlsxApp As Excel.Application Dim XlsxWork As...

Hi Skipvought Thanks for you comments, I will take that into consideration. Apologies if I have not thanked anyone which was not what I set out to do. I am however just a technical user and feel I don't have the skills to give any valuable input. Thanks Mark

Hi I have done the below code but keep getting an error. Any ideas? Sub ResizePicture() Dim shp As Shape Dim sld As Slide For Each sld In ActivePresentation.Slides For Each shp In sld.Shapes If shp.Type = msoPicture Then shp.Cut shp.PasteSpecial Format:="Picture (JPEG)", Link:=False...

Hi All Hope you are well. Have a quick question and hoping someone out there would be able to shed some light. We are having problems in PowerPoint 2007 with enhanced metafile images. People keep using these formats which we cannot stop. This causes powerpoint to run very slowly. We have...

Hi Gerry Thank you for your reply. I agree with you it seems this is not currently possible. I will have to think of a better way to attack this problem. Maybe my thought process on the way this could work is not correct. Main aim I am trying to get out of this is that we have 150 staff with...

and this is the complete code I am using: Sub OpenXlsxloop3() ' This requires that you set a reference to Excel in Tools, References ' You could later change these to As Object to avoid that necessity Dim XlsxApp As Excel.Application Dim XlsxWork As Excel.Workbook Dim...

Hi Skip That error is for the following line of code: ActivePresentation.Slides(iSlide).Shapes(i).Select Just under the end select. Thanks

Hi Skip I am getting the following error: Run-time error'-2147188160(80048240)': Shape (unknown member): Invalid request. To select a shape, its view must be active. Thanks for your help though, I will hunt around to see if I can find anything else to help. It is also not putting the text in...

Hi Skip Did you mean add this back in below Endif? ActivePresentation.Slides(iSlide).Shapes("Textbox" & i).textrange.Text = sValue Thanks

Hi SkipVought Apologies for not being more complete with my questions. I have tried the above code, what it seems to be doing now is just taking the last row from xls and filling in the 6 textboxes on the first slide but does not move to the next slides. I am not sure how better to explain...

Hi Gruuu I have also checked all the textboxes and they are all named correctly. For testing purposes I am only useing 21 boxes which are all named correctly eg Textbox1, Textbox2 etc upto Textbox21. Just seems to be only targeting the first 3 textboxes. Would it have something to do with the...

Hi Gruuu There will be between 6 and 9 on each slide. But never more than 9. This is basically for people's biographies. So each one will have a Name, Title and Biog textbox and there will only ever be 3 people on each slide.

Oh I am running this code from PowerPoint.

Hi SkipVought Thank you for the code. I have added to my VBA but keep getting a compile error - Method or data member not found for the TextRange.Text = sValue. I have tried changing the code a bit which works but it only uses the first 3 testboxes in the presentation so the last persons...

Hi Gruuuu Thank you very much, I will give this a go and let you know how I get on. Regards Mark

Hi All I was wondering if anybody can shed some light or point me in the right direction. I am busy writing some code to pull data from excel into powerpoint textboxes. I have managed to do this without any issues. The problem I am having now is that I have to write a bit of code for each...

Hi Gruuuu Currently I have not started any code as I was just checking if anyone knew which is the best way to go about it. Let me try explain it a bit better. I have an excel spreadsheet with data in, column headings: Name Title Biog Mark Assistant Was born in South Africa I...

Hi All Here is one that is driving me up the wall. Maybe best to explain what I am after and if I could find out what would be the best way to go about this. I currently have a Biography document in PPT 2007 which I want to link through all my documents (other presentations) to make it easier...

Hi All Any help with the below would be great. I am trying to select a specific slide master in order to insert watermark text on the slides which have the hide background graphics ticked. Code so far: Sub ToggleWatermarkTest() Dim HBShape As Shape If...

Hi PHV Thanks for that. I have tried the following code but keep getting the following error: Property let procedure not defined and property get procedure did not return object...