- Katılım
- 21 Aralık 2019
- Mesajlar
- 190
- Excel Vers. ve Dili
- Office 2016
- Altın Üyelik Bitiş Tarihi
- 29-03-2024
Herkese günaydın ve şimdiden iyi bayramlar.. bir sorum olacak yardımlarınız için şimdiden tşk ederim.
Başka bir çalışma kitabından çektiğim verileri Hedef sayfaya yapıştırıyorum. Ama bu verilerin ham hali çizgili bazı satırlar renkli font ayarları bozuk geliyor ben bunu düzenlemek istiyorum. Yine excelweb de örnekler buldum ama hepsini tamamlayamadım.
Sayfam A3:J10000 arası.. uygulayabildiğim formül aşağıda yazılı ben buna bu aralıkta bulunan renkleri kaldırma ve çizgileri yok etme birde C sütununda bir veri yoksa yani boş ise A;J arasını Bold yapmasını istiyorum.
Sub Font()
Set s1 = Sheets("DATA-1")
With s1.Range("A3:J1000").Font
.Name = "Cambria"
.Size = 10
Renkleri sil
Çizgileri yok et
C sütununda veri olmayan satırları A.dan J'ye Bold yap
End With
End Sub
Başka bir çalışma kitabından çektiğim verileri Hedef sayfaya yapıştırıyorum. Ama bu verilerin ham hali çizgili bazı satırlar renkli font ayarları bozuk geliyor ben bunu düzenlemek istiyorum. Yine excelweb de örnekler buldum ama hepsini tamamlayamadım.
Sayfam A3:J10000 arası.. uygulayabildiğim formül aşağıda yazılı ben buna bu aralıkta bulunan renkleri kaldırma ve çizgileri yok etme birde C sütununda bir veri yoksa yani boş ise A;J arasını Bold yapmasını istiyorum.
Sub Font()
Set s1 = Sheets("DATA-1")
With s1.Range("A3:J1000").Font
.Name = "Cambria"
.Size = 10
Renkleri sil
Çizgileri yok et
C sütununda veri olmayan satırları A.dan J'ye Bold yap
End With
End Sub