99 nolu satırı makro ile nasıl gizleyebilirim

[dfom_2004]

makro ile rowları gizlemem gerekiyor nasıl gizleyebilirim
teşekürler

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu kullanabilirsiniz.

Sub 99_Gizle ()
Rows("99:99").EntireRow.Hidden = True
End Sub

 

[dfom_2004]

kod calıstı ama ben bunu dinamik yapmak istiyorum

Sub removeRow()
Dim pos1 As Integer
Dim pos2 As Integer
pos1 = 99
pos2 = 99
Rows("&pos1:&pos2").EntireRow.Hidden = True
End Sub

kod calıstıgında type mismatch hatası alıyorum
sanırım pos ları integer actıgım icin oluyor, bu sorunu nasıl çözebilirim .
teşekkürler

 

[veyselemre]

[vb:1:ac35d9e111]Rows(pos1 & ":" & pos2).EntireRow.Hidden = True[/vb:1:ac35d9e111]

 

[Seyit Tiken]

Alternatif :Gizle / Göster

Sub Makro2()
[A99].Rows.Hidden = 1
End Sub

Sub Düğme2_Tıklat()
[A99].Rows.Hidden = 0
End Sub

 

[dfom_2004]

ilginize teşekkür ederim sorun halloldu

cok tesekkurler