Copy only borders and leave other formats

Hello friends, I have huge file with many columns. One of the column contains data and is surrounded with borders. I need to apply same borders on other columns, but if I use Format Painter - it also applies other formats like regular text. I need to keep original formats like bolded text and currency on other columns, but apply borders on top. Is there a way?

sure, with vba
your file will help a lot

Thank You, I have found VBA online, will mark it as solved. Just wanted to know is there a way without VBA.