Thema Datum  Von Nutzer Rating
Antwort
07.06.2011 16:56:56 mimi
NotSolved
Blau Hilfe bei VBA-Aufgabe...dringend
 10.06.2011 01:29:07 Till
Solved
10.06.2011 01:30:00 Till
Solved

Ansicht des Beitrags:
Von:
Till		 Datum:
10.06.2011 01:29:07		 Views:
928		 Rating:
     
Antwort:
 Nein
Thema:
Hilfe bei VBA-Aufgabe...dringend

Es soll der kürzeste Weg durch eine Anzahl von Punkten gefunden werden?

c=erstere Punkt
For a = 1 to AnzahlPunkte
MinAbstand=MaxAbstand
for b = 1 to AnzahlPunkte
if b=schon "benutzter" Punkt then exit for (könntest du im Array mit den Punkten vermerken)
if Abstand zwischen c und b < MinAbstand then
MinAbstand=Abstand zwischen c und b
AllePunkteSortiert(a)=b
end if
next
next

Müsste so in der Art funktionieren, muss man natürlich noch dran basteln. Vielleicht hilft dir der Ansatz.

LG

Till

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
07.06.2011 16:56:56 mimi
NotSolved
Blau Hilfe bei VBA-Aufgabe...dringend
 10.06.2011 01:29:07 Till
Solved
10.06.2011 01:30:00 Till
Solved