Это не совсем то, что вы просили, но если вам это действительно нужно, вы можете использовать что-то для всплывающего значения. Оставленный мною комментарий не выглядит полным, так что вот один из подходов с использованием пользовательской формы, который вы можете вызвать двойным щелчком и как комментарий показывает MsgBox
Sub ViewListOfOpenWorkBooksAndWorkSheets()
Dim book As Workbook, sheet As Worksheet
For Each book In Workbooks
For Each sheet In book.Worksheets
UserForm1.ComboBox1.AddItem book.Name + "!" + sheet.Name
Next sheet
Next book
UserForm1.Show
End Sub
или же
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
MsgBox (ActiveCell.Value)
End Sub