AS3434
Özel Üye
- Katılım
- 13 Ocak 2005
- Mesajlar
- 1,820
- Excel Vers. ve Dili
- M.Office/Excel 2007 Türkçe
İyi Günler
Aşağıdaki makro ile satır gizleme yapıyorum. Toplamda 50 satırım var ve gizleme sonucu ortalama 10~15 satırlık bir veri oluşuyor. Yapmak istediğim bu 10~15 satırlık veriyi C2 hücresindeki değer adıyla yeni bir sayfa açıp kopyalamak. Sayfayı açıyorum ama bir türlü veriyi istediğim gibi kopyalayamıyorum. 50 satırın tümünü kopyalıyor, yani gizlenmiş olan boş satırları da kopyalıyor. Benim istediğim gizlenmiş satırların kopyalanmaması.
Bu konuda yardımcı olursanız sevinirim.
Sub SatırGizle()
For Each i In [G2:G50].Cells
If i.Value = "" Then
i.EntireRow.Hidden = True
End If
Next i
[a1].Select
End Sub
Aşağıdaki makro ile satır gizleme yapıyorum. Toplamda 50 satırım var ve gizleme sonucu ortalama 10~15 satırlık bir veri oluşuyor. Yapmak istediğim bu 10~15 satırlık veriyi C2 hücresindeki değer adıyla yeni bir sayfa açıp kopyalamak. Sayfayı açıyorum ama bir türlü veriyi istediğim gibi kopyalayamıyorum. 50 satırın tümünü kopyalıyor, yani gizlenmiş olan boş satırları da kopyalıyor. Benim istediğim gizlenmiş satırların kopyalanmaması.
Bu konuda yardımcı olursanız sevinirim.
Sub SatırGizle()
For Each i In [G2:G50].Cells
If i.Value = "" Then
i.EntireRow.Hidden = True
End If
Next i
[a1].Select
End Sub