Thema Datum  Von Nutzer Rating
Antwort
21.08.2008 10:08:14 daniel_
NotSolved
Blau Aw:in excel spalte nach doppelten zahlenwerten dur
 23.08.2008 16:57:13 Holger
NotSolved

Ansicht des Beitrags:
Von:
Holger		 Datum:
23.08.2008 16:57:13		 Views:
835		 Rating:
     
Antwort:
  Ja
Thema:
Aw:in excel spalte nach doppelten zahlenwerten dur
Hallo Daniel,
versuche
Sub doppelte_Zeilen_löschen()
r = InputBox("Referenzspalte?")
c = Columns(r).Column
lz = Cells(Rows.Count, c).End(xlUp).Row
i = 0
Do
i = i + 1
j = i
Do
j = j + 1
If Cells(i, c) = Cells(j, c) Then
Rows(j).Delete
Cells(i, c + 1) = Cells(i, c + 1) + 1
lz = lz - 1
End If
Loop Until j >= lz
Loop Until i >= lz
End Sub
Gruß
Holger
daniel_ schrieb am 21.08.2008 10:08:14:

Ich möcht in iener Spalte nach doppelten zahlenwerten dursuchen lassen, dies doppelte Zahl/Zeile dann löschen lassen und bei der ersten Zahl in der Splate daneben die menge um 1 erhöhen lassen.
es kommen duie Zahlenwerte oft auch 3 nals vor..


vielen dank

bin leider immer noch nicht fit in vba bin grad dabei mich in access einzuarbeiten

danke für euer bemühen

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
21.08.2008 10:08:14 daniel_
NotSolved
Blau Aw:in excel spalte nach doppelten zahlenwerten dur
 23.08.2008 16:57:13 Holger
NotSolved