excel görünmüyor

[mtbi00]

Merhaba,

Yaptığım excel sayfası vba kısmında işlem yaparken "ActiveWindow.Visible = False" komutu ile ekranı gizliyordum. Ama bugün dosyayı açtığımda bir hata aldım. Programı tamamıyle kapatıp açtım ama excel sayfam ekrana gelmiyor. Kod kısmına girdiğimde herşey yerinde ama excel sayfasını açamadım. Komutu True olarak değiştirdim ama excel sayfası aktif olmadığından çalışmıyor. Excel dosyasının visible ayarını nasıl True yapıp görünür yaparım bulamadım. Konuyla ilgili yardımlarınız rica olunur.

Saygılarımla.

 

[muratboz06]

VBA da sol taraftaki listeden sayfanızı seçin, özellikler bölümündeki (properties) Visible seçeneğini xlSheetVisible yapınız.
Örnek ekran görüntüsü ektedir.
Alternatif Link:

Screenshot 2

Resim Screenshot 2 kaydedildi Resim Yükle - Hızlı Resim

imgyukle.com

 

[mtbi00]

Hocam merhaba,
Orası zaten sizin dediğiniz gibi gözüküyor ama excel sayfası yok. Ekran görüntüsü veya dosyayı yüklemek istedim olmuyor. Yardımlarınız rica.

 

[uzmanamele]

Merhaba
Bu kodu çalıştırın bakalım ne oluyor.

Sub visible()
For i = 1 To Worksheets.Count
Sheets(i).visible = True
Next
End Sub

 

[mtbi00]

Hocam merhaba,

Yok olmuyor. Dosya bir şekilde bug a girdi herhalde. Ben dosyadaki sayfaları başka bir excel dosyasına aktarmayı denedim. Bu şekilde kurtabiliyorum. İlginizden dolayı çok teşekkür ederim.

 

[Korhan Ayhan]

Birde aşağıdaki gibi deneyin bakalım düzelecek mi?

Dosyanızı açın.
VBA tarafını açın.
Sol tarafta dosyanızın adına tıkladığınızda (ThisWorkbook-BuÇalışmaKitabı bölümünde) alt tarafta özelliklerini görebileceğiniz bir pencere açılması gerekiyor. Görselde ki IsAddin özelliği TRUE olarak gözüküyorsa FALSE yaparak deneyin.

 

[mtbi00]

Korhan hocam merhaba. Dediğiniz yere baktım. False gözüküyordu. Onu True yaptım olmadı. Tekrar False yapınca dosya geldi. Çok teşekkür ederim. İyi çalışmalar.