ScrollArea : How I can do that
Hello
I have many condition to evaluate the scrollArea, how I can do that in
one line
If x = 3 Then
ActiveSheet.ScrollArea = "D6:D8"
ElseIf x = 4 Then
ActiveSheet.ScrollArea = "D6:D9"
ElseIf x = 5 Then
ActiveSheet.ScrollArea = "D6:D10"
ElseIf ....
....
End If
Like ...
Dim j, k
J = 6 ' row
K = 4 ' col
ActiveSheet.ScrollArea = " k,j: k,j+x"
I don't have any idea to write the good instruction for the ScrollArea
You can help me
Thanks
Gief
|