Hey there,
I was wondering if there's a way to make this code shorter?
something like:
Cells(Target.Row, Target.Column +2, +4, etc.).value = Target.Value
Thanks in advance,
Rutger
I was wondering if there's a way to make this code shorter?
Code:
Cells(Target.Row, Target.Column + 2).Value = Target.Value
Cells(Target.Row, Target.Column + 4).Value = Target.Value
Cells(Target.Row, Target.Column + 6).Value = Target.Value
Cells(Target.Row, Target.Column + 8).Value = Target.Value
Cells(Target.Row, Target.Column + 10).Value = Target.Value
Cells(Target.Row, Target.Column + 12).Value = Target.Value
Cells(Target.Row, Target.Column + 14).Value = Target.Value
Cells(Target.Row, Target.Column + 16).Value = Target.Value
Cells(Target.Row, Target.Column + 18).Value = Target.Value
Cells(Target.Row, Target.Column + 20).Value = Target.Value
Cells(Target.Row, Target.Column + 22).Value = Target.Value
Cells(Target.Row, Target.Column + 24).Value = Target.Value
Cells(Target.Row, Target.Column + 26).Value = Target.Value
Cells(Target.Row, Target.Column + 28).Value = Target.Value
Cells(Target.Row, Target.Column + 30).Value = Target.Value
Cells(Target.Row, Target.Column + 32).Value = Target.Value
Cells(Target.Row, Target.Column + 34).Value = Target.Value
Cells(Target.Row, Target.Column + 36).Value = Target.Value
Cells(Target.Row, Target.Column + 38).Value = Target.Value
something like:
Cells(Target.Row, Target.Column +2, +4, etc.).value = Target.Value
Thanks in advance,
Rutger