Thema Datum  Von Nutzer Rating
Antwort
30.11.2015 16:34:11 Christy
Solved
30.11.2015 17:10:04 Gast33422
NotSolved
02.12.2015 18:48:08 Gast34486
NotSolved
01.12.2015 19:48:46 Gast7757
NotSolved
02.12.2015 18:46:28 Gast74363
NotSolved
02.12.2015 20:07:40 Gast17752
NotSolved
28.12.2015 14:28:41 Gast85905
NotSolved
28.12.2015 18:27:36 Gast36168
*****
NotSolved
28.12.2015 18:29:04 Gast64978
*****
NotSolved
29.12.2015 14:46:23 Christy
NotSolved
29.12.2015 23:08:42 Gast14895
NotSolved
30.12.2015 00:25:31 Christy
NotSolved
30.12.2015 13:30:05 Gast30668
*****
NotSolved
30.12.2015 15:13:44 Christy
NotSolved
30.12.2015 15:32:00 Gast83878
NotSolved
30.12.2015 15:47:45 Christy
NotSolved
30.12.2015 16:03:49 Gast44293
NotSolved
30.12.2015 16:13:44 Christy
NotSolved
30.12.2015 16:25:29 Gast36885
NotSolved
30.12.2015 16:49:19 Christy
NotSolved
30.12.2015 17:34:04 Gast62394
NotSolved
30.12.2015 18:49:59 Christy
NotSolved
30.12.2015 19:23:30 Gast73856
NotSolved
30.12.2015 19:56:55 Christy
NotSolved
30.12.2015 19:34:02 Gast87846
NotSolved
30.12.2015 20:06:06 Christy
NotSolved
31.12.2015 12:24:53 Gast29201
NotSolved
01.01.2016 12:10:59 Gast58387
*****
NotSolved
01.01.2016 14:37:42 Gast94004
*****
NotSolved
01.01.2016 15:04:24 Gast28024
NotSolved
02.01.2016 15:11:36 Gast94933
NotSolved
Blau Werte aus einem Sheet in ein anderes Worksheet suchen und ersetzen
02.01.2016 17:56:32 Gast96708
NotSolved
02.01.2016 18:59:46 Gast5675
*****
Solved
02.01.2016 23:38:36 Christy
NotSolved
03.01.2016 19:39:39 Gast96711
NotSolved
04.01.2016 21:12:58 Christy
NotSolved
04.01.2016 21:12:59 Christy
NotSolved
05.01.2016 10:11:16 Gast49661
NotSolved
05.01.2016 11:20:48 Christy
NotSolved
05.01.2016 11:27:10 Christy
NotSolved
05.01.2016 11:55:41 Gast29688
NotSolved
05.01.2016 13:00:29 Christy
NotSolved
06.01.2016 10:33:21 Gast15834
*****
NotSolved
06.01.2016 13:54:19 Christy
NotSolved
06.01.2016 16:39:54 Gast93769
*****
Solved
06.01.2016 19:53:36 Christy
NotSolved
06.01.2016 20:07:47 Gast83679
*****
Solved
06.01.2016 23:58:43 Christy
NotSolved
07.01.2016 00:04:03 Gast57954
NotSolved

Ansicht des Beitrags:
Von:
Gast96708
Datum:
02.01.2016 17:56:32
Views:
856
Rating: Antwort:
  Ja
Thema:
Werte aus einem Sheet in ein anderes Worksheet suchen und ersetzen

Hallo Christy!

Gern geschehen. Und nochmal Sorry wegen dem Fehler. War nach dem Jahreswechsel wohl noch unkonzentriert - ist immer schlecht falschen Code zu posten.

Also die beiden identischen Blöcke sollte da nur einmal stehen. Einen davon bitte löschen.

Das mit dem overflow ist klar. Wollte da besonders Speicherplatz sparend arbeiten. Hatte das dann aber beim Code nicht beachtet. Und dabei hatte ich extra noch nach der Anzahl der Zeilen gefragt. peinlich. Also mit dem integer kannst du jetzt bis zu 32000 überprüfen.

Da würde ich aber die Zeile 119 , das ist die hier

loschen(0) = loschen(0) + 1

einfach rausnehmen. Die nutzt der Code eh nicht mehr und da tritt der Überlauf auf (die Zahl dürfte max. 255 sein). Damit könnte loschen auch auf Byte stehen und die Zahl wäre (fast) egal. Außerdem braucht der Code dann nicht soviel Speicherplatz.

Zu den Parametern:

