CopyTo method

[Dennis Reichenbach]

Hallo,

ich möchte die CopyTo Methode verwenden um eine Formel im RootFolder der aktiven Datenbank zu kopieren und unter einem anderen Namen einzufügen.
Ich habe es mit folgendem Code versucht, bekomme aber immer eine Fehlermeldung.

Sub Test()
Dim Verluste_LL As Formula

Set Verluste_LL = ActiveDatabase.RootFolder.Object(“05_1_Verschiebung_V_LL”, fpObjectTypeFormula)
Verluste_LL.CopyTo (ActiveDatabase.RootFolder)

Set Verluste_LL = Nothing
End Sub

Können Sie mir weiter helfen?

[Dennis Reichenbach]

Hallo,

ich möchte die CopyTo Methode verwenden um eine Formel im RootFolder der aktiven Datenbank zu kopieren und unter einem anderen Namen einzufügen.
Ich habe es mit folgendem Code versucht, bekomme aber immer eine Fehlermeldung.

Sub Test()
Dim Verluste_LL As Formula

Set Verluste_LL = ActiveDatabase.RootFolder.Object(“05_1_Verschiebung_V_LL”, fpObjectTypeFormula)
Verluste_LL.CopyTo (ActiveDatabase.RootFolder)

Set Verluste_LL = Nothing
End Sub

Können Sie mir weiter helfen?

[Bernhard Kantz]

If you use a method in VBA without an assignment you have to remove the brackets.

This is not possible in VBA:
[code]
Verluste_LL.CopyTo(ActiveDatabase.RootFolder)
[/code]

This code is correct:
[code]
Verluste_LL.CopyTo ActiveDatabase.RootFolder
[/code]
or
[code]
Dim oDestination As Formula
Set oDestination = Verluste_LL.CopyTo(ActiveDatabase.RootFolder)
[/code]

support@weisang.com

[Author]

Posts