vba, Word 2007, combobox vult textboxen

[jackfish]

Ik heb een excel bestand met drie kolommen (KolomNaam, KolomGeslacht, KolomTelefoon). Omdat er data bij komt of verwijderd wordt is moet de range dynamisch zijn.
Op een Userform in Word wil ik met een combobox1 uit de KolomNaam een item kunnen kiezen. Het is de bedoeling dat met die selectie twee textboxen (TXTgeslacht en TXTtelefoon) op het userform worden gevuld.
Ik heb onderstaande code bij elkaar gesprokkeld waarmee ik uit de eerste kolom een item kan selecteren.

Private Sub UserForm_Initialize()
    With GetObject("C:\data\overzicht.xlsx").sheets(1)
        DataKolomNaam = .Range("A1:C" & .Range("A1").currentregion.Rows.Count)
        Combobox1.List = DataKolomNaam
    End With
End Sub

Het lukt alleen nog niet om vervolgens de textboxen te vullen. Wie kan mij verder helpen?

 

[jackfish]

Ik heb een voorbeeldbestand gevonden dat bovenstaande precies zo doet.

http://http://office.webforums.nl/viewtopic.php?p=235312&sid=28acdd0feeb50d20e87c8de96d2ad1b6

 

[snb]

dit is misschien ook informatief:

http://www.snb-vba.eu/VBA_Userform_in_database.html

 

[jackfish]

Interessant inderdaad. Het gebruik van het eerder genoemde voorbeeldbestand leidt tot een beveiligingsprompt. ' Als u dit document opent, wordt de volgede SQL-opdracht uitgevoerd .... Is dit anders dan met een registeraanpassing te voorkomen of op te lossen?