ganu learner
New Member
- Joined
- Dec 31, 2019
- Messages
- 47
- Office Version
- 2013
- Platform
- Windows
Range("A15:L15").Value = Range("A16:L16").Value
Range("A16:L16").Value = Range("A17:L17").Value
Range("A17:L17").Value = Range("A18:L18").Value
Range("A18:L18").Value = Range("A19:L19").Value
Range("A19:L19").Value = Range("A20:L20").Value
Range("A20:L20").Value = Range("A21:L21").Value
Range("A21:L21").Value = Range("A22:L22").Value
Range("A22:L22").Value = Range("A23:L23").Value
Range("A23:L23").Value = Range("A24:L24").Value
Range("A24:L24").Value = Range("A25:L25").Value
Range("A25:L25").Value = Range("A26:L26").Value
Range("A26:L26").Value = Range("A27:L27").Value
Range("A27:L27").Value = Range("A30:L30").Value
Respected Sir please make a loop vba script for above condition.
Range("A16:L16").Value = Range("A17:L17").Value
Range("A17:L17").Value = Range("A18:L18").Value
Range("A18:L18").Value = Range("A19:L19").Value
Range("A19:L19").Value = Range("A20:L20").Value
Range("A20:L20").Value = Range("A21:L21").Value
Range("A21:L21").Value = Range("A22:L22").Value
Range("A22:L22").Value = Range("A23:L23").Value
Range("A23:L23").Value = Range("A24:L24").Value
Range("A24:L24").Value = Range("A25:L25").Value
Range("A25:L25").Value = Range("A26:L26").Value
Range("A26:L26").Value = Range("A27:L27").Value
Range("A27:L27").Value = Range("A30:L30").Value
Respected Sir please make a loop vba script for above condition.