[問題]TextBox名字在Function中如何用變數替代?

[xc9500 (只需要20秒的瘋狂勇氣！)]

軟體：Excel

版本: 2016

各位大大好！請問一下，在網路上找到一個可以限制輸入TextBox為
日期的格式xxxx-xx-xx.而它是以public function的方式來呈現，
且裡面的"表單名字"和"TextBox"輸入框的名字都寫死了！

想請問一下，"表單名"和"TextBox"在Function中，可以用變數來取代嗎？

如連結中的附檔，有1個開始日期，及1個結束日期的。在開始日期的TextBox，呼叫了
Function，因此可以實現功能。但結束日期，由於TextBox的名字不同，
所以無法使用Function.

因為想要做的表單，開始及結束日期的輸入框有十幾個，且每個的名字不同。
請幫忙看一下是否有較好的解決方式？還是每個框，就要產出一個function來對應呢？
謝謝

https://1drv.ms/x/s!Atz5-ybVJn3Xyh5SizcZApFLkkuf?e=EnldwM

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 220.132.120.33 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1590588679.A.B64.html
→ soyoso: 可不用每個textbox就要寫一個function，設變數來接傳遞來
→ soyoso: 的引數，可值、也可textbox(controls)…等
→ xc9500: UserForm_Dateinput.Datestart.SelStart = Len(UserForm_D
→ xc9500: UserForm_Dateinput.Datestart.Text = Left((UserForm_Dat
→ xc9500: 像這種前面是Userform開頭的，該怎麼用變數呈現呢？
→ xc9500: 我把這2個完整的句子，貼在Excel中，請再幫忙解答一下謝謝
→ soyoso: function y_m_d_input() 括號內要設變數來接程序Dateend或
→ soyoso: Datestart觸發事件傳遞來的引數，那引數的資料型態於回文
→ soyoso: 有寫到，那這個變數(control)的話，就可以用於
→ soyoso: 變數.selstart或是變數.text
→ xc9500: 謝謝S大大的回覆，我再試試.