WinFuture-Forum.de: Betrag eingeben und autom. in der Datenbank übernehmen - WinFuture-Forum.de

Zum Inhalt wechseln

Nachrichten zum Thema: Office 2010
Seite 1 von 1

Betrag eingeben und autom. in der Datenbank übernehmen


#1 Mitglied ist offline   drumhead 

geschrieben 08. September 2015 - 12:12

Hallo,

ich habe folgende Frage an euch:

durch sverweis habe ich schon mal meine Ausgabe aus der Datenbank erhalten
Beispiel:
___________________________________
...
1050 Herr Olaf Meier
1051 Herr Fritz Schmitt
1052 Frau Olga Müller
...

Ausgabe durch Sverweis
Suche: 1050
1050 Herr Olaf Meier
____________________________________
Nun möchte ich das ich in der Suche bzw. dahinter einen Betrag eingeben kann:
Suche: 1050
1050 Herr Olaf Meier 6,50 Euro

und der Betrag dann in die Datenbank übernommen wird:

...
1050 Herr Olaf Meier 6,50 Euro
1051 Herr Fritz Schmitt
1052 Frau Olga Müller
...
_____________________________________

Suche: 1052
1052 Frau Olga Müller 3,50 Euro

...
1050 Herr Olaf Meier 6,50 Euro
1051 Herr Fritz Schmitt
1052 Frau Olga Müller 3,50 Euro
...

Habt ihr eine Idee? Komme grade nicht weiter. Schon mal THX!
0

Anzeige



#2 Mitglied ist offline   RalphS 

  • Gruppe: VIP Mitglieder
  • Beiträge: 8.895
  • Beigetreten: 20. Juli 07
  • Reputation: 1.126
  • Geschlecht:Männlich
  • Wohnort:Zuhause
  • Interessen:Ja

geschrieben 08. September 2015 - 15:01

Wenn das in Excel sein muß: per Macro.

Wenn nicht, wärst Du möglicherweise mit einer 'echten' Datenbank besser beraten, wo die ganze Chose mit einem simplen UPDATE xx SET betrag = yy WHERE person = zz abgegessen wäre.
"If you give a man a fish he is hungry again in an hour. If you teach him to catch a fish you do him a good turn."-- Anne Isabella Thackeray Ritchie

Eingefügtes Bild
Eingefügtes Bild
0

#3 Mitglied ist offline   drumhead 

geschrieben 08. September 2015 - 15:15

Hallo,

erst einmal Danke für deine Antwort.
Wie es so ist im Leben, man kann es sich nicht aussuchen.
Die Datei war schon vor mir da.
Es greifen mehrere Personen darauf zu (nicht gleichzeitig). Daher viele Fehleingaben.

Kannst Du mir einen kleinen Tip geben? Mit Macro kenne ich mich nicht aus.

THX
drumhead
0

#4 Mitglied ist offline   Sturmovik 

  • Gruppe: aktive Mitglieder
  • Beiträge: 3.776
  • Beigetreten: 10. Januar 08
  • Reputation: 445
  • Geschlecht:unbekannt
  • Wohnort:In Reichweite der Kaffeemaschine
  • Interessen:IT, Luftfahrt, historische Technik

geschrieben 08. September 2015 - 18:46

ich werd aus dem Ausgangspost nicht ganz schlau. Greifst du mit Excel auf irgendeine Datenbank zu oder ist das was du hier Datenbank nennst, einfach nur ein weiteres Tabellenblatt?

im zweiten Fall würde ich (als Anfänger) ein Makro so angehen:
die Suche mit dem Sverweis sucht dir auch gleich die Zeile raus, wo der Datensatz hinsoll. Ich nehme mal an, dass die 105x hier die eindeutige ID der Person ist, also müsste die Spalte A nach diesem Wert durchsucht und die Zeilennummer zurückgegeben werden. Excel hat da ne Funktion dafür.
Damit beschränkt sich das Makro darauf in der Zelle, die durch Zeilennummer und Spaltennummer identifiziert wird, den Wert zu setzen/zu ändern.

Mit etwas mehr VBA-Kenntnissen kann das komplett im Makro abgebildet werden:
Option Explicit
sub updatestuff
dim found as object, funnynumber as integer, newvalue as integer
newvalue = thisworkbook.sheets("Name").cells(x,y) 'x,y sind die Koordinaten der Zelle wo der neue Wert steht
funnynumber = thisworkbook.sheets("Name").cells(x,y) 'x,y sind die Koordinaten der Zelle wo die zu suchende ID steht
set found = range("A:A").find what:=funnynumber '[ggf noch weitere Suchoptionen]
if not found is nothing then
  thisworkbook.sheets("sheetname").cells(found.row,3).value = newvalue
end if
end sub



Disclaimer: das Makro hab ich komplett aus der Hüfte geschossen, da ich hier grad kein Excel greifbar habe. Allerdings hab ich das in so manchen Excel-Monstern schon so ähnlich implementiert.
Syntaxfehler sind also nicht unwahrscheinlich, aber durch setzen der Direktive 'Option Explicit' in der ersten Zeile sollte sich das hinreichend debuggen lassen...

Ebenso verzichte ich hier auf sämtliche gängigen Namenskonventionen für Variablen aufgrund akuter Bocklosigkeit :P
«Geschichte wiederholt sich nicht, aber sie reimt sich» (Mark Twain)

Unix won't hold your hand. You wanna shoot your foot, Unix reliably delivers the shot.

True Cloudstorage
0

Thema verteilen:


Seite 1 von 1

1 Besucher lesen dieses Thema
Mitglieder: 0, Gäste: 1, unsichtbare Mitglieder: 0