protect layout / copy past with predifined lay-out settings

[APOC [T.I.M.]]

is there a simple way to "protect" the lay out of my worksheet in someway ???
I mean when I copy paste some info/text in my worksheet it's alway pasted in the default excel layout setting (arial 10) at least nearly all the time.

could I paste text by default with these settings?
Arrial Narrow 8 in the default (predifined) cell collor and no underline?
I guess I should use some vba code?
(and perhaps I can use this settings by default for all text in my worksheet by default?)
I did search but there are a lot and I mean a whole lot of topics but I still haven't found one which does what I want/need.

with kind regards

 

[Andrew Poulsom]

As far as I know there is no equivalent of Word's PasteAndFormat method in Excel.

 

[APOC [T.I.M.]]

You could try this in the module for the Worksheet:

Private Sub Worksheet_Change(ByVal Target As Range)
    Target.Style = "Normal"
End Sub

is it possible to add more specifick "settings" to this Target.Style???
ie.

Target.Style = "Normal"
    With Target.Font
        .Name = "Arial Narrow"
        .FontStyle = "Regular"
        .Size = 8
        .Underline = xlUnderlineStyleNone
    End With

I mean it this the right way to do it?

 

[Andrew Poulsom]

You can modify the Normal style:

With ActiveWorkbook.Styles("Normal").Font
    .Name = "Arial Narrow"
    .Size = 8
    .Underline = xlUnderlineStyleNone
End With

 

[APOC [T.I.M.]]

*solved*

(thank you very much for all the help)