Probao sam i ovo kod mene funkcioniše (nadam se da su ti omogućeni makroi). Problem je što se kod izvršava tek kada se aktivira worksheet, tj. potrebno je da pređeš na drugi worksheet pa da se vratiš na njega. Naravno, to može da se simulira kodom, ali je mnogo jednostavnije da umesto događaja Worksheet_Activate, obradiš događaj Workbook_Open (dakle na nivou radne sveske). Dakle sledeći kod:
Code:
Private Sub Workbook_Open()
Worksheets(1).ScrollArea = "$A$1:$C$20"
End Sub
Na taj način samo jednom podesiš svojstvo ScrollArea i ono traje do zatvaranje.
Dva u dva ide jednom ako možeš da ga ućuškaš