Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 10:48:58
Zufällige Uhrzeit
19.10.2025 10:46:18
Zufallszahlen nur wenn Datum ab kommenden Sonntag
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1028to1032
1028to1032
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

monatlich Wert auslesen

Forumthread: monatlich Wert auslesen

monatlich Wert auslesen
01.12.2008 02:52:00
Herbert
Hallo!
Ich habe in Zelle B46 eine Zahl die sich monatlich ändert.
Nun bräuchte ich eine VBA Lösung die mir diese Zahl an jeden 15´ten des Monats bzw. wenn die Mappe geöffnet wird den Wert untereinander in die Spalte Ö kopiert und links davon ds Datum.
Ich hoffe ihr könnt mir wieder helfen.
mfg
Herbert
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
hier das Beispiel mit dem 1. des Monats
01.12.2008 08:04:00
Matthias
Hallo Herbert
probier das mal:

Option Explicit
Private Sub Workbook_Open()
Dim Tag As Date
Dim LoRow As Long
Tag = Format(Date, "DD")
LoRow = Cells(Rows.Count, "O").End(xlUp).Row + 1
If Tag = 1 Then
MsgBox "heute ist der 1." & vbLf & "kopiert wird B46 nach O" & LoRow
Cells(46, 2).Copy
Cells(LoRow, 15).PasteSpecial Paste:=xlValues
Application.CutCopyMode = False
Cells(LoRow, 14) = Now
End If
End Sub


hier das Beispiel:
https://www.herber.de/bbs/user/57266.xls
anstatt
If Tag = 1
musst Du eben
If Tag = 15
schreiben
Gruß Matthias

Anzeige
noch eine frage
01.12.2008 10:01:00
Herbert
Hallo!
Erst mal vielen Dank.
Nun habe ich noch eine frage, wo muß ich den Code jetzt einfügen wenn ich den Visual Basic-Editoer öffne?
Gruss
Herbert
in DieseArbeitsmappe oT
01.12.2008 10:21:00
Matthias
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige