Insert text in word at current cursor's location

[sreedhardasi]

I am writing a Shared COM Add-in for Word and Excel. I am trying to
insert the text in the current cursor's location within the word
document. I got the following code for Excel where it inserts text in
the current active cell.

Dim range As Microsoft.Office.Interop.Excel.Range =
appExcelObj.ActiveCell
range.Value = deValue

How do we do this in Word? Any help is appreciated.

Thanks

 

[stebain]

I am writing a Shared COM Add-in for Word and Excel. I am trying to
insert the text in the current cursor's location within the word
document. I got the following code for Excel where it inserts text in
the current active cell.

Dim range As Microsoft.Office.Interop.Excel.Range =
appExcelObj.ActiveCell
range.Value = deValue

How do we do this in Word? Any help is appreciated.

Thanks

Try Application.Selection.TypeText deValue, where "Application" is changed
to whatever the connection object is named.

Just a quick guess.

 

[sreedhardasi]

Thanks for the reply. The solution worked. Do you know how can we can
achieve this in PowerPoint?

 

[stebain]

Sorry, I don't.
I've never automated Pp.

Thanks for the reply. The solution worked. Do you know how can we can
achieve this in PowerPoint?

 

[Steve Rindsberg]

Thanks for the reply. The solution worked. Do you know how can we can
achieve this in PowerPoint?

Try:

' First ensure that there's some text selected
' (ppSelectionText is Long = 3)
If ActiveWindow.Selection.Type = ppSelectionText Then
ActiveWindow.Selection.TextRange.InsertAfter ("LOOK! New Text")
End If