How to bring sheet back into focus after loading picture into Userform

[xltrader100]

My objective is to be able to use the up/down Arrow keys to step down a list of names in a column. Each step up/down puts a new picture into a Userform, which stays visible and floating above the sheet.

All of that works fine if I use the mouse to click on the next cell up or down, but when trying to use the Arrow keys the problem is that as soon as the picture gets loaded onto the form, the form takes focus, and the next Arrow keypress doesn't register until the sheet regains focus.

I'm looking for a VBA command that can bring the sheet back into focus, as if I clicked on the border of the sheet.

 

[Jaafar Tribak]

If the code you have is not too long can you post it (or part of the code) here so we can take a look

 

[xltrader100]

Here's a bare bones extraction of the relevant bits of the code. Each cell that I'm stepping down contains a filespec that leads to a picture file. Selecting one of those cells loads that picture onto the Userform. Then the Userform has focus and I can no longer tab to the next cell.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   Dim picturePath$
   picturePath$ = Target.Value   ' e.g. picturePath$ = "C:\myProject\picture1.jpg"
   If picturePath$ Like ("*.jpg") Or picturePath$ Like ("*.wmf") Or picturePath$ Like ("*.bmp") Then
      '   If Not isThisFormLoaded("Userform1") Then
      '      Load UserForm1
      '      UserForm1.Show
      '   End If
      'userform1 pictureSizeMode is stretch, and is moveable and resizable
      UserForm1.Picture = LoadPicture(picturePath$)
   End If
End Sub