Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1736to1740
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

VBA - Zeilen durchlaufen und in farbige Zellen Wert reinschreiben

VBA - Zeilen durchlaufen und in farbige Zellen Wert reinschreiben
29.01.2020 16:10:01
Frederic
Hallo,
ich habe folgendes Problem und zwar möchte die Zeilen beginned ab F5 bis NI7 durchlaufen und jeweils in die hellgrünen Kästchen das Volumen pro Tag reinschrieben.
Farbcode ist 43.
Also bspw. von I5 bis BG8 (erste Zeile - grüne Kästchen) das Volumen von 11,25 reinschreiben und dann die nächste Zeile durchsuchen und dort in die grünen das Volumen von 6,31 usw..
Hier die Beispieldatei
https://www.herber.de/bbs/user/134833.xlsx
Ich hoffe Ihr könnt mir helfen :)
Beste Grüße
Frederic

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - Zeilen durchlaufen und in farbige Zellen Wert reinschreiben
29.01.2020 19:06:24
Christian
hallo,
so zB.

Option Explicit
Sub TestIt()
Dim i As Long, j As Long
Dim dblVol As Double
With Tabelle1
For i = 5 To .Cells(.Rows.Count, 1).End(xlUp).Row
dblVol = .Cells(i, 3)
For j = 6 To .Cells(4, .Columns.Count).End(xlToLeft).Column
If .Cells(i, j).Interior.ColorIndex = 43 Then
.Cells(i, j) = dblVol
End If
Next
Next
End With
End Sub
Grüße
Christian
AW: VBA - Zeilen durchlaufen und in farbige Zellen Wert reinschreiben
30.01.2020 10:47:26
Frederic
super klappt!! Vielen Dank Christian
Anzeige

324 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige