将组合框连接到VBA

时间:2018-06-13 09:02:20

标签: excel vba combobox

我是VBA的新手,我正在尝试编写一个简单的代码来读取本地文件夹中的特定文件。我写的代码是:

  Sub Opentrading()
    Dim FolderPath As String
    Dim Path As String
    Dim nyear As String
    Dim nmont As String
    Dim nday As String
    Dim wkbk As Workbook

    FolderPath = "F:\FICM\Trading Runs\Daily Trading Runs"
    nyear = Sheet6.Range("B2")
    nmont = Sheet6.Range("B3")
    nday = Sheet6.Range("B4")
    Path = FolderPath & "\" & nyear & "-" & nmont & "-" & nday & " Trading - Southern_Europe" & ".xlsx"
    Set wkbk = Workbooks.Open(Path)
    wkbk.Close savechanges:=False
  End Sub

我的文件除以年月和日。例如,我有一个文件是" 2018-06-12交易 - Southern_Europe"。现在,如果我把确切的数字放在B2 B3和B4的范围内代码可以工作,但我需要放一个组合框,这样我就可以选择年,月和日。我怎样才能做到这一点?我能够在5年,12个月和31天准备组合框,但我不知道如何连接到我的vba代码。我认为range属性不再有用,因为虽然我已将组合框放在这些范围(B2 B3和B4)中,但该值为空,因为实际值在组合框内。

0 个答案:

没有答案