View Single Post
 
Old 10-03-2022, 06:55 PM
Guessed's Avatar
Guessed Guessed is offline Windows 10 Office 2016
Expert
 
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 4,176
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default

In theory this would be done like this
Code:
Sub InsertMe()
  With Application.Dialogs(wdDialogInsertSymbol)
    .Font = "Symbol"      'this isn't working for me
    SendKeys "%fsym{DOWN}{ENTER}"
    .Show
  End With
End Sub
However that .Font line isn't working for me and I don't know why. I've added the dodgy SendKeys line to mimic the keyboard steps.
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote