Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1220to1224
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1220to1224
1220to1224
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Nicht genügend Speicher vorhanden?

Nicht genügend Speicher vorhanden?
Gordon
Moin moin,
ich bekomme bei ein VBA-Projekt seit eben immer eine Fehlermeldung, sobald ich das Makro ausführe:
Laufzeitfehler '440'
Eigenschaft ListCursor konnte nicht gesetzt werden.  Für diesen Vorgang ist nicht genügend Speicher vorhanden.
Wenn ich auf 'Debuggen' gehe zeigt er mir eine Code Zeile an, wo ich gerade eine Listbox mit ListFillRange befülle. Dieses ging aber bisher immer. Jetzt bin ich etwas ratlos, woran der Fehler liegen mag. Vielleicht kann mir jemand da helfen?
Danke schon mal für die Hilfe.
Gruß
Gordon
zeigt er mir eine Code Zeile an: Glaskugel. owT
26.07.2011 23:39:59
D.Saster
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
26.07.2011 23:46:07
Gordon
ok,
sorry....hier der Code um die Daten in der Listbox anzuzeigen:
Sub Einträge_anzeigen()
Dim anzEinträge As Integer
With ThisWorkbook.Sheets("DB_Eintrag")
anzEinträge = Application.CountA(.Columns(1))
If anzEinträge  .ListFillRange = "DB_Eintrag!A2:E" & anzEinträge
End With
End Sub
Der Debugger markiert die Zeile mit der ListFillRange.
Gruß
Gordon
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
27.07.2011 10:20:00
fcs
Hallo Gordon,
Listboxen ansich haben eher unbekannte Grenzen für ihre Kapazität.
Es kann also durchaus sein, dass irgend ein Grenzwert von Excel (und da gibt es viele) für Datenbereiche, Anzahlfenster, Anzahl Shapes , oder sonst irgend etwas durch das Hinzufügen der Listenelemente überschritten wird. Siehe auch hier: http://www.xlam.ch/xlimits/index.htm
Wie viele Einträge mussen denn in der 5-spaltigen Listbox angezeigt werden?
Wie viele Steuerelemente oder andere Grafikelemente hast du insgesamt auf deinem Tabellenblatt?
Tritt dieser Fehler auch auf, wenn du direkt nach dem Starten von Windows und Excel die Datei öffnest und das Makro startest?
Hast du gleichzeitig sehr viele Excel-Datei oder andere Programme geöffnet?
Ich kann ohne Probleme die Daten einer einzelnen 5-spaltigen Listbox mit mehr als 5000 Zeilen mit deinem Makro darstellen.
Gruß
Franz
Anzeige
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
27.07.2011 11:09:17
Gordon
Moin,
eigentlich befindet sich nicht soviel direkt auf dem Blatt:
Drei Button und die ListBox
Die ListBox hat zum Start des Makros 8 Einträge, wobei nach dem Makro nur noch 7 vorhanden. Das soll auch so sein, weil bevor der Code ausgeführt wird, ein Element gelöscht wird. Kann es damit zusammenhängen, dass dort vielleicht schon Daten vorher drin standen?
Der Fehler taucht leider auch auf, wenn ich Windows/Excel frisch starte.
Zur Mappe ist noch zu sagen, dass es ein Userform gibt, dass zum Zeitpunkt der Ausführung unsichtbar ist.
Das Userform an sich hat folgende Elemente:
4 Frames, 10 Labels, 5 Button, 5 Textfelder, 1 Listbox, 4 DTPicker, 7 Checkboxen
Gruß
Gordon
Anzeige
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
27.07.2011 15:32:11
fcs
Hallo Gordon,
das Userform und die Anzahl an Elementen kann eigentlich nicht die Ursache sein.
Welcher Wert wird im Debugmodus denn für die Variable anzEinträge angezeigt?
Das müssten dan ja 7 sein.
Evtl. stimmt da ja irgendetwas nicht.
Ansonsten, müßtesst du die Datei ggf. mal mit anonymisierten Daten hier hochladen.
Gruß
Franz
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
27.07.2011 15:49:13
Gordon
Ja,
anzEinträge hat den Wert 7. Habe jetzt noch mal geschaut. Das Problem tritt ja auf, wenn ich einen Eintrag lösche, aso den Button für's Löschen klicke. Wenn ich die anderen Button die da habe zu erst ausführe, kommt keine Fehlermeldung und vorallem lässt sich danach der Löschen-Button auch ausführen. Erst nach mehrmaligen Löschen kommt dann erst wieder die Fehlermeldung. :-(
Gruß
Gordon
PS: Die Datei liegt nun hier: https://www.herber.de/bbs/user/75904.xlsm
Anzeige
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
27.07.2011 22:26:21
fcs
Hallo Gorden,
was da genau schief läuft konnte ich nicht genau feststellen.
Bei mir unter Windows Vister . Excel2007 gab es auch Probleme mit Verweisen im VBA-Projek, hier speziell mit dem Verweis auf die Webcomponents. Ich hab den Verweis dann deaktiviert.
Nicht explizit deklarierte Variablen bereiteten auch Kummer.
Ich hab noch folgendes angepasst. Dann kamen zumindest keine Fehler mehr. Ob das bei dir dann auch so ist ?
Code im Modul1: 2 Zeilen angepasst.
https://www.herber.de/bbs/user/75910.txt
Unter "DieseArbeitsmappe" hab ich folgendes ergänzt, damit die Listbox-Auswahlliste beim Öffnen der Datei immer aktualisiert wird: 
Private Sub Workbook_Open()
Call Einträge_anzeigen
End Sub

