Thema Datum  Von Nutzer Rating
Antwort
04.09.2016 19:42:10 Guido
NotSolved
04.09.2016 23:56:43 Nobody
NotSolved
05.09.2016 08:06:41 Guido
NotSolved
05.09.2016 09:20:58 Nobody
NotSolved
05.09.2016 09:41:52 Gast13063
NotSolved
05.09.2016 10:06:13 Guido
Solved
05.09.2016 17:32:28 Nobody
NotSolved
05.09.2016 09:55:37 Guido
Solved
Rot Prozedur zu groß
 05.09.2016 16:19:24 Nobody
NotSolved
06.09.2016 10:44:40 Nobody
NotSolved

Ansicht des Beitrags:
Von:
Nobody		 Datum:
05.09.2016 16:19:24		 Views:
736		 Rating:
     
Antwort:
  Ja
Thema:
Prozedur zu groß

Hallo Guido,

ich muss mir die Lösung von Gast 13063 einmal in Ruhe anschauen, vielleicht ist es die einfachere Lösung. In der Umsetzung hast du aber einen kleinen Fehler.. Die Lösch Anweisung Cells(93, Spalte - 1) = Empty steht bei dir am Ende des Programms, vor End Sub. Sie gehört aber nach oben, -zwischen- Interior.Colorindex und For Spalte = 7 To 115   For Spalte hatte ich nur erwahnt um dir die Übersicht wo es hingehört zu erleichtern. Unten löscht du das berechnete Ergebnis wieder! Was mit fehlt sind einige Beispieldaten um das Programm mal richtig nachstellen zu können. Welche Werte sind ca. in den Zellen?

Mal sehen was nicht laeuft.  Was ist mit dem Programm von 13063.   Ist das Ergebnis richtig.  Seine Idee es zu verkürzen ist nicht schlecht  (evtl.mit GoSub)

mfg  Nobody

    Range(Cells(16, 7), Cells(37, 115)).Interior.ColorIndex = 2     'Zurücksetzen der Zellfarbe vor jedem Berechnungsvorgang

    Cells(93, Spalte - 1) = Empty   'Bewertung löschen  (nur im 1. For Next Programm !!)
 
   ' For Spalte = 7 To 115
 
    Next Spalte
 
 

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
04.09.2016 19:42:10 Guido
NotSolved
04.09.2016 23:56:43 Nobody
NotSolved
05.09.2016 08:06:41 Guido
NotSolved
05.09.2016 09:20:58 Nobody
NotSolved
05.09.2016 09:41:52 Gast13063
NotSolved
05.09.2016 10:06:13 Guido
Solved
05.09.2016 17:32:28 Nobody
NotSolved
05.09.2016 09:55:37 Guido
Solved
Rot Prozedur zu groß
 05.09.2016 16:19:24 Nobody
NotSolved
06.09.2016 10:44:40 Nobody
NotSolved