Thema Datum  Von Nutzer Rating
Antwort
26.10.2016 19:12:42 Lukas
NotSolved
26.10.2016 19:28:05 Lukas
NotSolved
26.10.2016 21:08:55 Gast85958
Solved
26.10.2016 23:15:38 Lukas
NotSolved
27.10.2016 08:51:36 Gast88991
Solved
27.10.2016 11:35:00 Gast36706
NotSolved
27.10.2016 11:35:50 Lukas
NotSolved
27.10.2016 14:28:54 Gast34613
Solved
27.10.2016 15:10:05 Gast92452
*****
Solved
27.10.2016 16:44:12 Lukas
NotSolved
Rot Aufwendige VBA-Sortierung
27.10.2016 17:51:28 Gast93865
NotSolved
27.10.2016 18:06:43 Lukas
NotSolved
27.10.2016 18:18:19 Gast95618
NotSolved
27.10.2016 19:12:03 Gast72642
NotSolved
27.10.2016 18:18:32 Lukas
NotSolved
27.10.2016 18:20:56 Andreas
NotSolved
27.10.2016 18:22:37 Lukas
NotSolved
27.10.2016 23:50:36 Andreas
NotSolved
28.10.2016 17:41:41 Lukas
Solved
28.10.2016 17:55:47 Lukas
NotSolved
28.10.2016 18:12:04 Lukas
NotSolved

Ansicht des Beitrags:
Von:
Gast93865
Datum:
27.10.2016 17:51:28
Views:
766
Rating: Antwort:
  Ja
Thema:
Aufwendige VBA-Sortierung

Ups;
Es ist doch noch aufwendiger als gedacht geworden.

Jetzt hab ich aber schon gelernt dass es String und Integer gibt.

Aber das Problem ist doch aufwenidger als gedacht.

Ich hatte mir vorgenommen die Tabellen zu splitten.
Aber durch Andreas kam ich auf eine neue Idee.

Die Werte in der 1. Spalte meiner Tabelle können folgende ?Strings? haben:
2' Z 40/1
2' Z 99/100
2' Z 2000/1
2' Z 2015/100

4' Z 40/1
4' Z 2000/1

Z 40/1
Z 2000/1

Meine Idee; ich lese die erste Zahl aus dann entferne ich sie das "Z" und den "/"
und dann lese ich nochmals die erste Zahl aus und wandel sie in eine Zahl um.
Also meine Idee; die muss ich nurnoch in ein code umschreiben.



if 1. Ziffer = 2
       dann entferne "(erste Ziffer)" " ' " und "Z" und "/"
          in Inger umwandeln
                if 1. Ziffer ungleich 2 dann (neue Zahl+19*10^Länge)*0,1^(Länge+2)+0
                else    (neue Zahl)*0,1^(Länge)+0
else if 1. Ziffer = 4
       dann entferne "(erste Ziffer)" " ' " und "Z" und "/"
          in Inger umwandeln
                if 1. Ziffer ungleich 2 dann (neue Zahl+19*10^Länge)*0,1^(Länge+2)+1
                else    (neue Zahl)*0,1^(Länge)+1

else if 1. Ziffer = Z
       dann entferne   "Z" und "/"
          in Inger umwandeln
                if 1. Ziffer ungleich 2 dann (neue Zahl+19*10^Länge)*0,1^(Länge+2)+2
                else    (neue Zahl)*0,1^(Länge)+2

Muss nurnoch rausfinden wie ich das in einen Code schreibe :D
Werde mir wohl die Tage mal ein Buch ausleihen :)


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
26.10.2016 19:12:42 Lukas
NotSolved
26.10.2016 19:28:05 Lukas
NotSolved
26.10.2016 21:08:55 Gast85958
Solved
26.10.2016 23:15:38 Lukas
NotSolved
27.10.2016 08:51:36 Gast88991
Solved
27.10.2016 11:35:00 Gast36706
NotSolved
27.10.2016 11:35:50 Lukas
NotSolved
27.10.2016 14:28:54 Gast34613
Solved
27.10.2016 15:10:05 Gast92452
*****
Solved
27.10.2016 16:44:12 Lukas
NotSolved
Rot Aufwendige VBA-Sortierung
27.10.2016 17:51:28 Gast93865
NotSolved
27.10.2016 18:06:43 Lukas
NotSolved
27.10.2016 18:18:19 Gast95618
NotSolved
27.10.2016 19:12:03 Gast72642
NotSolved
27.10.2016 18:18:32 Lukas
NotSolved
27.10.2016 18:20:56 Andreas
NotSolved
27.10.2016 18:22:37 Lukas
NotSolved
27.10.2016 23:50:36 Andreas
NotSolved
28.10.2016 17:41:41 Lukas
Solved
28.10.2016 17:55:47 Lukas
NotSolved
28.10.2016 18:12:04 Lukas
NotSolved