自定义stringcombobox

我有一个combobox ，根据comboboxselect生成其他textboxes的值。 目前我的comboboxselect有两个值“ 拒绝标题 ”和“ 原因 ”结合在一个单元格中。 我想分开但不知道如何写string？

拒绝标题被命名为“RejectTitle”原因被命名为“原因”

我想string显示在用户窗体中：RejectTitle – 连字符之间的原因我目前有

  Dim f As Range, v v = Me.RejectTitleNm.Value 'find the selected value in the source range from ColB(RejectTitle) Set f = Range("RejectTitle").Find(v, lookat:=xlWhole) 

谢谢