vba公共变量与月份的变化

Question

我是VBA的先生，所以我不知道什么是错的。我的观点是命名一些床单，但我想我可以把它们变成字符串。我做了公共变量，但vba dosent看到它。 somebode可以说出什么是错误的吗？

Public Sub VariableMonths()
    Public one, two, three, DeleteIt As String

    one = "M_11_17"
    two = "M_10_17"
    three = "M_09_17"
    DeleteIt = "M_08_17"
End Sub

然后在这个公共子之后的一些部分 - 没有找到变量

Sheets(two).Copy Before:=Sheets(4)
Sheets(two & "( 2)").Select
Sheets(two & "( 2)").Move Before:=Sheets(two)
Sheets(two & "( 2)").Select
Sheets(two & "( 2)").Name = one
Sheets(two).Select
Cells.Select
Selection.Copy

Answer 1

在标准模块中：

Dim one As String, two As String, three As String, DeleteIt As String

Sub setupVariables()
    one = "M_11_17"
    two = "M_10_17"
    three = "M_09_17"
    DeleteIt = "M_08_17"
End Sub

Sub MAIN()
    Call setupVariables
    MsgBox three
End Sub