Guten morgen,
wenn die Auswertung mit Exel gemacht werden soll, was ja sehr gut funktioniert, sollte das dann aber gleich richtig gemacht werden und nicht mit einem Hand-Kopieren.
- Alle auszuwertenden Daten automatisch in eine Textdatei schreiben. Z-B. mit
DNM = FreeFile
Open "Missionplan.txt" For Output As #DNM
- Jeden Wert durch ein bestimmtes Zeichen trennen. Z.B. durch ein :
Print #DNM, Round(LatitudeZiel,& ":" & Round(LongitudeZiel,
& ":" & Round(dx, 6) & ":" & Round(dy, 6) & ":" & Round(XWerte.List(ListIndex), 5) & ":" & Round(YWerte.List(ListIndex), 5) & ":" & Round(Entfernung, 6) & ":" & Round(Fahrtrichtung, 6)
- Am Programmende diese Textdatei natürlich schliessen.
- Diese Datei ins Exel importieren. BVeim Import angeben, dass die Werte mit einem : getrennt werden.
- Dann die Werte im Exel grafisch auswerten lassen. Hier ein Beispielbild aus Exel, dass genau auf diese Art sehr schnell erzeugt wurde.
Peter
Lesezeichen