Seite 1 von 1
Automatischer Abgleich
Verfasst: Mo 27. Mär 2017, 12:14
von kosovafan
Guten Tag,
ich habe in Calc eine Arbeitsmappe mit mehreren Tabellen die auch Namen haben. Ich stelle mir die Frage ob folgendes möglich ist.
Im Blatt Projekte gibt es eine Spalte mit Namen Kolonne, wenn ich dort zum Beispiel 1,2 eingebe, ist es möglich das Calc automatisch
im Blatt Inventar nachschaut was gehört Kolonne 1 und 2 und im Blatt Projekte die Spalte Inventar mit den entsprechenden Positions Nummern füllt? Es wäre auch super wenn es möglich wäre aus den entsprechenden Positionsnummern in Inventar automatisch die Gewichte addiert und im Blatt Projekte, Spalte Gewicht eingetragen werden könnten.
Würde mich über Hilfe sehr freuen, ist nämlich mühsam das immer mit Hand zu machen.
Mfg
Silvio
Re: Automatischer Abgleich
Verfasst: Mo 27. Mär 2017, 12:34
von mikele
Hallo,
eine (ggf. anonymisierte) Beispieldatei wäre hilfreich. Grundsätzlich ist so etwas möglich und auch der Sinn einer Tabellenkalkulation (wenn die Datenmengen umfangreicher wäre, dann eher Datenbank).
Re: Automatischer Abgleich
Verfasst: Mo 27. Mär 2017, 13:49
von kosovafan
Hallo,
sorry jetzt anbei die Liste.
Mfg
Re: Automatischer Abgleich
Verfasst: Mo 27. Mär 2017, 22:23
von mikele
Hallo,
so ganz simpel ist es nicht, insbesondere durch die möglichen Eingaben "1,2". Am einfachsten ist es durch zwei kleinen selbstdefinierte Funktionen lösbar. Makros müssen aktiviert sein.
Code: Alles auswählen
function udf_inventar (sCm,aCulumn,aNr)
'sCm Zelle mit den gewählten Kolonnen
'aCulumn einspaltiger Bereich mit den Kolonnen
'aNr einspaltiger Bereich mit den Inventarnummern
aCm=split(sCm,",")
sTmp=""
for k=0 to ubound(aCm)
for i=1 to ubound(aCulumn)
if val(aCm(k))=aCulumn(i,1) then
sTmp=sTmp + aNr(i,1) +","
end if
next
next
if right(sTmp,1)="," then sTmp=left(sTmp,len(sTmp)-1)
udf_inventar=sTmp
End function
function udf_weight (sCm,aCulumn,aWeight)
'sCm Zelle mit den gewählten Kolonnen
'aCulumn einspaltiger Bereich mit den Kolonnen
'aWeight einspaltiger Bereich mit den Gewichten
aCm=split(sCm,",")
tmp=0
for k=0 to ubound(aCm)
for i=1 to ubound(aCulumn)
if val(aCm(k))=aCulumn(i,1) then
tmp=tmp + aWeight(i,1)
end if
next
next
udf_weight=tmp
End function
Re: Automatischer Abgleich
Verfasst: Di 28. Mär 2017, 11:01
von kosovafan
Danke mikele , ja nach ein bisschen Suchen und vielen Fragezeichen kam mir die Idee das es nicht wirklich realisierbar ist, zumal wir bis zu 6 Kolonnen besitzen, die Zahlen wären also auch schon einmal 1,2,3,4,5,6. Oder ich muss das irgendwie anders aufbauen.
Mfg & Danke
Silvio
Re: Automatischer Abgleich
Verfasst: Di 28. Mär 2017, 12:31
von mikele
Hallo Silvio,
und was hältst du von der Makro-Lösung? Macht sie das, was du willst?
Re: Automatischer Abgleich
Verfasst: Di 28. Mär 2017, 20:01
von kosovafan
Hallo,
ich weiß nicht ob es funktioniert, ich habe Extras > Makro > Ausführen geklickt und bekomme eine Fehlermeldung siehe Anhang. Ich habe die Tabelle
noch einmal mit Erklärungen angehängt, ich glaube ich habe mich verkehrt ausgedrückt. Hat man mir gestern gesagt.
Also wenn ich im Blatt Projekte/CM (Spalte D) eine Zahl zwischen 1 - 4, oder kombiniert 1,2,3,4 eingebe dann sollte LO im Blatt Inventar/Culumn (Spalte G) nachschauen gibt es dort die 1? 2? 3? 4? oder kombiniert 1,2,3,4 und nehme dann die Nummern aus Inventar/No. (Spalte A) und füge diese sortiert in Spalte Projekte/Inventory (Spalte J) ein. Als zweites berechne aus den Positionsnummern das Gewicht (Inventar/Weight, Spalte E) und füge es in Projekt/Weight (Spalte M) ein. Das soll passieren für vorhandene und zukünfige Positionen.
Ich glaube ich sollte zu Windows zurückwechseln mit einer Handwerker Software wird das einfacher, obwohl sind die überhaupt für sowas geeignet.
Mfg
Re: Automatischer Abgleich
Verfasst: Di 28. Mär 2017, 20:50
von mikele
Hallo,
wer wird denn so schnell aufgeben ...
Die benutzerdefinierten Funktionen werden nicht per Extras > Makro > Ausführen aufgerufen, sondern werden im Tabellenblatt wie andere Funktionen verwendet. Sieh' dir mal die Spalten M und N in der Tabelle Projekte an.
Re: Automatischer Abgleich
Verfasst: Di 28. Mär 2017, 22:14
von kosovafan
wer wird denn so schnell aufgeben ...
hhh ich nicht

ich würde nach 10 Jahren Linux mit Windows nicht mehr klar kommen.
sondern werden im Tabellenblatt wie andere Funktionen verwendet
Perfekt vielen vielen Dank. Das spart echt viel Arbeit. Wunschliste irgendwo?
Mfg
Silvio