ich habe eine frage zu meinem code. Es gibt keine Fehlermeldung, jedoch passiert auch nichts.
habe ich etwas übersehen?
Sub AwarenessChanges()
Dim i As Integer
For i = 0 To 100
If ActiveWorkbook.Sheets("AwarenessSheet").Cells(i + 5, 5) "" Then
ActiveWorkbook.Sheets("AwarenessSheet").Cells(i + 5, 5) = _
ActiveWorkbook.Sheets("ChangesComparison").Cells(i + 3, 2)
End If
Next i
End Sub
Ziel: Zahlen/Worte werden aus dem einen Sheet ins nächste Übernommen.
Danke vorab!
Gruß Markus