2015-12-03 37 views
0

我遇到问题。我需要一个变量的旧值。但是,当我为这个变量设置一个新的日期时,我的字符串值也包含新的值。VBA中的变量副本

如何在excel中用VBA解决这个问题?我知道有byRefbyVal的可能性。我怎么能结合这个在我的例子?

下面的代码:

Dim ExTagBeschTagString$ 

ExTagBeschTagString = "First Day: " & .DTPickerFirstDay & vbCrLf & "Second Day: " & .DTPickerSecondDay 

If InStr(.TextField.Value, ExTagBeschTagString) Then 
    .Anmerkung.Value = Replace(.Anmerkung.Value, ExTagBeschTagString, "") 
Else 
    .Anmerkung.Value = .Anmerkung 
End If 
+0

这个问题还不清楚。您需要发布更多代码或更充分地解释您的表单。 – neuralgroove

+0

@neuralgroove我需要的参考价值不是升级值。前面的例子我选择了DTPickerFirstDay的日期和DTPickerSecondDay的日期。这个值我需要在一个单独的变量中复制。那么,当我进行升级并更改值时,单独的变量必须包含第一个选择的值 – yuro

+0

我不认为我能得到它。为什么不创建第二个变量并将第一个变量的内容转储到您之前改变第一个变量? – neuralgroove

回答

0

如果你有

Dim Var1 as integer 
Dim Var2 as integer 

Var1 = 1 
Var2 = Var1 
Var1 = 2 

然后输出将

Var1 = 2 
Var2 = 1 

你的问题似乎是说这不是....