AccessTr.neT
gizle yazan gizlensin - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: gizle yazan gizlensin (/konu-gizle-yazan-gizlensin.html)



gizle yazan gizlensin - ikikan - 05/08/2010

Sub gizle()
For i = 6 To 1000
Range("b" & i).Select
If ActiveCell.Value = "Gizle" Then
Selection.EntireRow.Hidden = True
Else
Selection.EntireRow.Hidden = False
End If
Next
End Sub


bu kod işe yarıyor ama cok yavaş daha hızlı yapılabilirmi ayrıca göter
eklene degeride eklene bilirmi


Cvp: gizle yazan gizlensin - mustafa_atr - 05/08/2010

örnek uygulama ekleyiniz bu şeklide ne sorduğunuzu anlamak zor.


Cvp: gizle yazan gizlensin - ogulcan92 - 12/08/2010

Sn:ikikan
Lütfen Form Kurallarını okuyalım sorunuz Excel sorusu ama siz Vb6 bölümünde sormuşsunuz.Ayrıca kodların çalışması 2-3 saniye gibi bir zaman alır.Gizle yazısını 6. satırdan başlayıp 1000. satıra kadar arayıp gizler ama verileriniz bu kadar çok değilse 1000 yazanı eksiltebilirsiniz.Aşağıdaki örnekte 100. satıra kadar yapılmış ve tek buton üzerinde gizle göster olarak hazırlanmıştır.


Cvp: gizle yazan gizlensin - ogulcan92 - 06/09/2010

Konuyu açan arkadaşımız yaklaşık 1 aydır siteye uğramadığı ve olumlu yada olumsuz görüş bildirmediğinden konu çevaplanmışlara taşınmıştır.