özel kopyala yapistir makrosu

[byvolkan]

Iyi günler elimde bir kopyala ve sadece degerleri yapistir makrosu var ve ben bu koda bir ekleme yaparak, copy-paste yaparken ayni anda otomatik olarakda hucrenin sari renk ile renklendirilmesini istiyorum.
Yardimci olursaniz sevinirim.

Sub collage_valeur()
'
' collage_valeur Macro
'
' Touche de raccourci du clavier: Ctrl+b
'
If TypeName(Selection) = "Range" Then
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End If
End Sub

Tesekkurler

 

[YUSUF44]

End If satırından önce

Selection.Interior.Color = vbYellow

satırını ekleyip deneyin.

 

[byvolkan]

Tesekkurler