I'm trying to make a changable worksheet. I've opted to go with 3 arrays (1 1 dimensional, other is 2, other is 3 dimensional) - my current issue is . . .

Private Sub RemoveRun_Click()
If RunBox.Text = "New Run" Or RunBox.Text = "Your Runs Are" Then
Else
For CurrentRun = LBound(RunArray) To UBound(RunArray)
If RunArray(CurrentRun) = RunBox.Text Then
CurrentRun = UBound(RunArray)
DeletionRun = CurrentRun
End If
Next CurrentRun
Range("B15") = DeletionRun
End If
End Sub

Doesn't work as intended. Range("B15") is returning the string of what is in RunArray (DeletionRun = currentrun was deletionrun = runarray(currentrun) and it still had the issue)

I simply need to find a way to get the current location it is at (ex: RunArray = option 3, which would be somethingsomething) rather then (somethingsomething) as I need DeletionRun to be populated with a number and not a text. Thanks for all your help.