相关疑难解决方法(0)

我正在寻找一种方法来自动将VBA文本框中的日期格式化为MM/DD/YYYY格式,我希望它在用户输入时格式化.例如,一旦用户键入第二个数字,程序将自动输入"/".现在,我使用以下代码完成了这项工作(以及第二个破折号):

Private Sub txtBoxBDayHim_Change()
    If txtBoxBDayHim.TextLength = 2 or txtBoxBDayHim.TextLength = 5 then
    txtBoxBDayHim.Text = txtBoxBDayHim.Text + "/"
End Sub

现在,这在打字时效果很好.但是,当尝试删除时,它仍然以破折号输入,因此用户无法删除其中一个短划线(删除破折号会导致长度为2或5,然后再次运行该子,添加另一个破折号).有关更好的方法的任何建议吗？

我正在寻找一个控件来添加到userForm,以使用户能够选择日期.我在这个地址找到了一个好人

在VBA的文本框中格式化MM/DD/YYYY日期

来自Siddharth Rout,这是完美的,但它会生成隐形床单,这对我的应用来说不是必需的.我试图停止创建工作表,但我无法理解.

你能告诉我如何正确修改Siddharth Rout代码或指向我这样的另一个应用程序吗？

谢谢你的时间