Mittlerweile habe ich eine Lösung gefunden: Google bietet eine ähnliche Funktion wie yahoo. Sendet man eine Anfrage an

http://maps.google.com/maps/geo?output=xml&sensor=false&key=abcdefg&q=

gefolgt von der Straßenadresse, dann bekommt man wie bei yahoo eine XML-Datei zurück.

Für alle, die es interessiert, anbei der Libreoffice-Code, der die Koordinaten in sCoordinates ausspuckt.
(Vorsicht mit sLatitude und sLongitude: das sind nur extrem rudimentär ausgewertete Substrings, die auf unsere Situation zugeschnitten sind (Längengrad hat bei uns immer eine Stelle vor dem Komma, Breitengrad immer zwei).)

Hoffe, es hilft.
Gruß,
Dirk

Function GetGeoData(sSearch as String) as String
If Len(sSearch) = 0 Then Exit Function
URL = “http://maps.google.com/maps/geo?output=xml&sensor=false&key=abcdefg&q=”
URL = URL & sSearch
oSimpleFileAccess = createUnoService( “com.sun.star.ucb.SimpleFileAccess” )
On Error GoTo ErrorResponse
oInputStream = oSimpleFileAccess.openFileRead(URL)
oTextStream = createUnoService(“com.sun.star.io.TextInputStream”)
oTextStream.InputStream = oInputStream
aDelimiters = Array(ASC(“>”),ASC(“<"))
sLastString = ""
Do While NOT oTextStream.isEOF
sThisString = oTextStream.readString(aDelimiters,True)
Select Case sLastString
Case "coordinates":
sCoordinates = sThisString
Case "PostalCodeNumber":
sPLZ = sThisString
Case "CountryName":
sState = sThisString
Case "ThoroughfareName":
sAddress = sThisString
Case "DependentLocalityName":
sCity = sThisString
End Select
sLastString = sThisString
Loop
sLongitude = Left(sCoordinates,7)
sLatitude = Mid(sCoordinates,InStr(sCoordinates,",")+1,8)
if sAddress = "" then
GetGeoData = "ACHTUNG!!!ACHTUNG!!! " & sPLZ & " " & sCity & Chr(13) & _
"Straße: " & sAddress & Chr(13) & " Koordinaten: " & _
sCoordinates & Chr(13) & " Längengrad: " & sLongitude & " Breitengrad: " &sLatitude
else
GetGeoData = sPLZ & " " & sCity & Chr(13) & _
"Straße: " & sAddress & Chr(13) & " Koordinaten: " & _
sCoordinates & Chr(13) & " Längengrad: " & sLongitude & " Breitengrad: " &sLatitude
end if
oInputStream.closeInput()
Exit Function
ErrorResponse:
GetGeoData = "Kein Ergebnis gefunden!!!"
End Function

Seit heute funktioniert diese Methode scheinbar nicht mehr. Sieht so aus als hätte Yahoo die Maps API eingestellt:
http://developer.yahoo.com/maps/

Wie komme ich nun mit OpenOffice/LibreOffice Calc an die Koordinaten einer Adresse ran? Hat irgendjemand Ideen bezüglich GoogleMaps, Openstreetmaps, OviMaps, o.ä.?

Schöne Grüße,
Dirk

Kannst du mir einen Tipp geben was ich falsch mache?
Vielen Dank
Matze