PasteSpecial fügt falsche Schriftart ein

[Mitness]

Hallo liebe Community,

ich kopiere per VBA etwas mit .Copy aus Arbeitsblatt "Apfel" und füge es mittels .PasteSpecial Paste:=xlPasteValues, Operation:=xlNone in Arbeitsblatt "Birne" ein, soweit so gut. 
Der Standardschriftart meiner Arbeitsmappe ist "SchriftTyp1". Auf beiden o. g. Arbeitsblätter ist die Schriftart "SchriftTyp1" eingestellt.

Wenn ich jetzt das Macro ausführe, fügt er mir jedoch in das Arbeitsblatt "Apfel" mit einer anderen Schriftart ein.
Wie kann das sein? Ich sage doch per .PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, dass er nur die Werte einfügen soll..
Das Eigenartige ist, wenn ich die Operation per Hand ausführe, ändert sich nichts an der Schriftart.

Hat jemand eine Idee?

Mit freundlichen Grüßen
Mitness

---

Ich habe die Fehlerursache ermitteln können. 

Es lag daran, dass ich im VBA-Code ein paar Zeilen vor dem .Copy, eine Range mit .clear zurücksetze. 
Wie ich gelesen habe, setzt das irgendwie auch alles andere zurück innerhalb der betroffenen Zellen, so auch die Schriftart. Beheben konnte ich das Problem indem ich nun .clearContents benutze.

Mit freundlichen Grüßen
Mitness  

[LCohen]

Mustergültige Frage!