我有一张工作表,其日期值作为列标题,行中具有步骤号。我正在尝试建立一个用户窗体,用户可以在其中选择一个步骤号,从组合框中选择一个日期,然后输入要放入单元格中的值。
我尝试了几种使用match函数的方法,但是完全失败了。这时我的代码太乱了,无法共享,因此我需要重新开始。 (非常VBA业余爱好者)
有人可以帮我解决这个问题吗?
我尝试过匹配功能
编辑: 抱歉,我的代码完全错误。我只是在寻找方向,而不是找人提供完整的代码。
虽然我现在到某处...
Private Sub SaveDates_Click()
Dim datestr As Long
datestr = ExpStart.Value
Dim MatchFormula As Long
Dim ColumnMatch As Long
MatchFormula = WorksheetFunction.Match(ListBox1.Value, Range("A:A"), 0)
ColumnMatch = WorksheetFunction.Match(datestr, Range("4:4"), 0)
Range(Col_Letter(ColumnMatch) & MatchFormula).Value = TextBox1.Value
End Sub
我现在遇到的问题是,当我在组合框(ExpStart)中选择一个日期时,它显示为序列日期。我无法将其重新格式化为dd / mm / yy,因为随后match函数停止工作。