grafik gizleme

[tooba]

arkadaşlar, bir grafiğin visible özelliğini false yapmak gibi birşey bulamadım, makroyu çalıştırdığımda istediğim bir grafiği nasıl gizlerim (tabii istediğim zaman da açabilmeliyim :))

[Levent Menteşoğlu]

Aşağıdaki gibi bir kodla gizleyebilirsiniz. False yerine True yazarsanız grafiği tekrar görünür yapabilirsiniz.

ActiveSheet.ChartObjects("Grafik 1").Visible = False

[Barons]

merhaba
birden fazla grafiğim var aynı sayafada.1 tanesi hariç hepsini nasıl gizlerim acaba?
teşekkürler

[Barons]

for next döngüsü kullanmam gerekir sanırım ama nasıl???

[kadirdaylight]

Aşağıdaki gibi bir kodla gizleyebilirsiniz. False yerine True yazarsanız grafiği tekrar görünür yapabilirsiniz.

ActiveSheet.ChartObjects("Grafik 1").Visible = False

Merhaba bu kod PivotChart için geçerli değil sanırım uyguladığımda olmuyor. PivotChart için gizle göster seçeneğimiz varmı acaba?

Tamam sorun düzeldi.. Grafik adı hatalıymış teşekkürler.

[kadirdaylight]

Benim başka bir sorum daha olacak.

Hazırladığım dosyada yaklaşık 20 adet sayfa var. Her sayfada ayrı veri ve ayrı pivotchart var. Bütün bunlara bulundukları sayfada gizle göster yapabiliyorum burada sorun yok. Peki 21. sayfada genel olarak adlandırdım ve diğer 20 sayfadaki başlıkları bu 21. sayfada topladım ve altına tek tek buton ekledim. Bu butonlar sayesinde ilgili sayfadaki pivotchartları göster gizle yapabilirmiyim? (21. sayfada)

[Levent Menteşoğlu]

Benim başka bir sorum daha olacak.

Hazırladığım dosyada yaklaşık 20 adet sayfa var. Her sayfada ayrı veri ve ayrı pivotchart var. Bütün bunlara bulundukları sayfada gizle göster yapabiliyorum burada sorun yok. Peki 21. sayfada genel olarak adlandırdım ve diğer 20 sayfadaki başlıkları bu 21. sayfada topladım ve altına tek tek buton ekledim. Bu butonlar sayesinde ilgili sayfadaki pivotchartları göster gizle yapabilirmiyim? (21. sayfada)


ActiveSheet.ChartObjects("Grafik 1").Visible = False

Yukarıda önerilen komuttaki ActiveSheet yerine sayfa adını yazarak deneyin. Örneğin,

Sheet("sayfa5").ChartObjects("Grafik 1").Visible = False

[kadirdaylight]

ActiveSheet.ChartObjects("Grafik 1").Visible = False

Yukarıda önerilen komuttaki ActiveSheet yerine sayfa adını yazarak deneyin. Örneğin,

Sheet("sayfa5").ChartObjects("Grafik 1").Visible = False

Olmadı hocam hata veriyor. Ben çalışmamı ekledim, GENEL sayfasında Sayfa1 altındaki göstere basınca Sayfa1 deki grafiği GENEL de göstersin gizle diyince gizlesin.. Aynı şekilde Sayfa2 altındaki göstere basınca GENEL sayfasında Sayfa2 deki grafiği göstersin istiyorum. Mümkün değilmi?

[yurttas]

Olmadı hocam hata veriyor. Ben çalışmamı ekledim, GENEL sayfasında Sayfa1 altındaki göstere basınca Sayfa1 deki grafiği GENEL de göstersin gizle diyince gizlesin.. Aynı şekilde Sayfa2 altındaki göstere basınca GENEL sayfasında Sayfa2 deki grafiği göstersin istiyorum. Mümkün değilmi?

.

Dosyanız ekte.

.

[kadirdaylight]

.

Dosyanız ekte.

.

Çok teşekkür ederim, kopyala yapıştır olayı aklıma gelmemişti :)

[kadirdaylight]

.

Dosyanız ekte.

.

Sayın yurttas,

çözümünüz için tekrar teşekkür ederim ancak beraberinde karşıma başka bir sorun getirdi. Bunu çözmemde yardımcı olabilirmisiniz? Hazırladığınız dosyada kopyalanmış bir grafik ikinci kez basılınca gene kopyalıyor. Bu çok sorun yaratmasada gizle dediğimizde eğer görünürde bir kopya yoksa hata veriyor. Bir sunum için kullanacağım dosyada böyle bir hata alırsam pek hoş olmayacaktır. Bu sorunu nasıl çözebiliriz?

[yurttas]

Sayın yurttas,

çözümünüz için tekrar teşekkür ederim ancak beraberinde karşıma başka bir sorun getirdi. Bunu çözmemde yardımcı olabilirmisiniz? Hazırladığınız dosyada kopyalanmış bir grafik ikinci kez basılınca gene kopyalıyor. Bu çok sorun yaratmasada gizle dediğimizde eğer görünürde bir kopya yoksa hata veriyor. Bir sunum için kullanacağım dosyada böyle bir hata alırsam pek hoş olmayacaktır. Bu sorunu nasıl çözebiliriz?

.

Bir de buna bakın.

.