Excel 2013, sütunları

Question

göstergesinin gösterilmesini engellerken, şimdiye kadar hiçbir çözüm bulunmadığında bunu anlamaya çalışırken harcadım. E-tablodaki bir aralığı gizleyen/gizleyen bir makronun (aşağıya bakın) var. Yeterince basit görünüyor ve bu makroyu çalıştırdığım ilk iki kez iyi çalışıyor; Bununla birlikte, her zaman aralığı açığa çıkarmak üçüncü kez, genellikle Excel 2013 çökmesine neden olur. here okunduğumda, gizlemeyi sürdürdüğüm aralıkta bir kullanıcı tanımlı fonksiyona sahip olmak problemi yaratıyor olabilir, fakat ben zaten fonksiyonu oynamayı denedim ve Excel hala çöktü. Daha önce herhangi bir fikri olan var mı?

Sub HideShowSQLCreator(control As IRibbonControl) 

Dim SQL_Creator As Range 
Dim Report_Home_Cell As Range 

Set SQL_Creator = Sheets("Report").Range("SQL_Creator") 
Set Report_Home_Cell = Sheets("Report").Range("Report_Home_Cell") 

If SQL_Creator.EntireColumn.Hidden = False Then 
    SQL_Creator.EntireColumn.Hidden = True 
    Report_Home_Cell.EntireRow.Select 
    ActiveWindow.FreezePanes = True 
    ActiveSheet.Range("Report_Home_Cell").Select 
    Exit Sub 
End If 

If SQL_Creator.EntireColumn.Hidden = True Then 
    SQL_Creator.EntireColumn.Hidden = False 
    ActiveWindow.FreezePanes = False 
    SQL_Creator.Select 
    Exit Sub 
End If 

End Sub 

Answer 1

Hayal kırıklığına uğradım ve çalışma kitabının bozuk olduğunu düşündüm, böylece sıfırdan yeni bir tane oluşturdum. Makro, sonuna gelene kadar gayet iyi çalışıyordu ve çökmenin, gizlemeye/göstermeye çalıştığım aralığın sağında büyük bir pivot masa ile ilgisi olduğunu fark etti. Neden olduğuna emin değilim, ama çözümüm sadece çalışma kitabındaki ayrı bir sayfada saklamak/göstermeye çalıştığım sütunları koymaktı. Makro, onlarla iyi bir şekilde çalışır. Tuhaf şeyler, ama sonunda bir çözüm olduğuna sevindim.