Microsoft Office Forums - View Single Post - [Solved] passing variable from one sub to another

Philb1 · 03-17-2016, 04:18 AM

Hi

Try changing the code to the below & see if it works for you. I've extracted bits of your code & changed it
Cheers

Code:

'==========================
Private Sub Worksheet_BeforeDoubleClick _
  (ByVal Target As Range, _
    Cancel As Boolean)
    
Dim Position As String

  Position = Target.Address
  
      TempCombo_LostFocus Position
        
errHandler:
  Application.EnableEvents = True
  Exit Sub

End Sub
'=========================================
Private Sub TempCombo_LostFocus(ByVal Position As String)

MsgBox (Position)

End Sub