|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
26.02.2009 18:02:19 |
Jan |
|
|
 Aw:Hilfe für kleines VBA Programm in excel 2007 |
27.02.2009 09:06:16 |
Holger |
|
|
|
27.02.2009 11:24:03 |
Holger |
|
|
Von:
Holger |
Datum:
27.02.2009 09:06:16 |
Views:
1916 |
Rating:
|
Antwort:
|
Thema:
Aw:Hilfe für kleines VBA Programm in excel 2007 |
Hallo Jan,
da die Zahlenfolge aufsteigend sein soll, brauchen nur unmittelbar nacheinander stehende Paar verglichen zu werden:
Sub kleinste_Differenz()
dim d,k,i
d = Cells(2, 1) - Cells(1, 1)
k = 2
For i = 2 To 5
If Cells(i + 1, 1) - Cells(i, 1) < d Then
d = Cells(i + 1, 1) - Cells(i, 1)
k = i
End If
Next i
MsgBox "Kleinste Differenz ist" + Str(d) + vbCrLf + "Werte in A" + CStr(k) + " und A" + CStr(k + 1)
End Sub
Gruß
Holger
Jan schrieb am 26.02.2009 18:02:19:
Microsoft Excel 2007
Mit der Eigenschaft Cells(Zeile, Spalte) kann man auf einzelne Zellen eines Range- Objektes zugreifen: Range("a1:c3").Cells(2,2) ist die Zelle B2. Schreiben Sie eine Routine, die aus einer aufsteigenden Zahlenreihe (A1:A100) das Zahlenpaar mit der geringsten Differenz findet. Geben Sie die Position des Zahlenpaares aus!
Diese Aufgabe muss ich lösen und ein funktionierendes Programm schreiben in VBA. Ich bin der Programmiersprache nicht sehr gewachsen, jedoch habe ich mir Gedanken gemacht wie ein solches Programm auszusehen hat.
Meine Idee:
Differenz = ZelleA2 - ZelleA1
Das ist dann die ausgangsdifferenz.
Danach zelleA3 - zelleA2 /////// also If Differenz < ZelleA3 - ZelleA2
Dann ist Differenz = ZelleA3 - Zelle A4
Kann jemand der sich mit VBA auskennt mir helfen dieses Progrämmchen zu schreiben?
Vielen Dank im Vorraus
Jan
|
- 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
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- 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
|
|
26.02.2009 18:02:19 |
Jan |
|
|
Aw:Hilfe für kleines VBA Programm in excel 2007 |
27.02.2009 09:06:16 |
Holger |
|
|
|
27.02.2009 11:24:03 |
Holger |
|
|