Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1436to1440
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Monate in Wochen umrechnen und Spalten hinzufügen

Monate in Wochen umrechnen und Spalten hinzufügen
14.07.2015 15:21:18
Niko
Hallo zusammen,
ich möchte gerne ein Makro zu folgendem Problem kreieren:
Eine Tabelle mit mehreren Spalten in denen pro Spalte ein Monat des aktuellen Jahres beginnend mit dem aktuellen Monat stehen, das Folgejahr mit den Quartalen und dann noch 2 weitere Jahre mit jeweils nur einer Spalte. Unter diesen Zellen stehen Mengen (Bedarfe) mit einem Datum (in 2 separaten Zellen untereinander). Das Makro soll den aktuellen und den folgenden Monat erkennen und errechnen wie viele Wochen diese Monate haben. Dann sollen beide Monate durch die Wochen ersetzt werden und die Bedarfsmengen sollen anhand des Datums in die richtige Woche eingefügt werden. Auf der linken Achse stehen Produkte.
Hier ein Beispiel meiner Datei: https://www.herber.de/bbs/user/98816.xlsm
Falls ich zu wenig Infos da gelassen habe bitte einfach fragen.
Vielen Dank schon mal.
Freundliche Grüße
Niko

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Monate in Wochen umrechnen und Spalten hinzufügen
15.07.2015 14:59:26
Niko
Hallo zusammen,
ich habe es schon mal hinbekommen das Datum aus J13 und K13 auszulesen.
Dim dtCurrMonth As Date
Dim dtNextMonth As Date
'Datum aus Zellen auslesen
dtCurrMonth = Sheets("Fixed Per. 2 month").Range("J13")
dtCurrMonth = Format(dtCurrMonth, "DD.MM.YYYY")
dtNextMonth = Sheets("Fixed Per. 2 month").Range("K13")
dtNextMonth = Format(dtNextMonth, "DD.MM.YYYY")
Ich habe mir auch eine kleine Übersicht gemacht, welche Punkte im Makro vorkommen müssen:
- Lese Datum aus Zelle J13
- Errechne Anzahl Wochen von Monat aus Zelle J13
- Füge so viele Spalten vor J13 ein wie es Wochen in diesem Monat aus J13 gibt
- Schreibe in jede neue Spalte in Zeile 13 die KW des Monats aus der ursprünglichen
Dann gibt es noch Bedarfe die ein Datum haben. Diese Mengen sollen anhand des Datums in die jeweilige Woche in die das Datum gehört geschrieben werden.
Bisher bin ich noch nicht weiter gekommen. Ich hoffe sehr auf ein paar Tips.
Habt vielen Dank!
Freundliche Grüße
Niko
Anzeige

317 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige