Thema Datum  Von Nutzer Rating
Antwort
Rot Markierung der Zellen beibehalten
 29.04.2007 16:23:06 sapphire
NotSolved
30.04.2007 09:44:22 Rasta
NotSolved
02.05.2007 14:46:05 Maddin
NotSolved

Ansicht des Beitrags:
Von:
sapphire		 Datum:
29.04.2007 16:23:06		 Views:
1906		 Rating:
     
Antwort:
  Ja
Thema:
Markierung der Zellen beibehalten
Hallo zusammen,

ich bin neu hier und VBA Anfänger. Da stellt sich mir natürlich direkt das erste Problem. Als erstes mal mein Quelltext:

Sub Schleife()

Dim i, e As Integer
e = 8

For i = 7 To 20
Cells(i, 8 ).Select
If ActiveCell.Value < Cells(e, 8 ) Then
Range(Cells(i, 3), Cells(i, 3)).Select
Range(Cells(i, 5), Cells(i, 5)).Select
Range(Cells(i, 7), Cells(i, 7)).Select
Range(Cells(i, 9), Cells(i, 9)).Select
e = e + 1

End If
Next i
End Sub

Ich durchsuche mit einer Schleife immer die gleiche Spalte, beginnend bei Zeile 7. Zeilenanzahl ist variabel, muß nicht 20 sein. Hier sollen immer zwei Werte verglichen werden und bei einhalten des Kriteriums "erste Zelle < zweite Zelle", die Bereiche "Range(..." markieren. Beim zweiten Durchlauf das selbe, jedoch wird die vorherige Markierung nicht beibehalten. Und genau dieser Befehl fehlt mir. Denn solange das Kriterium eingehalten wird, soll weiter verglichen und markiert werden. Dies dient zur späteren Verarbeitung innerhalb eines Diagrammes.

Vorab schonmal vielen Dank,

MfG, sapphire

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
Rot Markierung der Zellen beibehalten
 29.04.2007 16:23:06 sapphire
NotSolved
30.04.2007 09:44:22 Rasta
NotSolved
02.05.2007 14:46:05 Maddin
NotSolved