DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
If Target = "İŞİN ADI" Then
[b3:b100].EntireRow.Hidden = False
End If
If Target = "A İşi" Then
Target.Offset(1).EntireRow.Hidden = True
Target.Offset(2).EntireRow.Hidden = True
End If
End Sub