Satır Temizleme

csncesur

Altın Üye
Katılım
12 Ekim 2021
Mesajlar
91
Excel Vers. ve Dili
Türkçe
Altın Üyelik Bitiş Tarihi
21-02-2025
Sheets(i).Rows("2:" & Rows.Count).ClearContens yazılan kod 2. satırdan itibaren tüm sayfadaki verileri temizliyor. Ancak ben A,B,C,D,E,F,G,H,I sütünlar ve satırlarımdaki verilerimin sabit kalmasını J ve diğer sütunlardaki verileri temizlenmesini istiyorum. Yardım edebilir misiniz..
 

Muzaffer Ali

Destek Ekibi
Destek Ekibi
Katılım
5 Haziran 2006
Mesajlar
6,167
Excel Vers. ve Dili
2019 Türkçe
Aşağıdaki kod J-Z aralığındaki kolonları temizler.
Kod:
sheets(i).range("J2:Z"&rows.count).clearcontents
 

csncesur

Altın Üye
Katılım
12 Ekim 2021
Mesajlar
91
Excel Vers. ve Dili
Türkçe
Altın Üyelik Bitiş Tarihi
21-02-2025
Aşağıdaki kod J-Z aralığındaki kolonları temizler.
Kod:
sheets(i).range("J2:Z"&rows.count).clearcontents
hocam ilginiz için teşekkür ederim hata verdi ben size proje dosyasını paylaşıyorum
 

Ekli dosyalar

AdemCan

Altın Üye
Destek Ekibi
Katılım
1 Eylül 2008
Mesajlar
1,386
Excel Vers. ve Dili
2019 TR
Merhaba,
Sheets(i).Rows("2:" & Rows.Count).ClearContents satırını
Muzaffer Beyin paylaştığı Sheets(i).Range("J2:Z" & Rows.Count).ClearContents satırı ile değiştirip denediğim zaman resimdeki sonucu almaktayım.
234882
 

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,779
Excel Vers. ve Dili
Microsoft 365 Tr-64
İlk mesajınıza bakarak cevaplıyorum
Sheets(i).Range(Cells(2, "j"), Cells(Rows.Count, Columns.Count)).ClearContents
 

EmrExcel16

Destek Ekibi
Destek Ekibi
Katılım
1 Kasım 2012
Mesajlar
1,524
Excel Vers. ve Dili
Office 365 Türkçe
Merhaba , istediğiniz bu şekilde mi acaba?
 

Ekli dosyalar

Muzaffer Ali

Destek Ekibi
Destek Ekibi
Katılım
5 Haziran 2006
Mesajlar
6,167
Excel Vers. ve Dili
2019 Türkçe
hocam ilginiz için teşekkür ederim hata verdi ben size proje dosyasını paylaşıyorum
Ekte gönderdiğiniz dosyada hiçbir hata vermiyor.

Dosyanızda bulunan aşağıdaki satırı siliyorsunuz
Kod:
Sheets(i).Rows("2:" & Rows.Count).ClearContens
yerine aşağıdaki satırı ekliyorsunuz değil mi?
Kod:
sheets(i).range("J2:Z"&rows.count).clearcontents
Hata verdiğinde ekran görüntüsünü paylaşır mısınız?
 

csncesur

Altın Üye
Katılım
12 Ekim 2021
Mesajlar
91
Excel Vers. ve Dili
Türkçe
Altın Üyelik Bitiş Tarihi
21-02-2025
Ekte gönderdiğiniz dosyada hiçbir hata vermiyor.

Dosyanızda bulunan aşağıdaki satırı siliyorsunuz
Kod:
Sheets(i).Rows("2:" & Rows.Count).ClearContens
yerine aşağıdaki satırı ekliyorsunuz değil mi?
Kod:
sheets(i).range("J2:Z"&rows.count).clearcontents
Hata verdiğinde ekran görüntüsünü paylaşır mısınız?
234888
 

csncesur

Altın Üye
Katılım
12 Ekim 2021
Mesajlar
91
Excel Vers. ve Dili
Türkçe
Altın Üyelik Bitiş Tarihi
21-02-2025
Ekte gönderdiğiniz dosyada hiçbir hata vermiyor.

Dosyanızda bulunan aşağıdaki satırı siliyorsunuz
Kod:
Sheets(i).Rows("2:" & Rows.Count).ClearContens
yerine aşağıdaki satırı ekliyorsunuz değil mi?
Kod:
sheets(i).range("J2:Z"&rows.count).clearcontents
Hata verdiğinde ekran görüntüsünü paylaşır mısınız?
hocam tamamdır oldu çooook teşekkür ederim elinize sağlık :)
 
Üst