Thema Datum  Von Nutzer Rating
Antwort
12.04.2021 18:16:32 Jörg
NotSolved
12.04.2021 19:54:55 ralf_b
NotSolved
12.04.2021 20:48:52 Jörg
NotSolved
Blau sorry
12.04.2021 22:33:43 ralf_b
NotSolved
12.04.2021 23:10:10 Gast80927
NotSolved
12.04.2021 23:46:34 ralf_b
NotSolved
13.04.2021 07:52:27 Jörg
NotSolved
13.04.2021 14:52:30 Nobody
NotSolved
13.04.2021 16:52:58 Jörg
NotSolved
13.04.2021 17:58:59 Nobody
NotSolved
13.04.2021 18:02:50 Jörg
NotSolved
14.04.2021 19:19:28 Nobody
NotSolved

Ansicht des Beitrags:
Von:
ralf_b
Datum:
12.04.2021 22:33:43
Views:
474
Rating: Antwort:
  Ja
Thema:
sorry

das ist zuviel Code für einen Gefallen.  Und du hast die selects und activates immer noch drin. Selbst wenn der Code bereinigt ist , geht eine ordentliche Fehlersuche nur mit der passenden Datei.  

Du erstellst Variablen per dim mitten im Code.  unschön
Mindestetens 2 Variablen sind nicht vor der Nutzung deklariert.  benutze option explicit zu Beginn des Codemodules

  Sheets("V03").Select
  Cells.Select
  Selection.Copy
  Sheets("TEMP1").Select
  Cells.Select
  ActiveSheet.Paste

das hier ist echt übel. Alle Zellen eines Blattes kopieren und dann alle Zellen in ein anderes Blatt einfügen. bei 1 million Zeilen und einigen tausend Spalten kommt schon was zusammen. Auch hier ist select unnötig. Ermittele den tatsächlichen Zellbreich und nutze den. 

jede Zellaktivierung oder Selection wirkt auf die Darstellung der Tabelle in der Anwendung. Das werden unnötig Resourcen gebunden.  Mit Application.screenupdating = false  oder = true solltest du wenigstens arbeiten.

es gibt da noch  Application.enableevents  und Application.Calculation. 

 

Melde dich wieder wenn du soweit bist.

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
12.04.2021 18:16:32 Jörg
NotSolved
12.04.2021 19:54:55 ralf_b
NotSolved
12.04.2021 20:48:52 Jörg
NotSolved
Blau sorry
12.04.2021 22:33:43 ralf_b
NotSolved
12.04.2021 23:10:10 Gast80927
NotSolved
12.04.2021 23:46:34 ralf_b
NotSolved
13.04.2021 07:52:27 Jörg
NotSolved
13.04.2021 14:52:30 Nobody
NotSolved
13.04.2021 16:52:58 Jörg
NotSolved
13.04.2021 17:58:59 Nobody
NotSolved
13.04.2021 18:02:50 Jörg
NotSolved
14.04.2021 19:19:28 Nobody
NotSolved