Hi Wilfried!

Thanks for your quick answer but unfortunately it doesn´t work... Even with the right syntax

Set objLocResults = objMap.FindAddressResults(PLZ1, STADT1, ADDRESSE1)
objMap.AddPushpin (objLocResults.Item(1))

Runtime error 438 appears.

Greetz Kikolino