Da es 3 verschiedene Typen gibt und jeder was anderes machen soll (pBUKr ersetzt und löscht in C, die 5 spezielen ersetzen in D und der Rest ersetzt in C), wollte ich die für die spätere Bearbeitung separat auflisten - ergibt dann später nur 3 Schleifendurchläufe, hier die mit k. Dafür habe ich das Array parameter angelegt. Das Array ist zweidimensional (zwei Werte in der Klammer) - und stellt also eine Art Tabelle da. Der erste Wert ist die Zeile, zweiter Wert die Spalte. Die Spalten und Zeilen gehen dabei vom Index 0 los. Die "Tabelle" ist dann so aufgebaut, dass in Zeile 1 die Namen der Parameter mit pBUKRS stehen, in Zeile 2 die Werte zum Ersetzten dazu, Zeile 5 die Namen der 5 speziellen, Zeile 6 deren Werte und in Zeile 3 die NAmen der restlichen und in 4 die Werte dazu. Die Eintragungen gehen immer beim Index 1 los. Um bei den späteren Durchläufen Zeit zu sparen schreibe unter dem Index 0 immer die Anzahl der jeweiligen Parameter (das war der Fehler beim array loschen). Normalerweise würde ich das Array nur auf die Länge anpassen aber da war ich ehrlich gesagt zu faul. Deshalb ist die Arraylänge die Anzahl aller Parameter auf dem Blatt. Um bei den Schleifen nicht unnötige Durchläufe zu haben, lasse ich dort nicht die Arraylänge sondern nur die Anzahl beim INdex 0 durchlaufen - deshalb die jeweilige Parameteranzahl beim INDEX 0. Hoffe das war halbwegs verständlich. :-) Wenn nicht einfach nochmal fragen.

Soll ich eigentlich beim Code ein paar Kommentare mit einbauen? Dann erkennt man gleich was gemacht wird und braucht nicht noch groß suchen.

Für dein Folgeproblem würde ich anders vorgehen. Ich würde einfach noch bei parameter die Zeilen 7 und 8 für die "parameter" aus Blatt 2 aufnehmen - voher beim Dimensionieren aber angeben, dass es 8 Zeilen gibt, Dort die Werte einlesen, aber nur wenn es ein x gibt - also nur die zum Löschen. In der Schleife unten für ich dann k bis definierne und bei k = 4 , spalte auf 1 setzen. Und bei den Durchläufen einfach noch für k = 4 was ergänzen. Soweit zur Theorie.

Ist dann wesentlich kürzer und eleganter als bei einer zusätzliche Schleife.

Bastel den Code gleich mal um und poste ihn.

Gruß und bis später

 

 


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
30.11.2015 16:34:11 Christy
Solved
30.11.2015 17:10:04 Gast33422
NotSolved
02.12.2015 18:48:08 Gast34486
NotSolved
01.12.2015 19:48:46 Gast7757
NotSolved
02.12.2015 18:46:28 Gast74363
NotSolved
02.12.2015 20:07:40 Gast17752
NotSolved
28.12.2015 14:28:41 Gast85905
NotSolved
28.12.2015 18:27:36 Gast36168
*****
NotSolved
28.12.2015 18:29:04 Gast64978
*****
NotSolved
29.12.2015 14:46:23 Christy
NotSolved
29.12.2015 23:08:42 Gast14895
NotSolved
30.12.2015 00:25:31 Christy
NotSolved
30.12.2015 13:30:05 Gast30668
*****
NotSolved
30.12.2015 15:13:44 Christy
NotSolved
30.12.2015 15:32:00 Gast83878
NotSolved
30.12.2015 15:47:45 Christy
NotSolved
30.12.2015 16:03:49 Gast44293
NotSolved
30.12.2015 16:13:44 Christy
NotSolved
30.12.2015 16:25:29 Gast36885
NotSolved
30.12.2015 16:49:19 Christy
NotSolved
30.12.2015 17:34:04 Gast62394
NotSolved
30.12.2015 18:49:59 Christy
NotSolved
30.12.2015 19:23:30 Gast73856
NotSolved
30.12.2015 19:56:55 Christy
NotSolved
30.12.2015 19:34:02 Gast87846
NotSolved
30.12.2015 20:06:06 Christy
NotSolved
31.12.2015 12:24:53 Gast29201
NotSolved
01.01.2016 12:10:59 Gast58387
*****
NotSolved
01.01.2016 14:37:42 Gast94004
*****
NotSolved
01.01.2016 15:04:24 Gast28024
NotSolved
02.01.2016 15:11:36 Gast94933
NotSolved
Blau Werte aus einem Sheet in ein anderes Worksheet suchen und ersetzen
02.01.2016 17:56:32 Gast96708
NotSolved
02.01.2016 18:59:46 Gast5675
*****
Solved
02.01.2016 23:38:36 Christy
NotSolved
03.01.2016 19:39:39 Gast96711
NotSolved
04.01.2016 21:12:58 Christy
NotSolved
04.01.2016 21:12:59 Christy
NotSolved
05.01.2016 10:11:16 Gast49661
NotSolved
05.01.2016 11:20:48 Christy
NotSolved
05.01.2016 11:27:10 Christy
NotSolved
05.01.2016 11:55:41 Gast29688
NotSolved
05.01.2016 13:00:29 Christy
NotSolved
06.01.2016 10:33:21 Gast15834
*****
NotSolved
06.01.2016 13:54:19 Christy
NotSolved
06.01.2016 16:39:54 Gast93769
*****
Solved
06.01.2016 19:53:36 Christy
NotSolved
06.01.2016 20:07:47 Gast83679
*****
Solved
06.01.2016 23:58:43 Christy
NotSolved
07.01.2016 00:04:03 Gast57954
NotSolved