Tabellen stürzen bei einer Grösse von 1,2 GB ab

[quemerda]

Ich erstelle grosse Tabellen, ab 1 GB Grösse stürzt mir dann Excel ab. Dann geht es lange Zeit mal wieder gar nicht, aber dann dauert es wieder, mal Minuten auch manchmal ein bisschen länger bis dann Excel wieder benutzbar ist. Habe 16 GB RAM und auch sc
hon auf 32 GB erhöht. Erfolglos

[BoskoBiati]

Hi,

1,2GB ist recht groß für eine Excel-Datei. Lies Dir das mal durch:

http://www.xlam.de/xlimits/index.htm

[maninweb]

Hallo,

unabhängig der Antwort von BoskoBiati, dem ich mich anschließen würde, kann Excel 32 Bit je nach Update-Stand zwischen max 2 GB und 4 GB RAM adressieren.
Da ist es egal, wieviel RAM Du in den Rechner packst. Sollten sich so große Dateien nicht vermeiden lassen, würde ich über einen Umstieg auf Excel in 64 Bit
nachdenken; da können m.W. bis zu 8 TB RAM addressiert werden.

Gruß

[schauan]

Hallöchen,

es ist leider auch so, dass trotz der viel gepriesenen 2-4 GB zumeist bei ca. 1,2 Schluss ist - hängt glaube mit der Pagefile.sys oder deren "Schwester" h...... zusammen.

Ich habe das Problem auch und laut Tipps von MS soll man in meinem Fall Shapes, Bilder, Diagramme usw. reduzieren. Hab ich nur nichts davon. Ich brauch ja alle

[RPP63]

Moin!
Sollte man nicht auch berücksichtigen, dass die Dateigröße nichts mit dem adressierbaren Speicher zu tun hat, da es sich um ein komprimiertes (gezipptes) Dateiformat handelt?

Gruß Ralf

[schauan]

Moin Ralf,

Jein. Ich z.B. Prüfe die Speicherauslastung und dort steht ja ein "realer" Wert. Noch zur Ergänzung - es geht da glaube um die Speicherverwaltung / -adressierung, da bringen auch Änderungen am virtuellen Speicher nix. Ich habe ca. 45 Dateien offen und Erzeuge Vorschaugrafiken, habe da viele Kopieraktionen. Das Öffnen der Dateien kostet mich ca. 700-800MB, beim Kopieren kommen je Datei so etwa 30 MB dazu und nach dem folgenden Speicherleeren bleiben ca MB hängen. Da bin ich dann nach den 45 Dateien am Limit (W10/O2016). Unter W7/O2010 hatte ich übrigens ca. 1,5 GB, hat sich also verschlimmbessert.

[maninweb]

Hallo,

bei mir stelle ich jedenfalls auch einen erheblichen Unterschied zwischen Excel 2010 und Excel 2016 fest. Dieselbe, ca. 15MB Datei in beiden Programmen geöffnet,
nur geöffnet, nichts geändert; siehe Screenshot.

Gruß

[Wastl]

Hi,


gaaaanz früher half es den Speicher zu leeren

Code:

Private Sub Speicher()
Dim A
On Error Resume Next
If A = "" Then
   Err = 0
   Space (1082000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (582000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (482000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (382000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (282000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (182000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (172000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (162000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (152000000)
   Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (142000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (132000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (122000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (112000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (102000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (92000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (82000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
If A = "" Then
   Err = 0
   Space (72000000)
'    Debug.Print Err
   If Err = 0 Then Exit Sub
End If
On Error GoTo 0
End Sub