Filtreli satırları kopyalama ve yapıştırma

Katılım
2 Mayıs 2021
Mesajlar
56
Excel Vers. ve Dili
Excel 2016 - TR
Altın Üyelik Bitiş Tarihi
06-07-2023
Merhaba herkese kolay gelsin. Excel filtrelenmiş verilerle çalışmalar yapıyorum. Ekteki dosya da filtreli yeşil renkli hücreleri, yine filtreli sarı renkli hücrelere kopyalamak istiyorum. Devamlı bu tarz kopyala yapıştır tarzı çalışma yaptığım için bu fonksiyon sağ tıklamaya da eklenebilir mi kolaylık olması açısından. Dosya ektedir. Yardımcı olabilirseniz çok sevinirim.
 

Ekli dosyalar

Katılım
2 Mayıs 2021
Mesajlar
56
Excel Vers. ve Dili
Excel 2016 - TR
Altın Üyelik Bitiş Tarihi
06-07-2023
Korhan Bey teşekkürler. Bu videoyu izledim. Tam istediğim şey ama ilgili eklenti artık indirilemiyor. O yüzden bir çözüm bulamadım.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,242
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
İlgili video altına indirme linkinin çalışmadığını yazabilirsiniz. Belki video sahibi dönüş yapar.
 

hbgny

Altın Üye
Katılım
28 Eylül 2005
Mesajlar
177
Excel Vers. ve Dili
Microsoft Excel Office 2013 Türkçe
Altın Üyelik Bitiş Tarihi
05-09-2027
Katılım
2 Mayıs 2021
Mesajlar
56
Excel Vers. ve Dili
Excel 2016 - TR
Altın Üyelik Bitiş Tarihi
06-07-2023
İlgili video altına indirme linkinin çalışmadığını yazabilirsiniz. Belki video sahibi dönüş yapar.
Şimdi ilgili videoya yorum yazdım hocam ama 7-8 yıl önce paylaşılmış. Belki bir umut yanıt verirler. teşekkür ederim
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Merhaba,


Linkteki #10. mesajdaki dosyanın içerisindeki "Yapistir" prosedüründeki;

For Each b In Selection

yukarıdaki satırın yerine aşağıdaki satırı yazarsanız istediğiniz olur sanırım.

For Each b In Selection.SpecialCells(xlCellTypeVisible)

.
 
Katılım
2 Mayıs 2021
Mesajlar
56
Excel Vers. ve Dili
Excel 2016 - TR
Altın Üyelik Bitiş Tarihi
06-07-2023
Merhaba,


Linkteki #10. mesajdaki dosyanın içerisindeki "Yapistir" prosedüründeki;

For Each b In Selection

yukarıdaki satırın yerine aşağıdaki satırı yazarsanız istediğiniz olur sanırım.

For Each b In Selection.SpecialCells(xlCellTypeVisible)

.

Hocam dediğiniz gibi değişiklikleri yaptım ve çok güzel çalışıyor. Çok pratik oldu. Dünden beri aramadığım yer kalmadı. Sayenizde çözüldü bu sorunda. Emeğinize sağlık.
 

mekist

Altın Üye
Katılım
13 Ağustos 2008
Mesajlar
329
Excel Vers. ve Dili
Office 365 ProPlus-Türkçe
Altın Üyelik Bitiş Tarihi
03-10-2026
Merhaba,


Linkteki #10. mesajdaki dosyanın içerisindeki "Yapistir" prosedüründeki;

For Each b In Selection

yukarıdaki satırın yerine aşağıdaki satırı yazarsanız istediğiniz olur sanırım.

For Each b In Selection.SpecialCells(xlCellTypeVisible)

.
Ömer Üstadım makro çalışıyor fakat açılışta aşağıdaki gibi hata veriyor, hataya tıklayınca aşağıdaki alanı işaretliyor
239190
239191
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Merhaba,

Range("A1").Select satırını silebilirsiniz. Silip denediğiniz de yine aynı hatayı veriyor mu?
 

mekist

Altın Üye
Katılım
13 Ağustos 2008
Mesajlar
329
Excel Vers. ve Dili
Office 365 ProPlus-Türkçe
Altın Üyelik Bitiş Tarihi
03-10-2026
Merhaba,

Range("A1").Select satırını silebilirsiniz. Silip denediğiniz de yine aynı hatayı veriyor mu?
Teşekkür ederim, hata vermedi
 
Üst