SharePoint 2010 + WSS 3.0 + Word 2010 VBA Verwaltete MetaDaten

Hallo,

ich habe folgendes Problem:

Wir haben in der Firma einen SharePoint Server 2010 + Windows SharePoint Services 3.0 und benutzen Word 2010.

Meine Aufgabe war nun für unser Projektmanagment eine Vorlage mit einem Marko zu machen, welche den User beim Öffnen auffordert das Dokument direkt mit einem Namen in einem Projektordner zu speichern.

Alles schön und gut, klappt soweit, bis ich bemerkt hatte das bei mir in der Vorlage schon eine Dokumentkategorie (verwaltete MetaDaten) ausgewählt war, was aber auch von den Usern in der UserForm erledigt werden soll.

Also ich die Kategorie aus dem Dokument entfernt und nun kommt mein Problem:

Ich versuche die Dokumentenkategorie anhand des Values z.B. Kalkulation zu übergeben. Dann kommt es zu einem Laufzeitfehler ("Laufzeitfehler '-2147467259 (80004005)': Der Index bezieht sich auf Werte jenseits des Listenendes") der Fehler bezieht sich auf folgendes Codefragment:

For Each prop In ThisDocument.ContentTypeProperties
        If prop.Name = "Dokumentenkategorie" Then
            prop.Value(0) = ComboBox1.Value
        End If
Next prop

Überwachung von prop: (.Type hat folgenden Wert)

: Type : <Der Index bezieht sich auf Werte jenseits des Listenendes.
> : MsoMetaPropertyType : UserForm1.CommandButton1_Click

Weiß jemand wie ich das doch noch über VBA regeln kann bzw. irgendwie anders die User zum Speichern direkt nach Öffnen der Vorlage auffordern kann?

Danke im Voraus

FireDoom