ScrollArea foglio

Question

Vorrei limitare lo scorrimento del foglio di lavoro, in modo da vistalizzare solo un range di celle. (tutte la altre celle non si dovrebbreo vedere, quindi grige)

come posso fare? ho impostato in editor VBA nella proprietà del foglio il range nel valore scrollarea, ma non funziona...

Answer 1

si scusate!

https://skydrive.live.com/redir.aspx?cid=6a1a7fe26344f41a&resid=6A1A7FE26344F41A!107

Vedi qui: http://it.narkive.com/2004/12/22/4569704-nascondere-colonne.html

Quindi, devi avere T come base:

     With Me

         .Unprotect Password:="Mattia1984"

         .Range("A:" & f).EntireColumn.Hidden = False

         .Range("T:" & f).EntireColumn.Hidden = True

         .Rows("1:" & Me.Rows.Count).EntireRow.Hidden = False

         .Rows("83:" & Me.Rows.Count).EntireRow.Hidden = True

         .Protect Password:="Mattia1984"

     End With

 End Sub

Answer 2

quest'ultima mi blocca lo scroll, ma non nel range che definisco... per esempio io imposto A1:W82, mi fa visualizzare A1:AA77.

io ho la necessità che il foglio si da A1:W82 e che le celle mi finiscano alla W82. di conseguenza anche lo scroll è limitato...

in genere compare un bordo dove finisce il foglio e il fondo rimane grigio senza celle...

mi arrivano parecchi fogli in quel modo, ma protetti, quindi non ho mai capito come fare!

Quindi sono righe/colonne nascoste, che nulla hanno a che fare con la scroll area. Un modo(da copia/incollare nel modulo del foglio):

Private Sub Worksheet_Activate()

    Me.Columns("X:" & f).EntireColumn.Hidden = True

    Me.Rows("83:" & Me.Rows.Count).EntireRow.Hidden = True

End Sub

Private Function f() As String

    f = Split(Cells(1, Me.Columns.Count).Address( _

        True, False, xlA1, False), "$")(0)

End Function

Answer 3

non funziona nel senso che non mi blocca lo scroll...

ho inserito quella che mi hai dato, cambiando l'area, ma purtroppo non funziona comunque...

io l'ho inserita nel codice del foglio che voglio "bloccare" in generale dichiarazioni.

 

No no. Va copiata in un modulo standard e poi lanciata.

Però se quello che vuoi è che alla selezione di un foglio, venga specificata per quel foglio l'area di scroll, copia incolla questa nel modulo del foglio:

Private Sub Worksheet_Activate()

    Me.ScrollArea = "$A$100:$F$200"

End Sub

Answer 4

non funziona nel senso che non mi blocca lo scroll...

ho inserito quella che mi hai dato, cambiando l'area, ma purtroppo non funziona comunque...

io l'ho inserita nel codice del foglio che voglio "bloccare" in generale dichiarazioni.

Answer 5

Vorrei limitare lo scorrimento del foglio di lavoro, in modo da vistalizzare solo un range di celle. (tutte la altre celle non si dovrebbreo vedere, quindi grige)

come posso fare? ho impostato in editor VBA nella proprietà del foglio il range nel valore scrollarea, ma non funziona...

 

Definisci: non funziona.

Questa:

Public Sub m()

    ActiveSheet.ScrollArea = "A100:F200"

End Sub

definisce un'area di scroll dalla quale non puoi uscire per il foglio attivo e non puoi neppure utilizzare le celle extra area..