Finding row number++

[Niss1]

Hello, once again I ask for help!

On a worksheet event/change I want to see if the value is TRUE on column AK, same/target row and then execute a code.

I have a problem looking up the row number and using it correctly

My code:

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    Dim row As Long
    row = Target.row
    If Range("$AK" & row) = True Then
      With Target
            .Offset(1).Resize(5).EntireRow.Hidden = .Value <> "Programmable"
        End With
    End If
    Application.EnableEvents = True
End Sub

Thank you again for any help/input

 

[RichardMGreen]

At a quick look, your code is trying to see if the row exists (which it does). You're also testing the row which has just been selected.

Try changing this line:-
If Range("$AK" & row) = True Then

to this:-
If Range("$AK" & row).value = "True" Then

if you want to test against the current row.

 

[Niss1]

hmm, still doesnt work.....

 

[RichardMGreen]

What exactly do you want the code to do?

 

[Norie]

Is the value in AK the Boolean True or the string 'True'?

 

[Niss1]

Boolean true yes

 

[Norie]

How did the value get in the cell?

With a formula or was it just typed?

 

[Niss1]

What exactly do you want the code to do?

it looks up if i change a dropbox value and hides the next 5 rows if the value isnt "Programmable"

I have a "hardcoded" version working, but i want it to work on several worksheets without having to code in all the lines that the dropdown boxes are on. Adding a control column AK seemed like the easy thing to do.


old code

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    If Target.Address = "$L$35" Then
        With Target
            .Offset(1).Resize(5).EntireRow.Hidden = .Value <> "Programmable"
        End With
    elseif.....
    elseif.....
    elseif.....
    elseif.....
    elseif.....
    End If
    Application.EnableEvents = True
End Sub

 

[Niss1]

How did the value get in the cell?

With a formula or was it just typed?

with a formula, yes.

I am guessing there are easier ways to do this, but i am pretty new to vba and not very accustumed to the syntax and possibilities available.

 

[Norie]

Can you post the formula?