İkİ Dolu Satir Arasindakİ BoŞ Satirlari Gİzleme

[ferhatgurbuz]

GÜNAYDIN ARKADAŞLAR Ekteki dosya üzerinde anlattığım gibi sayfadaki satır adedi değişebiliyor. en son satırdan sonra imzalayacak kişilerin isimlerini acmam gerekiyor. bunun için bir makroya ihtiyacım var.

şifre 1 dir. kolay gelsin teşekkürler

 

[hamitcan]

Sub gizle()
bas = WorksheetFunction.Max([a:a]) + 11
son = bas + 47
Rows(bas & ":" & son).Hidden = True
End Sub

Sub goster()
Rows.Hidden = False
End Sub

 

[ferhatgurbuz]

hamit hocam teşekkür ederim. Birde bu gizlediğim satırları nasıl açabilirim.

 

[ferhatgurbuz]

Hamit hocam pardon sonradan gördüm. GÖSTER KODUNU