Excel ist plötzlich sehr langsam

[snb]

Manchmal reicht:

Code:

Sub M_snb()
  For Each it In Sheets
      c00 = c00 & it.Name & vbTab & "shapes" & vbTab & it.Shapes.Count
      c01 = c01 & it.Name & vbTab & "CF" & vbTab & it.UsedRange.FormatConditions.Count
      c02 = c02 & it.Name & vbTab & "named ranges" & vbTab & it.Names.Count
  Next
  c03 = "ThisWorkbook" & vbTab & "named ranges" & vbTab & Names.Count
 
  MsgBox c00 & vbLf & c01 & vbLf & c02 & vbLf & c03
End Sub

[Nuss-imT]

Hallo,
habe alle Seiten nochmals wie beschrieben ausgetestet. Es ist (fast) keine Zelle zu viel benutzt im ganzen file.
Danke