Come individuare in VBA la cella rispetto a cui ho fatto il Blocco riquadri?

Question

Buona sera, avrei due domande legate a blocca riquadri.

Su un foglio excel ho applicato il blocco riquadri di righe e di colonne: dopo aver selezionato la cella  C3 (ad esempio). Ho bisogno di potermi riferire a tale cella da codice VBA, e non ho trovato nulla.

Con  la mia operazione, ho bloccato le prime tre righe e le prime tre colonne, quindi la prima cella disponibile per lo scroll é la D4. Se faccio uno scroll generico che ad esempio fa salire in alto di 3 righe l'area mobile, la posizione della cella D4 viene presa dalla D7. 

Come faccio a conoscere da VBA il riferimento della cella correntemente presente nella vecchia posizione D4, che nell'esempio, é la D7?

Grazie .

Answer 1

Ciao Gianfrediano(FRED)"),

Buona sera, avrei due domande legate a blocca riquadri.

Su un foglio excel ho applicato il blocco riquadri di righe e di colonne: dopo aver selezionato la cella  C3 (ad esempio). Ho bisogno di potermi riferire a tale cella da codice VBA, e non ho trovato nulla.

Con  la mia operazione, ho bloccato le prime tre righe e le prime tre colonne, quindi la prima cella disponibile per lo scroll é la D4. Se faccio uno scroll generico che ad esempio fa salire in alto di 3 righe l'area mobile, la posizione della cella D4 viene presa dalla D7. 

Come faccio a conoscere da VBA il riferimento della cella correntemente presente nella vecchia posizione D4, che nell'esempio, é la D7?

Prova qualcosa del genere:

'=========>>

Option Explicit

'--------->>

Public Sub Tester()

    Dim miaCella As Range

    With ActiveWindow.Panes(4)

        Set miaCella = ActiveSheet.Cells(.ScrollRow, .ScrollColumn)

        MsgBox miaCella.Address(0, 0)

    End With

End Sub

'<<=========

===

Regards,

Norman

Answer 2

Ciao Fred,

hi Norman,

grazie per la risposta. A furia di cercare in rete avevo risolto usando 

questa proprietà

ActiveWindow.VisibleRange.Rows(1).Row

ma ovviamente

ScrollRow 

é la soluzione più elegante ed efficiente

Grazie  Mille

FRED.

Ti ringrazio per il cortese riscontro.

Alla prossima.

===

Regards,

Norman

Answer 3

hi Norman,

grazie per la risposta. A furia di cercare in rete avevo risolto usando 

questa proprietà

ActiveWindow.VisibleRange.Rows(1).Row

ma ovviamente

ScrollRow 

é la soluzione più elegante ed efficiente

Grazie  Mille

FRED.