hatman
Well-known Member
- Joined
- Apr 8, 2005
- Messages
- 2,664
Hi VP,
My Cusack - Bacon was:
1. John Cusack One Crazy Summer with Mark Metcalf
2. Mark Metcalf Animal House with Kevin Bacon
That's EXCELLENT!
Hi VP,
My Cusack - Bacon was:
1. John Cusack One Crazy Summer with Mark Metcalf
2. Mark Metcalf Animal House with Kevin Bacon
This is an EXCELforum and requires only Excel-solutionsOKay, the real question here is what is the SHORTEST connection between Kevin Bacon and John Cusack?
'Option Bacon
Sub connect()
'SHORTEST connection Kevin Bacon / John Cusack
thisName = "Kevin Bacon"
c = "132223331211-1014-578-35-51-182123"
For l = 1 To 11
newName = newName & Chr(Asc(Mid(thisName, l, 1)) - Mid(c, pc + 12, Mid(c, l, 1)))
pc = pc + Mid(c, l, 1) * 1
Next
MsgBox newName, , thisName
End Sub
MrExcel MVPs are members who have proven to be polite...
Depending on browser and screen size, you may have to click on the "enlarge image" button
[looks like a sunset with outward-pointing arrows on the corners] to see a legible image.