Gruß
Franz
Anzeige
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
27.07.2011 23:05:02
Gordon
Moin,
erstmal danke für die Verbesserungen. Habe ich natürlich gleich eingefügt. Leider kommt der Fehler immer noch. :-(
Was meinst du aber genau mit dem deaktivieren von den Verweisen auf Webcomponents?
Gruß
Gordon
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
28.07.2011 05:23:15
fcs
Hallo Gordon,
im VBA-Editor gibt es das Menü Extras -- Verweise
Dort kann man ankreuzen welche Objektbibliotheken für das VBA-Projekt zur Verfügung stehen sollen.
Ein paar sind immer erforderlich (die die Excel und VBA zwingend benötigen) andere kann man hinzuwählen, wenn man zum Beispiel via Excel auf Word oder Powerpoint zugreifen möchte.
Hier konnte meine Excel 2007er VBA-Version eine Komponente in deiner Datei nicht finden.
Ich weiss nicht welche Funktionalitäten "Microsoft Webcomponents" zur Verfügung stellt. Du muss diese Bibliothek ggf. wieder aktivieren.
Hier deine Datei, wie sie bei mir unter Windows Vista + Office/Excel 2007 einigermassen rund läuft.
https://www.herber.de/bbs/user/75911.xlsm
Gruß
Franz
Anzeige
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
28.07.2011 08:36:06
Gordon
OK,
bin jetzt leider am Arbeitsrechner, wo die Dateio eh nicht funktioniert, weil sich hier der DTPicker nicht installieren lässt - weiß der Geier warum! :-(
Und unter Verweise finde ich leider keinen Eintrag 'Microsoft Webcomponents'. :-(
Nur mal so nebenbei:
Zu Hause benutze ich WinXP + Office 2010 (32-Bit)
Auf der Arbeit: Win7 + Office 2010 (64-Bit)
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
28.07.2011 18:25:05
Gordon
Ich habe den Fehler, glaube ich, gefunden!
Und zwar ist mir aufgefallen, dass die Fehlermeldung nur kommt, wenn ich die letzte Zeile in der Listbox lösche.
Anscheinend spielt es sich so ab, dass die letzte Zeile markiert ist, der Eintrag gelöscht wird und dann die Listbox ja neu befüllt wird. Und zwar nun mit einem Datensatz weniger. Da aber die letzte Zeile noch selektiert ist, hat er damit ein Problem, wenn man ihm den Eintrag 'unter den Füßen' wegzieht!
Ich habe es jetzt erstmal so geregelt, dass bevor die ListBox neu befüllt wird, der erste Eintrag in der ListBox selektiert wird. So ging es dann auch. Was das nun mit Speicher zu tun haben soll weiß ich nicht, aber auch egal. Zumindest scheint es erstmal gelöst.
Mal aber noch eine Frage anbei:
Ich selektiere ja nun immer die erste Zeile mit ".Selected(0) = True" an. Gibt es auch einen Befehl, womit man die gesamte Listbox deselektieren kann?
Gruß
Gordon
Anzeige
AW: zeigt er mir eine Code Zeile an: Glaskugel. owT
28.07.2011 22:07:34
fcs
Hallo Gorden,
ja, manchmal stößt man schon auf merkwürde Phänomäne, die man nicht so ohne weiters nachvollziehen kann.
Ich selektiere ja nun immer die erste Zeile mit ".Selected(0) = True" an. Gibt es auch einen Befehl, womit man die gesamte Listbox deselektieren kann?
Da deine Listbox nicht auf Multiselection eingerichtet ist geht:
 

.ListIndex=-1

Gruß
Franz

57 Forumthreads zu ähnlichen Themen

VBA Nicht genügend Speicher
Andreas

Hallo Excelgemeinde,
ich habe seit Jahren ein Programm auf XL 2003 VBA zu laufen. Diverse Abfragen zu anderen Datenbanken (hauptsächlich Access-DBs) werden damit aufgerufen. Das Programm läuft auf allen Rechnern stabil.
Jetzt habe ich einen neuen Clienten aufgesetzt. Der hat Windows XP...
27.03.2009 12:05:58
Thread-ID: 1064559
2 Beiträge
Anzeige
Array "Nicht genügend Speicher"
Swen

Hallo @ all,
ich arbeite gerade mit Array zum erstenmal, ich habe eine txt datei die mehr als 300.000 Zeilen (bei 70 Spalten) hat und wenn ich versuche diese Datein in ein Array zuladen gibt es immer Probleme da er Sagt das er nicht genügen Speicher hat...
Wie könnte ich die Datei Split...
08.12.2010 20:00:01
Thread-ID: 1190670
5 Beiträge
Speichern geht nicht, wenn VBA-Code geschützt
Hannes

Hallo,
wenn ich den VBA-Code mit einem Passwort versehe (VBA Project Eigenschaften), dann funktioniert das Speichern (Diskettensymol auf Symbolleiste) nicht mehr. Es kommt dann immer folgende Meldung:Datei wurde unter dem Namen B9E07300 gespeichert. Kann nicht in 'Dosen.xls' umbenannt werden...
06.06.2002 06:07:16
Thread-ID: 126332
2 Beiträge
Anzeige
nicht genügend stapelspeicher
Steffi

Hallo,
ich habe ein Problem mit dem Stapelspeicher und weiß auch woran es liegt aber nicht wie ich es lösen kann.
Ich habe eine Userform auf der ich zunächst die Mitarbeiter ("MA") mit Checkboxen auswähle und die Jahre mit ToggleButton.
Es geht dabei um eine Excel-Datei in der ich D...
08.12.2012 16:45:34
Thread-ID: 1289870
14 Beiträge
Nicht genügend Speicher (Fehler 7)
Tom

Hallo zusammen,
meine Excel Arbeitsmappe ist in der letzten Zeit sehr stark gewachsen und neuerdings erhalten ich folgenden Fehlermeldung beim schließe der Arbeitsmappe ohne zu Speichern: Nicht genügend Speicher (Fehler 7)
Ich erhalte diese Fehlermeldung nur beim schließen der Mappe. Wä...
19.11.2013 16:11:48
Thread-ID: 1339250
3 Beiträge
Excel über PPT VBA schließen und nicht speichern
Virginie

Hallo zusammen,
ich habe ein Problem das mich schon des längeren nervt. Meine Ideen helfen mir nicht mehr weiter und ehrlich gesagt weiß ich auch nicht was ich noch ausprobieren könnte...
Ich habe eine PPT-Datei mit vielen Pivot-Charts die automatisch aktualisiert werden. Da dies an die...
26.08.2015 12:29:48
Thread-ID: 1444505
2 Beiträge
Array - Nicht genügend Speicher
Bonduca

Hallo,
Ich möchte ein Tabellenblatt via Array einlesen:
Dim arr_A() As Variant
max_z = 20000
max_s = 420
Worksheets(A).Activate
'Array wird neu definiert mit maximaler Zeilen- und Spaltenanzahl
ReDim arr_A(max_z, max_s)
Es kommt der Laufzeitfehler 7: Nicht genüg...
10.09.2015 08:32:50
Thread-ID: 1446822
6 Beiträge
VBA: nicht genügend stapelspeicher Fehler 28
Balduris

Guten Morgen,
ich bin relativ unerfahren was VBA / Markos angeht, weiss mir aber auf Grund der Umstände nicht anders zu helfen. Die Zirkelbezuglösung die ich ursprünglich genutzt hatte, führte zu Fehlbedienungen durch andere Nutzer, daher die VBA Lösung.
Durch meine Unkenntnis hat sich...
05.01.2018 11:36:12
Thread-ID: 1600323
9 Beiträge
Anzeige

Links zu Excel-Dialogen

Label ListBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
6
4
1
4
13
2
1
5
8
2
16
2
6
7
5
4
1
6
4
4
1
4
13
2