Trochę to wszystko zagmatwane ;) Wydaje się, że w kodzie txtBox'a wystarczy jedna instrukcja Select Case oraz podprocedura. W przykładzie dla PS3 (lewy TextBox po staremu, prawy po mojemu). Resztę sobie dorób, jeśli działa zgodnie z oczekiwaniami. Do procedury przekazujesz tylko jeden argument: Nazwę zakresu jako String.