fiyat farkı

[okavut]

ff sayfasında a1=evet ise sayfa 1 de b364 ile b431 arasının gizlenmesi için nasıl bir kod yazmak lazım.

 

[halit3]

userformun içine aşağıdaki kodu koyunuz.

Private Sub CommandButton1_Click()
Worksheets("SAYFA").Cells(1, 1).Value = T1.Text
If Worksheets("SAYFA").Cells(1, 1).Value = "EVET" Then
Worksheets(Sayfa1.Name).Rows("364:431").EntireRow.Hidden = True
Else
Worksheets(Sayfa1.Name).Rows("364:431").EntireRow.Hidden = False
End If
Unload UserForm1
End Sub

 

[okavut]

sayın halit3
ilginize teşekkür ederim sorun çözülmüş oldu
İyi akşamlar