sayfaların açılışı

[wolwaren]

bir kitap içindeki sayfaların herbiri %70 oranında açılsın ve ilk gözüken hücre aralıkların a1 den t38 e kadar olacak bir kod varmı?

 

[peleryn]

Merhabalar;

Çalışma kitabınızın thisworkbook kod bölümüne verdiğim kodları kopyalayın.

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
ActiveWindow.Zoom = 70
Range("A1:T38").Select
End Sub

 

[wolwaren]

teşekkürler

% 70 olayı tamam ama a1 den t 38 e kadar olanlar seçili gözükmemeli sadece sayfada o kısım gözükmeli.

 

[peleryn]

Range("A1").Select

ya da

Range("j19").Select

ikisi de işinizi görür gibi geliyor..bir de böyle deneyin..

 

[wolwaren]

sayın peleryn teşekkürler

bu siteyi çok seviyorum paylaşım böyle bişey işte.
:hey:

 

[wolwaren]

bişey daha merak ediyorum ayrıyetten konu açmayayım dedim bu 2007 excel de geliştirici sekmesinde ekledeki form denetimlerini az çok tanıyorumda aynı onlara benzeyen axtivex denetimleri ne bilginiz varmı ?