ok thx
i hoped, that here will be any solution with protection cells or something like this..where can i choose my headers and set them to "nonoverwriting" without returning error if i try it. Or maybe some code in ThisWorkbook, which do this.

Your code solve also writing text to header, writing my formulas..but this i dont want to solve with code.
I want only protect my headers and the other things i will do, as i do it now.
But if is not possible do it this way, nevermind.
also thx a lot for try