[SOLVED] Return alt-enter when enter is pressed in a specific cell

Perhaps you could use a TextBox object from the Drawing toolbar and place it on the worksheet over your cell. Assign a macro to it to paste the text in your cell or do what you need done.

Okay - figured it out after a night's sleep:

I changed the worksheet_change sub:

Private Sub Worksheet_Change(ByVal target As Range)
FOO
If target.address = Range("Descriptionspot").address Then
    If tabwaspressed = False Then
        Range("Descriptionspot").Select
        Application.SendKeys "{F2}%{ENTER}"
    Else
        tabwaspressed = False
    End If
End If
tabwaspressed = False
End Sub

It looks for a switch that I created below.

and I added this:

Private Sub worksheet_activate()
tabwaspressed = False
Application.OnKey "{TAB}", "tabpress"
End Sub

Application.onkey will run a macro (it has to be public and in a module) when a particular key is pressed.

Then added this to a module:

Public tabwaspressed As Boolean

Sub tabpress()
If ActiveCell.address = Range("Descriptionspot").address Then
tabwaspressed = True
End If
End Sub

This will cause the boolean to switch if the tab key was pressed

Finally, I put in a code to remove the onkey watch when I leave the page:

Private Sub removetabpress()
Application.OnKey "{TAB}"
tabwaspressed = False
End Sub