Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1520to1524
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1520to1524
1520to1524
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelle per Makro mit Formel füllen und Datumswert+

Zelle per Makro mit Formel füllen und Datumswert+
04.11.2016 19:31:06
ValentinS
Hallo Excel-VBA Experten!
Seit Tagen beschäftigt mich folgendes Problem:
In einem Trainingstagebuch lege ich jedes Jahr einen neuen Kalender an. Dafür stehen in einer Hilfstabelle ab Spalte AL WENN-Formeln, deren Bedingung der Tageswert ist und die jedes Jahr angepasst werden. Ich suche eine Möglichkeit, diese Werte per Makro zu aktualisieren und finde keine Lösung.
Eine Beispieldatei habe ich angefügt.
Ich danke schon mal im Voraus

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Beispieldatei ist sehr virtuell
04.11.2016 20:11:25
Michael
Hi Vali,
Du hast vergessen, das Ding anzuhängen.
Gruß,
Michael
Zelle per Makro mit Formel füllen und Datumswert+
05.11.2016 14:32:04
Michael
Hi Vali,
also, wenn Du (nur) die Nr. des Tages in der Formel (hier aus AL2): 
=WENN(AK2=42005;1;0)

suchst, die brauchst Du nicht händisch einzugeben!
Geh mal in Deiner Tabelle in B34 und gib ein: =A2
Je nach Version wird Excel Dir vermutlich ein Datum anzeigen, vielleicht auch noch in Deinem Format, also als "01 Do". Jetzt klickst Du B34 nochmal an und wählst beim Format anstatt "Benutzerdefiniert" schlicht "Standard" aus: siehe da, da steht 42005.
Das heißt: Excel verwendet intern immer den Zahlenwert, der Rest ist Sache der Formatierung.
Das heißt auch: Du kannst Deine Formel in AL2 einfach so formulieren: 
=WENN(AK2=A2;1;0)
Ansonsten kann ich nichts weiter "programmieren", weil mir die Datei aus dem SVerweis nicht vorliegt; die ist ja offensichtlich extern.
Von Jahr zu Jahr kannst Du aber im SVerweis "weiterschalten", indem Du einfach mit Suchen und Ersetzen (in Formeln) die Dateinamen austauschst.
Schöne Grüße,
Michael
Anzeige
AW: Zelle per Makro mit Formel füllen und Datumswert+
05.11.2016 16:47:08
ValentinS
Hallo Michael,
vielen Dank für deine Antwort aber sie trifft nicht so richtig mein Problem. Wenn ich z.B. das Jahr 2017 anlege, kopiere ich die Tabelle von 2016 auf ein neues Blatt und muss dann die Bedingung, sprich die, die Tageswerte in der WENN-Formel dem aktuellen Jahr anpassen. Um mir diese Arbeit -immerhin 365 Tage- zu erleichtern, wollte ich eigentlich nur die erste Zelle markieren und dann herunterziehen. Dabei ändern sich aber nur die Zellbezeichnungen, nicht die Tageswerte. Nun dachte ich, dass man die WENN-Formel in Spalte AL, AN usw. mit einem Makro, dass den ersten Tageswert +1 in die Spalte kopiert, vereinfachen kann. Die Formeln in AL beziehen sich ja auf die jewilige Spalte davor, also AL auf AK usw. dort erscheint der jeweilige Tageswert wenn in Tabelle "Auwertung" die Bedingung erfüllt wurde. Dann wird im Kalender der jeweilige Tag farblich markiert.
Ich weiss, es ist umständlich...
Anzeige
Zelle per Makro mit Formel füllen und Datumswert+
05.11.2016 18:19:21
Michael
Hi,
was soll heißen: Dabei ändern sich aber nur die Zellbezeichnungen, nicht die Tageswerte.
Die Tageswerte ändern sich freilich mit, wenn in der nächsten Zelle der nächste Tag steht...
Schöne Grüße,
Michael
AW: Zelle per Makro mit Formel füllen und Datumswert+
07.11.2016 16:05:33
ValentinS
Hi Michael,
ich glaube, wir reden aneinander vorbei. Ich möchte lediglich in den Spalten AL, AN, AP....bis BH die Bedingung in den WENN-Formeln ändern und zwar von Zelle AL2 bis BH32. Die Bedingung der WENN-Formel in AL2 wäre 42736 und würde sich in jeder Zelle darunter um 1 erhöhen. Ich dachte, dass man das mit einer Schleife programmieren könnte, die jede Zelle durchläuft, die WENN-Formel in die Zelle kopiert und die Bedingung immmer um 1 erhöht.
Vielleicht findest du eine Lösung.
Viele Grüße,
Valentin
Anzeige
Zelle per Makro mit Formel füllen und Datumswert+
07.11.2016 17:36:02
Michael
Hi Vali,
anbei neu verformelte Datei: https://www.herber.de/bbs/user/109258.xlsx
Schau Dir mal die Formeln im gelb markierten Bereich an:
a) Zeile 1: das ist die Nr. der Spalte, in der das jeweilige Datum steht
b) Spalten AL usw.: Formel, die das jeweilige Datum anhand der Spaltennummer ermittelt bzw. vergleicht.
Da braucht es kein Makro, und so geht das zukünfitg jedes Jahr, ohne weiteres Zutun.
Schöne Grüße,
Michael
AW: Zelle per Makro mit Formel füllen und Datumswert+
07.11.2016 18:17:11
ValentinS
Hi Michael,
wow, ich bin begeistert!
Vielen Dank für deine Mühe, ich wäre darauf nicht gekommen.
Viele Grüße,
Valentin
Anzeige
freut mich!
07.11.2016 19:58:14
Michael
Hi Vali,
noch ne kleine Versimpelung:
In A2 steht ja der 1.1. des Jahres, also fürs neue Jahr dann eben der 1.1.2017.
In D2 kannst Du Formeln: =MONATSENDE(A2;0)+1 und nach rechts ohne Änderung in G2 usw. kopieren.
In A3 bis runter reicht =A2+1, und wenn Du das in die Spalte eingegeben hast, kannste A3 bis A32 nach rechts in D3, G3 usw. kopieren.
Dann ein paar "entf" für die kurzen Monate und Ende.
Bis auf die unterschiedlichen langen Monate hast Du dann mit EINER Datumsänderung in A2 alle Tage erledigt. Eine bedingte Formatierung für Sa/So würde sich noch anbieten, aber Du brauchst ja auch noch was zum Basteln!
Schöne Grüße,
Michael
Anzeige

