- Katılım
- 11 Kasım 2006
- Mesajlar
- 79
- Excel Vers. ve Dili
- excel 2013, Türkçe
- Altın Üyelik Bitiş Tarihi
- 19/01/2019
İyi akşamlar;
Bir sayfadaki veriyi diğer sayfalara aktarmak için aşağıdaki kodu kullanıyorum.ancak kaynak sayfadaki biçimler (yazı rengi, yönelim, bold vs..) hedef sayfalara aktarılmıyor. bu sorunun üstesinden nasıl gelebilirim?
şimdiden teşekkür ederim.
Private Sub Worksheet_Deactivate()
sonsat = Sheets("VERI").[a65536].End(3).Row
kopya = Range("A1:E" & sonsat).Address
Sheets("MWS").Range("A1:E65536").Clear
Sheets("Hav-Neg").Range("A1:E65536").Clear
Sheets("Cole-Cole").Range("A1:E65536").Clear
Sheets("Debye").Range("A1:E65536").Clear
Sheets("Cole-Davidson").Range("A1:E65536").Clear
Sheets("MWS").Range(kopya).Value = Sheets("VERI").Range(kopya).Value
Sheets("Hav-Neg").Range(kopya).Value = Sheets("VERI").Range(kopya).Value
Sheets("Cole-Cole").Range(kopya).Value = Sheets("VERI").Range(kopya).Value
Sheets("Debye").Range(kopya).Value = Sheets("VERI").Range(kopya).Value
Sheets("Cole-Davidson").Range(kopya).Value = Sheets("VERI").Range(kopya).Value
End Sub
Bir sayfadaki veriyi diğer sayfalara aktarmak için aşağıdaki kodu kullanıyorum.ancak kaynak sayfadaki biçimler (yazı rengi, yönelim, bold vs..) hedef sayfalara aktarılmıyor. bu sorunun üstesinden nasıl gelebilirim?
şimdiden teşekkür ederim.
Private Sub Worksheet_Deactivate()
sonsat = Sheets("VERI").[a65536].End(3).Row
kopya = Range("A1:E" & sonsat).Address
Sheets("MWS").Range("A1:E65536").Clear
Sheets("Hav-Neg").Range("A1:E65536").Clear
Sheets("Cole-Cole").Range("A1:E65536").Clear
Sheets("Debye").Range("A1:E65536").Clear
Sheets("Cole-Davidson").Range("A1:E65536").Clear
Sheets("MWS").Range(kopya).Value = Sheets("VERI").Range(kopya).Value
Sheets("Hav-Neg").Range(kopya).Value = Sheets("VERI").Range(kopya).Value
Sheets("Cole-Cole").Range(kopya).Value = Sheets("VERI").Range(kopya).Value
Sheets("Debye").Range(kopya).Value = Sheets("VERI").Range(kopya).Value
Sheets("Cole-Davidson").Range(kopya).Value = Sheets("VERI").Range(kopya).Value
End Sub
Son düzenleme: