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!
Seite 1 von 1
Betrag eingeben und autom. in der Datenbank übernehmen
Anzeige
#2
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.
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.
#3
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
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
#4
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:
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
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
«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
Unix won't hold your hand. You wanna shoot your foot, Unix reliably delivers the shot.
True Cloudstorage
Thema verteilen:
Seite 1 von 1