Hmm, also bei mir funtzt das, mit Cells und den Anführungszeichen rund um dem-poly
Sub makeCmd()
Cells(11, 1) = "java -Xmx1500M -jar " & Cells(2, 2) & "\mkgmap\mkgmap.jar" _
& " --gmapi" _
& " --index" _
& " --housenumbers" _
& " --bounds=C:\MyOsmTopo\KARTEN-BAU\DATA\bounds-latest" _
& " --style-file=C:\MyOsmTopo\KARTEN-BAU\styles\" & Cells(5, 2) _
& " --generate-sea:multipolygon,extend-sea-sectors" _
& " --name-tag-list='name:de,name,int_name'" _
& " --family-id=1" _
& " -n MyOsmTopo-test" _
& " --add-pois-to-areas" _
& " --draw-priority=29" _
& " --latin1" _
& " --remove-short-arcs" _
& " --route" _
& " --dem-poly=""" & Cells(8, 2) & "\" & Cells(9, 2) & """" _
& " --dem=" & Cells(7, 2) _
& " --dem-dists=9942,9942,9942,13248,44176" _
& " --show-profiles=1" _
& " --overview-dem-dist=88368" _
& " --overview-mapname=MyOsmTopo-test" _
& " --series-name=MyOsmTopo-test" _
& " --mapname=50001001" _
& " C:\MyOsmTopo\Kartenprojekt_MyOsmTopo-test\50001*.osm.pbf " & Cells(3, 2) & "\" & Cells(6, 2)
End Sub
java -Xmx1500M -jar C:\MyOsmTopo\KARTEN-BAU\TOOLS\mkgmap\mkgmap.jar
--gmapi
--index
--housenumbers
--bounds=C:\MyOsmTopo\KARTEN-BAU\DATA\bounds-latest
--style-file=C:\MyOsmTopo\KARTEN-BAU\styles\OFMap-Style-Typ3d_neu241118
--generate-sea:multipolygon,extend-sea-sectors
--name-tag-list='name:de,name,int_name'
--family-id=1
-n MyOsmTopo-test
--add-pois-to-areas
--draw-priority=29
--latin1
--remove-short-arcs
--route
--dem-poly="C:\MyOsmTopo\KARTEN-BAU\Polygon\unterfranken.poly"
--dem=C:\MyOsmTopo\KARTEN-BAU\hgt\Dem_hgt_DACH_Slow_Hoehenmodel_Nasa
--dem-dists=9942,9942,9942,13248,44176
--show-profiles=1
--overview-dem-dist=88368
--overview-mapname=MyOsmTopo-test
--series-name=MyOsmTopo-test
--mapname=50001001
C:\MyOsmTopo\Kartenprojekt_MyOsmTopo-test\50001*.osm.pbf C:\MyOsmTopo\KARTEN-BAU\TYP_Files\ofm_dbnl-3d.typ
Und wenn man das ganz als Function programmiert
Function makeCmd(toolsdir As String, stylefile As String, dempolypath As String, dempoly As String, dempath As String, typpath As String, typfile As String) As String
makeCmd = "java -Xmx1500M -jar " & toolsdir & "\mkgmap\mkgmap.jar" _
& " --gmapi" _
& " --index" _
& " --housenumbers" _
& " --bounds=C:\MyOsmTopo\KARTEN-BAU\DATA\bounds-latest" _
& " --style-file=C:\MyOsmTopo\KARTEN-BAU\styles\" & stylefile _
& " --generate-sea:multipolygon,extend-sea-sectors" _
& " --name-tag-list='name:de,name,int_name'" _
& " --family-id=1" _
& " -n MyOsmTopo-test" _
& " --add-pois-to-areas" _
& " --draw-priority=29" _
& " --latin1" _
& " --remove-short-arcs" _
& " --route" _
& " --dem-poly=""" & dempolypath & "\" & dempoly & """" _
& " --dem=" & dempath _
& " --dem-dists=9942,9942,9942,13248,44176" _
& " --show-profiles=1" _
& " --overview-dem-dist=88368" _
& " --overview-mapname=MyOsmTopo-test" _
& " --series-name=MyOsmTopo-test" _
& " --mapname=50001001" _
& " C:\MyOsmTopo\Kartenprojekt_MyOsmTopo-test\50001*.osm.pbf " & typpath & "\" & typfile
End Function
und es dann in einer Zelle wie folgt einsetzt
=makeCmd(B2;B5;B8;B9;B7;B3;B6)
kommt das selbe Ergebnis raus, nur eben dann direkt in dieser Zelle, dann kann man das auch mal Copy&Paste rausnehmen und direkt in die Cmd.exe Box kopieren und ausführen