Microsoft Office Forums - View Single Post - auto fill numbers

Thread: auto fill numbers

View Single Post

Old

05-13-2021, 04:37 AM

Urraco

Urraco is offline

Urraco uses Windows 8

Windows 8

Urraco uses Office 2016

Office 2016

Advanced Beginner

The original poster

Join Date: Apr 2018

Posts: 30

Urraco is on a distinguished road

Default

Solved!
Good luck!

Quote:

Originally Posted by rollis13

View Post

Change the line of code to:

Code:

If Cells(i, x) <> "" Then Cells(i, col * 2 - x + 1) = Cells(i, x) + 1

Reply With Quote