Skip to main content

AccessTr.neT


gizle yazan gizlensin

gizle yazan gizlensin

Çözüldü #1
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
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
gizle yazan gizlensin - Yazar: ikikan - 05/08/2010, 17:17
Cvp: gizle yazan gizlensin - Yazar: mustafa_atr - 05/08/2010, 21:32
Cvp: gizle yazan gizlensin - Yazar: ogulcan92 - 12/08/2010, 13:23
Cvp: gizle yazan gizlensin - Yazar: ogulcan92 - 06/09/2010, 16:11