Clever-Excel-Forum

Hallo liebe Helfer.

Ich habe mir über Excel eine Tabelle gebaut. Diese besteht aus Funktion-Name-Telefonnummer.
Das alles brauche ich per Word (in einer Zeile).

Nun habe ich bei Word ein Dropdown Fenster geschaffen, in dem nach der Einbettung alle Funktionen aufgelistet sind (wie z.B. Leiter Betrieb, Leiter Logistik etc.).

Ich möchte nun gerne, dass wenn jemand z.B. den Leiter Logistik nimmt automatisch daneben angezeigt wird: Herr Müller TEL.: 0815

Ist das irgendwie machbar?

Über Excel würde ich einfach per SVERWEIS und/oder Wenn Funktion arbeiten aber bei Word fehlt mir die zündende Idee.

Vielen Dank für Eure Hilfe.

Hallo,

im Prinzip geht das schon, aber es wäre besser einen anderen Ansatz zu suchen!

In Word kann man ein "ContentControl" soll anlegen, dass es ähnlich wie ein "=sverweis()" funktioniert:

Code:
Sub T_1()

Dim CC As ContentControl

With ActiveDocument

    'wird an Selection eingefügt

    Set CC = .ContentControls.Add(wdContentControlDropdownList)

    CC.Tag = "ASN"

    CC.DropdownListEntries.Add "Cat", "A"

    CC.DropdownListEntries.Add "Dogs", "B"

    CC.DropdownListEntries.Add "Bird", "C"

    For Each CC In .ContentControls

        Debug.Print CC.Tag, CC.ShowingPlaceholderText, CC.Range.Text

    Next CC

End With

End Sub

Es ist auch möglich die Items direkt aus Excel zu übernehmen, d.h. auch Änderungen einzupflegen.

Es ist war schon etwas kompliziert!

mfg

skoppe

Fennek