VBA Code for autoincrement after printing

Hello,

I am working on a batch sheet for our lab. We use batch codes to give every recipe a unique code. We want a sheet that can be filled in by hand, so the batch codes need to be above the table, but changing this every time before printing will be an incredible inconvenience. I tried finding a solution online, but the code didn't work. I want to increase the value of b1, b11, b21 after printing by 3. These values are located in sheet4. I used the following code:

Please Login or Register  to view this content.

If someone has a suggestion to fix this, that would be amazing.

I really appreciate any help you can provide.
Test.xlsx

You could try this code:

Please Login or Register  to view this content.

Please Login or Register  to view this content.

The numbers wil be upped 2 in B1 and the rest follows