Fontstyle übertragen
TomTom
ich versuche in meinem Script den fontstyle zu übertragen, aber das funktioniert nicht ... hat mir jemand einen Tip?
Sub font_style_übertragen()
Range("A1").Font.FontStyle = Range("A2").Font.FontStyle
End Sub
Danke und Gruss
TomTom