Thema Datum  Von Nutzer Rating
Antwort
20.01.2016 14:39:28 K.Y.
NotSolved
Blau while-if-schleife
 20.01.2016 20:25:01 Gast65152
NotSolved
23.01.2016 17:58:48 Gast40899
Solved

Ansicht des Beitrags:
Von:
Gast65152		 Datum:
20.01.2016 20:25:01		 Views:
693		 Rating:
     
Antwort:
  Ja
Thema:
while-if-schleife

Hallo!

ICh würde es so lösen. Dabei ist der Code für das aktive Tabellenblatt angelegt. Viele Grüße

Sub vergleichen1()

Dim i As Long
Dim ende As Long

ende = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row

For i = 1 To ende

    If ActiveSheet.Cells(i, 1) = ActiveSheet.Cells(i + 1, 1) Then ActiveSheet.Cells(i + 1, 2) = ActiveSheet.Cells(i, 2)

Next i

End Sub

 

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
20.01.2016 14:39:28 K.Y.
NotSolved
Blau while-if-schleife
 20.01.2016 20:25:01 Gast65152
NotSolved
23.01.2016 17:58:48 Gast40899
Solved