|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
08.01.2009 10:13:12 |
Dirk |
|
|
 Aw:Datum und Zahlenwerte sortieren |
08.01.2009 12:35:03 |
Holger |
|
|
|
09.01.2009 09:01:51 |
Dirk |
|
|
|
09.01.2009 10:13:50 |
Holger |
|
|
|
09.01.2009 16:46:36 |
Dirk |
|
|
Von:
Holger |
Datum:
08.01.2009 12:35:03 |
Views:
1141 |
Rating:
|
Antwort:
|
Thema:
Aw:Datum und Zahlenwerte sortieren |
Hallo Dirk,
ich gehe mal davon aus, dass die beiden Spalten vor dem Verschieben nebeneinander stehen. Quick and dirty:
Spaltennummer = 1 'wo die Datum-Werte stehen
lz = Cells(Rows.Count, Spaltennummer).End(xlUp).Row
For i = 1 To lz / 2
Cells(i, Spaltennummer) = Cells(2 * i, Spaltennummer)
Cells(i, Spaltennummer + 1) = Cells(2 * i, Spaltennummer)
Cells(i, Spaltennummer + 2) = Cells(2 * i, Spaltennummer + 1)
Cells(i, Spaltennummer + 3) = Cells(2 * i, Spaltennummer + 1)
Next i
For i = lz / 2 + 1 To lz
Cells(i, Spaltennummer) = ""
Cells(i, Spaltennummer + 1) = ""
Next i
Gruß
Holger
Dirk schrieb am 08.01.2009 10:13:12:
Hallo,
würde mich freuen wenn mir jemand bei meinem Problem helfen könnte.
Also, ich bereite Daten von einem Export in Excel auf. Habe bereits ein Makro zum entfernen und formatieren der überflüssigen Spalten und Zeilen erstellt. (läuft supi:)
Nun zu meinem Problem: In einer Spalte sind n-Datumswerte und in einer zweiten Spalte sind n-Zahlenwerte untereinander geordnet(siehe Ist). Es gehören jeweils zwei Felder pro Spalte zusammen. Ich möchte die Datumswerte und die Zahlenwerte jedoch nebeneinander haben. Anbei ein Beispiel.
Ist:
1 Datum1 1 Wert1
2 Datum1 2 Wert1
3 Datum2 3 Wert2
4 Datum2 4 Wert2
5 Datum3 5 Wert3
6 Datum3 6 Wert3
Soll:
1 Datum1 1 Datum1 1 Wert1 1 Wert1
2 Datum2 2 Datum2 2 Wert2 2 Wert2
3 Datum3 3 Datum3 3 Wert3 3 Wert3
Danke!
|
- 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
|
|
08.01.2009 10:13:12 |
Dirk |
|
|
Aw:Datum und Zahlenwerte sortieren |
08.01.2009 12:35:03 |
Holger |
|
|
|
09.01.2009 09:01:51 |
Dirk |
|
|
|
09.01.2009 10:13:50 |
Holger |
|
|
|
09.01.2009 16:46:36 |
Dirk |
|
|