vba - User input to select powerpoint presentation -


i've created macro helps powerpoint presentation needs updated every often.

rather going visual basic editor , importing macro each time i'd create button in separate presentation prompt user click on presentation macro needs work on. similar having excel document single button on work on workbook.

a code have similar in excel (gets user click on sheet , activates , runs macro on sheet) below.

dim uisheet worksheet  on error resume next     set uisheet = application.inputbox("select cell on key sheet.", type:=8).parent on error goto 0  if uisheet nothing     msgbox "cancelled" elseif msgbox("you selected " & chr(34) & uisheet.name & chr(34) & ", proceed?", vbokcancel + vbquestion, "accept/reject") = vbcancel     msgbox "cancelled"     exit sub end if  uisheet.activate

i'd prefer avoid creating add-in future users of macro (which won't me) have nice , super easy , won't have import add-ins.

or if has better idea i'm ears. how create powerpoint macro needs run in new presentation person doesn't know how use developer tab?

insert action button slide in pptm file users use. assign run macro when clicked. can part in slide show view

on insert tab, click shapes, , under action buttons (at bottom), click button shape want add. click location on slide, , drag draw shape button. in action settings dialog box, in mouse click tab. select run macro

here code use windows explorer have them select presentation, open it:

  application.filedialog(msofiledialogfilepicker)        .allowmultiselect = false  'only allows user select 1 file         ' set title of dialog box.       .title = "select file."  'put text user choose correct file         'clear filters add pptx filter       .filters.clear       .filters.add "powerpoint files", "*.pptx"   ' can file extension filter choices          ' show dialog box. if .show method returns true,         ' user picked @ least 1 file. if .show method returns         ' false, user clicked cancel.       if .show = true         fxname = .selecteditems(1)        end if    end  set opres = presentations.open(fxname, false, false, true) 'opres variable choosen file  opres.windows(1).activate  'activates presentation.

then add rest of update macro.

yes, users have open macro file, can run macro update chosen presentation easily.


Comments

Post a Comment

Popular posts from this blog

android - InAppBilling registering BroadcastReceiver in AndroidManifest -

i'm implementing inapp billing in android app. works well, however, i'm trying decouple broadcast receiver activity manifest. suggestion in android's trivialdrive sample: // important: dynamically register broadcast messages updated purchases. // register receiver here instead of <receiver> in manifest // because call getpurchases() @ startup, therefore can ignore // broadcasts sent while app isn't running. // note: registering listener in activity bad idea, done here // because sample. regardless, receiver must registered after // iabhelper setup, before first call getpurchases(). currently there's class extends broadcastreceiver : public class iabbroadcastreceiver extends broadcastreceiver { /** * intent action receiver should filter for. */ public static final string action = "com.android.vending.billing.purchases_updated"; private final iabbroadcastlistener mlistener; public iabbroadcastreceiver(iabbroadcastlistener listener) { m...
Read more

python Tkinter Capturing keyboard events save as one single string -

is possible store keyboard events 1 string? code below stores 1 char , prints it. card reader or bar code reader, contains collection of character/ string not 1 character @ time. goal save char pressed text variable. from tkinter import * root = tk() def key(event): text= event.char text+= event.char print ("pressed", text) def callback(event): frame.focus_set() print ("clicked at", event.x, event.y) frame = frame(root, width=100, height=100) frame.bind("<key>", key) frame.bind("<button-1>", callback) frame.pack() root.mainloop() currently, creating text variable , everytime key() function gets called, , text stores last character typed. you can define text module level variable , , use module level text inside key function - text = '' def key(event): global text text+= event.char print("pressed", text)
Read more

sql server - Why does Linq-to-SQL add unnecessary COUNT()? -

here tables: create table customer ( cid int primary key, name varchar(32) ) create table ord ( oid int primary key, cid int foreign key references customer, address varchar(20) ) here's linq-to-sql statement: var aaa = c in db.customer select new { c, o = c.ord.tolist() }; and here's inexplicable query generated linq-to-sql: select [t0].[cid] [cid], [t0].[name] [name], [t1].[oid] [oid], [t1].[cid] [cid2], [t1].[address] [address], (select count(*) [dbo].[ord] [t2] [t2].[cid] = [t0].[cid]) [value] [dbo].[customer] [t0] left outer join [dbo].[ord] [t1] on [t1].[cid] = [t0].[cid] order [t0].[cid], [t1].[oid] i want understand how rid of count(*) part. it's entirely uncalled for! linq needs count(*) in order determine number of entries returned o = c.ord.tolist() .
Read more