SendKeys Compile Error

[jagrenet]

Hello,

I am attempting to use SendKeys in vba to "send" Enter to a Word doc. I keep getting a Compile error even after the variable is declared.
This code already lives inside a working Sub Routine, just want to "add" this function.

Dim SndEnter As Variant

Set SndEnter = Application.SendKeys("{ENTER}", True)

With
(working Application.Selection code

SndEnter
End With

"Compile Error - Expected Function or variable "

Not sure why this error is coming up.
Any ideas ??

Thanks in advance

 

[Tetra201]

May just use the Selection.TypeParagraph method.

 

[RoryA]

Sendkeys doesn’t return anything.

 

[jagrenet]

Sendkeys doesn’t return anything.

The code gets "hung" on the error.

 

[jagrenet]

Sendkeys doesn’t return anything.

It stops at the highlighted section -
Set SndEnter = Application.SendKeys("{ENTER}", True)

 

[RoryA]

Yes, my point is that SendKeys doesn't return anything so there is no result to assign to your variable. What are you expecting the variable to contain?

 

[jagrenet]

Yes, my point is that SendKeys doesn't return anything so there is no result to assign to your variable. What are you expecting the variable to contain?

The only reason I set it as a variable is because a different error message prompted for it.
I have the Word document Open. The Collapsed Selection has the cursor at thhe beginning of the sentence, exxactly where I want it. I simply want to "send" Enter, so that whole sentence goes to the beginning of the next line. When I do this manually it works perfectly. I wouold like for my code to perform this task.

With doc.Application.Selection

.Find.Text = "Some Text"
.Find.Execute
.Next(Unit:=wdWord, Count:=1).Select
.InsertDateTime DateTimeFormat:="MMMM yyyy", InsertAsField:=True
.Text = " "
.Next(Unit:=wdWord, Count:=1).Select
.Delete

'NEED TO SOMEHOW SEND {ENTER} - RIGHT HERE - BEFORE MOVING FORWARD

SndEnter

End With

 

[RoryA]

I can't believe you would need Sendkeys for this at all. I would think you would simply add a carriage return (or similar, Word not being my thing) to the document text.

 

[jagrenet]

I can't believe you would need Sendkeys for this at all. I would think you would simply add a carriage return (or similar, Word not being my thing) to the document text.

If I can make that work ..... with my code, I would be happy to. How is that done via VBA ???

 

[jagrenet]

May just use the Selection.TypeParagraph method.

PERFECT !!!!! Now, I need to "Select" the entire sentence and set Line Spacing and "Justify" left. Tetra201, thank you for pointing out that Method. I have been trying to figure out a way to do that for a couple of days. How do I select the entire sentence ??