328 Forumthreads zu ähnlichen Themen

Zellen kopieren (mit Formatierung)
Yves

Hallo zusammen,
ich möchte Daten von einem Tabellenblatt (Tabelle2) in ein anderes Tabellenblatt (Tabelle1) kopieren.
Habe dies bis anhin so gelöst:
sheets("Tabelle1").cells(1,1).value = sheets("Tabelle2").cells(5,1).value
Somit wurden einfach nur die Werte 'kopiert'. Nun würde...
08.08.2008 14:09:18
Thread-ID: 1000289
8 Beiträge
Anzeige
VBA-Formel um nur Berechnungswerte einzutragen
Matthias

Hallo Excel und Makrofans.
Ich habe folgende 2 Probleme. Erstmal zum ersten Problem:
Ich habe eine Datei in der ich Daten (Betriebsparameter [Druck, Temperatur usw.]) aus einem externen Programm einlese. Aus diesen Werten möchte ich gerne einige Werte Berechnen.
Zur Zeit mache ich d...
12.08.2008 08:51:00
Thread-ID: 1001053
6 Beiträge
Email per Hyperlink aus Zelle mit Formel
Frank

Hallo und schönen guten Morgen zusammen,
neues kleines Problem!
Ich möchte mit Hilfe eines Hyperlink per klick eine Email öffnen!
Soweit so gut und kein Problem!
Jetzt steht die Email Adresse aber nicht wirklich in der Zelle sondern diese hole ich mir per
Sverweises aus ein...
21.08.2008 09:22:45
Thread-ID: 1003367
3 Beiträge
Anzeige
Spalten mit Formeln mit 1 multiplizieren
Susanne99

Hallo, kriege hier per Datenbankverlinkung teilweise Zahlen eingespielt, die Excel nicht als Zahl, sondern als Text identifiziert. Dem kann ich abhelfen, indem ich den Zellinhalt jeweils mit 1 multipliziere. Wie kann ich die
"*1" in die Formeln in ganzen Spaltenreihen einfügen, ohne jeden...
31.08.2008 10:34:22
Thread-ID: 1006147
8 Beiträge
kopieren in eine zelle aus einer erstellten liste
Merle


Ich habe ein Promblem. Und zwar habe ich ein Formular erstellt indem es eine Liste gibt. Ich möchte nun den jeweils ausgesuchten Lieferanten in eine andere Zelle kopieren. Dies wäre kein Problem, wenn es immer die gleich Zelle wäre aber die Zelle unter der A16 Zelle ändert sich ja nach aus...
05.09.2008 13:01:59
Thread-ID: 1007653
4 Beiträge
1:1-Kopieren ohne dass Formeln "angepasst" werden
Wolfango

Hallo Experten!
Eine Spalte enthält lauter Formeln (alles relative Bezüge). Wenn ich diese komplette Spalte (markiert über Klick auf Spaltenkopf) in eine neue, unbenutzte Spalte kopiere werden (aufgrund der relativen Bezüge) ja stets alle Formeln automatisch angepasst (egal ob über das Menü...
17.09.2008 15:45:18
Thread-ID: 1010435
3 Beiträge
Textinhalte aus Zellen zusammenkopieren
zehetner

Liebe Profis,
ich habe die Ergebnisse einer Befragung in ein Excel-Sheet eingegeben, jeder Befragte in ein Registerblatt. Nun möchte ich die Antworten der Befragten, die in Textfeldern (immer in den selben, zB E145 stehen) gesammelt in eine neue Tabelle bringen.
Ziel ist es, die Antwort...
21.09.2008 18:29:25
Thread-ID: 1011343
2 Beiträge
Inhalt einer Tabelle in 2. Tabelle kopieren
Thomas

Hallo Excel Gemeinde,
Den Inhalt einer Tabelle, möchte ich in eine zweite Tabelle in der gleichen Arbeitsmappe kopieren, das funktioniert schon mal.
Die zu kopierenden Daten sollen aber am Ende der bereits vorhandenen Daten angefügt werden, bisher überschreibt es mir diese aber ;-(
...
24.09.2008 22:19:00
Thread-ID: 1012186
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
7
4
5
2
2
7
3
2
1
2
9
5
3
2
2
6
4
2
3
5
6
6
6
3
2