Thema Datum  Von Nutzer Rating
Antwort
17.12.2013 08:59:03 MarkiMark
NotSolved
Blau Sub Ausführung dauert sehr lange
 17.12.2013 19:11:33 H27
NotSolved

Ansicht des Beitrags:
Von:
H27		 Datum:
17.12.2013 19:11:33		 Views:
993		 Rating:
     
Antwort:
  Ja
Thema:
Sub Ausführung dauert sehr lange

Hi Du,

1. Mangel ist die Schleife For Each Zelle In Tabelle1.Range("B:B"), d.h. das ganze Tabellenblatt wird durchlaufen - ergo hier eine Ende-Bedingung wenn Tabelle 1 keine Daten mehr enthält !
2. Mangel ist die Bedingung If Not Zelle Is Nothing Then, besser If Not IsEmpty(Zelle.Value) Then - sonst wird nur Code unnötig abgearbeitet
3. Mangel der ganze Code selbst, warum zum Bleistift "mittlere" und "grosse" wenn Bedingung bereits erfüllt - usw.

Sorry H27

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
17.12.2013 08:59:03 MarkiMark
NotSolved
Blau Sub Ausführung dauert sehr lange
 17.12.2013 19:11:33 H27
NotSolved