---

Baum.jpg

Hallo Leute,

ich arbeite gerade mit Powercopies und dabei entestehen (siehe JPG)
unter den Parameter noch Parametersets(z.B. Parameter.5), in denen dann die normalen Parameter stehen.

Jetzt haben wir ein Umbenennungsmakro, welches einige Körper und
auch die Parameter in den Parametersets umbenennt.
Leider kann man aber mit den Bezeichnungen der Sets nicht so viel
anfangen, daher dachte ich mir, erweitere ich halt das Makro.
Ich hab auch die Eigenschaften gefunden, nur bringt er mir ein Fehler
wenn ich den Namen ändern will.
Wrong number of arguments or invalid property assignment (Error 450)

Hier mal den Code:
<code>
For Each ps In parameters1.RootParameterSet.ParameterSets
If ps.DirectParameters.Count Then
    If InStr(1, ps.DirectParameters.Item(1).Name, StringToReplace) Then
        ps.ParameterSets.Name = "Parameter" & NewString
    End If
End If
Next ps
</code>

------------------
Gruss Markus

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP