Print sheets based on content in a column

I need help printing sheets based on content in a column.

This is a list of stock where I need to "pagebreak" between the categories in column D, so that I get "clean" lists of each category.
These lists can be quite long, so doing this manually takes too long, and "filtering and printing" is also quite ineffective.

"Column D" can be printed as the "column A" if necessary.

Appreciate any help I can get!