Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1516to1520
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
1516to1520
1516to1520
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Fehler beim Kompilieren: Prozedur zu groß

Fehler beim Kompilieren: Prozedur zu groß
26.09.2016 15:06:04
Herr
Hallo Zusammen,
ich habe im Anhang( https://www.herber.de/bbs/user/108416.txt ) einen Code...sehr umständlich, geht wahrscheinlich auch einfacher. Jedenfalls kommt bei der Anwendung immer die Fehlermeldung: "Prozedur zu groß".
Nun hab ich mich bereits im Inet erkundigt und herausgefunden, dass es wohl an der 64kb-Grenze liegt.
Kann mir jemand den Code vereinfachen oder so verändern, dass die Fehlermeldung nicht mehr kommt. Vllt mit "Sub-Blöcken"?
Leider sind meine Möglichkeiten begrenzt, daher darf gern direkt in die Datei geschrieben werden.
Vielen Dank für die Unterstützung!
VG
Herr Koch

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehler beim Kompilieren: Prozedur zu groß
26.09.2016 15:18:13
Daniel
Hi
du musst nicht jede Zelle einzeln übertragen.
immer dann, wenn du einen grösseren Zellblock ohne Lücken von einem Bereich in einen anderen überträgst, funktioniert das für alle Zellen gleichzeitig mit einem Befehl.
Wenn dabei Zeilen und Spalten getauscht werden müssen, so wie bei dir, dann geht das auch mit Inhalte einfügen - Transponieren.
ersetze in deinem Code diesen ganzen Block 
WS2.Cells(Zeile, 3) = WS1.Range("K12")
WS2.Cells(Zeile, 749) = WS1.Range("K758")

durch: 
WS1.Range("K12:K758").Copy
WS2.Cells(Zeile, 3).PasteSpecial xlpastevalues, Transpose:=True

und für die anderen Zellbereiche natürlich auch entsprechend.
um das hier zu vereinfachen:
Case "K12", ...,  "K758"
müsstest du auf ein IF - THEN - Konstrukt ausweichen. Analog wäre hier:
If Target.CountLarge = 1 Then
If Not Intersect(Target, Range("K12:K758")) is nothing Then
...  hier dann der weitere Code
ElseIf Not Intersect(Target, Range("H4:I4")) is nothing then
... hier dann der Code für diesen Fall
End if
End If
Gruß Daniel
Anzeige
AW: Fehler beim Kompilieren: Prozedur zu groß
26.09.2016 15:41:15
Herr
Hallo Daniel,
danke für die Hilfe. Kann ich mit dem Bereich:
WS1.Range("K12:K758").Copy
WS2.Cells(Zeile, 3).PasteSpecial xlpastevalues, Transpose:=True
1:1 beide großen Bereiche ersetzen oder muss hier noch was angepasst werden?
VG Tino
AW: Fehler beim Kompilieren: Prozedur zu groß
26.09.2016 15:54:32
Daniel
Hi
naja, du musst schon schauen, welches der Quelldatenbereich und welches der Zieldatenbereich ist und dann die Codes entsprechend anpassen.
Das ist nur ein Beispiel, um dir zu zeigen wie es geht.
Die konkrete Arbeit und Anpassung in deinem Code musst du schon selber machen.
wie gesagt, zusammenfassen kannst du immer alles, was einen Lückenlosen Zellblock bildet, sowohl im Quell-, als auch im Zielbereich.
sobald da eine Lücke drin ist, musst du erneut kopieren und einfügen.
Ich habe deinen Code jetzt dahingehend auch nicht vollständig überprüft, ob da in den über 700 Zellen alles durchgängig ist, dass musst du dann schon selber tun (oder jemanden dafür bezahlen, dass er deine Arbeit für dich erledigt)
Gruß Daniel
Anzeige
AW: Fehler beim Kompilieren: Prozedur zu groß
26.09.2016 16:00:10
Herr
Okay, vielen Dank...ich versuche es.
Fehler beim Kompilieren: Prozedur zu groß
26.09.2016 17:24:56
Michael
Hi,
teste mal: 
Private Sub Worksheet_Change(ByVal Target As Range)
Dim WS1 As Worksheet, WS2 As Worksheet
Dim Zeile As Long
If Target.CountLarge > 1 Then Exit Sub
' Stop
If Target.Column = 11 And Target.Row >= 12 And Target.Row
Schöne Grüße,
Michael

123 Forumthreads zu ähnlichen Themen

Fehler "Prozedur zu gross"
Florian

Hallo liebes Forum,
eine Frage:
ich habe bei einer zugegebenermassen etwas längeren Prozedur die Fehlermeldung "Prozedur zu gross" erhalten. Was ist denn genau nicht OK? Gibt es da Beschränkungen? Und: liegt es dann an dem reinen Code, der evt. zu lang ist oder etwa an der Anzahl der ge...
18.11.2008 19:06:37
Thread-ID: 1025750
4 Beiträge
Anzeige
Fehler beim Kompilieren bei Befehl ( Environ )
chris

Hallo guten morgen VBA experten,
bitte um Hilfe.Ich habe eine Exceldatei, diese funktioniert auch an meinem PC.
Jetzt ollte ich die Datei an einem anderen PC ausführen und es kommt immer in der
Private Sub Workbook_Open()
bei diesem Code " if Environ("Username") = "chris" The...
02.12.2008 08:27:30
Thread-ID: 1029388
7 Beiträge
Fehler beim Kompilieren
judi80p

Hallo,
ich habe zuhause ein VBA-Projekt gebaut und wollte es nun in der Arbeit (auch Office XP) verwenden (Arbeitszeitererfassung, die Daten werden über ein Userform eingegeben).
Das Problem ist nur, es startet mit der Fehlermeldung
"Fehler beim Kompilieren. Projekt oder Bibliothek...
19.03.2009 12:09:36
Thread-ID: 1061783
5 Beiträge
Anzeige
Fehler beim kompilieren
lisa

Hallo
Ich habe in meiner Userform die Stellenanzahl der TextBox4 auf 6 begrenzt.
leider bekomme ich nun einen kompilierungsfehler ( Variable nicht definiert! den ich mir nicht erklären kann und mich deshalb wieder an EUCH wende!
Hier mein TextBox4_Change Ereignis Private Sub TextBo...
04.11.2009 14:20:01
Thread-ID: 1114500
4 Beiträge
Makro "Fehler beim komplieren: Prozedur zu groß"
GHK

Hallo!
Habe das erste Mal ein Makro aufgenommen... Habe eigentlich nur banale Dinge vollzogen, aber wohl auf eine zu große Feldermenge, denn es kommt folgene Fehlermeldung, wenn ich das Makro ausführe:
"Fehler beim komplieren: Prozedur zu groß"
Kann man da noch was retten?!? Wahrsch...
09.02.2010 17:57:08
Thread-ID: 1137124
9 Beiträge
Fehler beim Kompilieren - Benutzerdefinierter Typ
Himmelsbach

Hallo zusammen,
Leider habe ich keine Ahnung von VBA und soll nichts desto trotz eine aus meiner Sicht anspruchsvolle Logik programmieren.
Da eine reine textuelle Beschreibung nicht sonderlich hilfreich wäre, habe ich die Excelmappe beigelegt.
Jetzt aber zu meinem Problem:
Im Ta...
11.03.2010 19:06:04
Thread-ID: 1145179
3 Beiträge
Fehler Beim Kompilieren in ComboBox
Fredy

Hallo! ich komme nicht weiter...
habe 1 Probleme:
immer wen ich in meim Userform in der ComboBox ein Datum auswelen wel kommt ein Fehler Meldung
Fehler Beim Kompilieren:
Methode oder Datenbyekt nicht gefunden
Private Sub ComboBox1_Change() Dim Zeile As Long Zeile = Zeile1 +...
07.05.2010 16:42:08
Thread-ID: 1156131
13 Beiträge
Fehler beim Kompilieren
Leitz

Hallo!
Habe eine Excel Datei mit VBA Codes, die auf meinem Laptop einwandfrei funktioniert.
Wenn ich die Datei aber auf meinem Stand PC öffnen möchte erscheint folgende Fehlermeldung:
Fehler beim Kompilieren
Projekt oder Bibiliothek nicht gefunden
Bei folgendem Code ist dann...
15.10.2010 11:09:30
Thread-ID: 1182581
4 Beiträge
Anzeige

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
3
5
6
4
11
3
8
2
12
3
2
7
2
2
2
10
5
8
3
7
2
7
12
16
9