excel vba - Vba Powerpoint name a table -

-

i pasted table excel powerpoint code:

pptapp.commandbars.executemso ("pasteastablesourceformatting")

there other shapes on slide. how can make powerpoint find pasted table on slide , name it?

whenever paste in powerpoint appears on topmost layer can reference , optionally set name function:

option explicit  ' *********************************************************** ' purpose:  topmost shape current slide. ' inputs:   sname - optionally rename shape ' outputs:  returns shape object if slide not empty. ' author:   jamie garroch ' company:  youpresent ltd. http://youpresent.co.uk/ ' *********************************************************** function getpastedshape(optional sname string) shape   dim lcurslide long ' current slide index   lcurslide = activewindow.view.slide.slideindex   activepresentation.slides(lcurslide)     if .shapes.count = 0 exit function     ' set reference shape on top layer     set getpastedshape = .shapes(.shapes.count)     if sname <> "" .shapes(.shapes.count).name = sname     ' pasted objects should selected next line optional     getpastedshape.select   end end function

Comments

Post a Comment

Popular posts from this blog

Hatching array of circles in AutoCAD using c# -

-
i beginner in autocad plugins .i have created array of circle using following code. now, have hatch circles in array .how that??how hatch circles @ once? moreover, how can return hatch method , use hatch objects.sorry language.thanks in advance. [assembly: commandclass(typeof(beamsection.class1))] namespace beamsection { public class class1 { //class1 obj = new class1(); [commandmethod("beamatsupport")] public void addlightweightpolyline() { // current document , database document acdoc = application.documentmanager.mdiactivedocument; database accurdb = acdoc.database; promptpointresult ppr = acdoc.editor.getpoint("\nselect starting point "); var ucs = acdoc.editor.currentusercoordinatesystem; point3d startingpt = ppr.value.transformby(ucs); list<double> radius = new list<double>(); radius.add(0.5); ...
Read more

ios - UITEXTFIELD InputView Uipicker not working in swift -

-
hello trying pop uipickerview view programmatically when user clicks on textfield. have tried doesn't doing anything. isn't working. nothing happening when click textfield class userprofiletableviewcontroller: uitableviewcontroller,uitextfielddelegate,uipickerviewdelegate,uipickerviewdatasource { var itempicker: uipickerview! = uipickerview() @iboutlet weak var gendertxtfield: uitextfield! var gender = ["male","female"] override func viewdidload() { super.viewdidload() gendertxtfield.delegate = self itempicker!.delegate = self itempicker!.datasource = self itempicker!.backgroundcolor = uicolor.blackcolor() self.gendertxtfield.inputview = itempicker } func numberofcomponentsinpickerview(pickerview: uipickerview) -> int{ return 1 } // returns # of rows in each component.. func pickerview(pickerview: uipickerview, numberofrowsincomponent component:...
Read more