Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1208to1212
1208to1212
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mit Textbox und Datenbankabfrage rechnen

Forumthread: Mit Textbox und Datenbankabfrage rechnen

Mit Textbox und Datenbankabfrage rechnen
anne86
Hallo liebes Forum,
ich habe mir eine Userform mit VBA programmiert. Wenn die Daten in das Tabellenblatt übernehme rufe ich gleichzeitig einen Preis aus einer Acces Datenbank ab. Jetzt soll das Programm mir aber auch direkt bei der Übernahmen den im Textfeld festgehaltenen Prozentsatz auf den Preis aufschlagen!
Wäre super, wenn mir jemand helfen könnte!
Vielen lieben Dank schon mal!
anne86
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Mit Textbox und Datenbankabfrage rechnen
30.03.2011 20:20:11
Hajo_Zi
Hallo Anne,
cdbl(textbox1)* Variable

AW: Mit Textbox und Datenbankabfrage rechnen
30.03.2011 20:32:15
anne86
Hallo Hajo,
iwie blicke ich da nicht so ganz durch.
hier mal als beispiel mein programmcode:
Dim conn2 As New Connection
Dim rec2 As New Recordset
Dim sql2$
If Not Basisdaten.Endprodukt = "" And Basisdaten.APLimit = "Anstieg um mx." Then
Set ws = ThisWorkbook.Worksheets("Datenbasis")
Worksheets("Datenbasis").Activate
tissue = Basisdaten.Endprodukt.Value
conn2.Open "Provider=Microsoft.jet.oledb.4.0;" + _
"Data Source =" + ThisWorkbook.Path + "\Datenbasis Modell.mdb"
sql2 = "SELECT [AP] From FinPro Where [Material] = " & tissue & ";"
rec2.Open sql2, conn2
rec2.MoveFirst
With price = rec2![AP]
ws.[C12].Cells(i).Value = (CDbl(Prozentsatz)) * price
rec2.MoveNext
End With
End If
Sorry habe nur wenig Ahnung von VBA und musste mir das für meine Masterthesis alles iwie selbst beibringen :)
Anzeige
AW: Mit Textbox und Datenbankabfrage rechnen
30.03.2011 20:50:34
Hajo_Zi
Hallo Anne,
da kann ich Dir leider nicht helfen. Dein Code verstehe ich nicht.
so eine Anweisung With price = rec2![AP] habe ich noch nie gesehen
Gruß Hajo
AW: Mit Textbox und Datenbankabfrage rechnen
30.03.2011 20:55:47
anne86
hallo Hajo,
ursprünglich war der code so
rec2. MoveFirst
With ws.[C12].Cells(i).Value = rec2![AP]
rec2.MoveNext
Dann ruft er den Preis aus der Datenbank ab und trägt ihn in das Tabellenblatt ein. aber halt ohne den Prozentsatz aus dem Textbox aufzuschlagen
der preis wird über eine materialnummer aus der datenbank abgerufen, die in der userform in einem Kombinationsfesl ausgewählt werden kann
trotzdem schon mal vielen dank für deine Hilfe
Anzeige
AW: Mit Textbox und Datenbankabfrage rechnen
30.03.2011 20:39:16
anne86
Hallo Hajo,
iwie blicke ich da nicht so ganz durch.
hier mal als beispiel mein programmcode:
Dim conn2 As New Connection
Dim rec2 As New Recordset
Dim sql2$
If Not Basisdaten.Endprodukt = "" And Basisdaten.APLimit = "Anstieg um mx." Then
Set ws = ThisWorkbook.Worksheets("Datenbasis")
Worksheets("Datenbasis").Activate
tissue = Basisdaten.Endprodukt.Value
conn2.Open "Provider=Microsoft.jet.oledb.4.0;" + _
"Data Source =" + ThisWorkbook.Path + "\Datenbasis Modell.mdb"
sql2 = "SELECT [AP] From FinPro Where [Material] = " & tissue & ";"
rec2.Open sql2, conn2
rec2.MoveFirst
With price = rec2![AP]
ws.[C12].Cells(i).Value = (CDbl(Prozentsatz)) * price
rec2.MoveNext
End With
End If
Sorry habe nur wenig Ahnung von VBA und musste mir das für meine Masterthesis alles iwie selbst beibringen :)
Anzeige
;

Forumthreads zu verwandten Themen

Markierte Zellen: Text in Datum umwandeln
Peter

Guten Tag
Mit nachfolgendem Code wandle ich einen Textstring in ein Datum um. Komisch ist, dass ich die Schleife zweimal hintereinander laufen lassen muss. Nach dem ersten Mal wird das Datum mit "d/m/yy" und erst das zweite Mal im gewünschten Format "dd.mm.yy" angezeigt.
Was muss ich än...
15.09.2008 11:41:00
Thread-ID: 1009737
6 Beiträge
Formeln und Text
Juergen

Hallo all zusammen,
ich habe wieder einmal eine Frage:
kann man Formeln und Texte kombinieren?
Ich habe über Winkel;Bogenmaß den tangens der Winkel berechnet und möchte nun in dem Kombinationsfeld ersichtlich machen welcher tangens zu welchem Winkel gehört.
Z.B 0,364 = tan 20°
23.09.2008 18:08:11
Thread-ID: 1011848
8 Beiträge
Minus-Zeit als Ergebnis einer Formel
Rico

Hallo liebe Ex(cel)perten
Ich kommen langsam aber stetig voran und ich entschuldige mich jetzt schon da ich weiss, dass diese Probleme viel besprochen werden in diesem genialen Forum aber ich hab leider auf mein Problem keine Lösung gefunden in der Recherche.
Gemäss Beispielmappe: https...
09.10.2008 11:31:11
Thread-ID: 1015298
3 Beiträge
Exceldaten als Fliestext in Word einbinden?
Frank

Hallo zusammen,
ich habe eine halbe Excel und halbe Wordfrage :-)
Ich habe eine Exceltabelle mit diversen Zahlenmaterial. Das Zahlenmaterial wird ständig aktualisiert. Parallel dazu habe ich einen geschriebenen Langtext in Word, der eine Art ausführliche Erklärung zur Exceltabelle darst...
23.10.2008 07:08:00
Thread-ID: 1018498
3 Beiträge
in Ergebnis einer Formel Text mit ausgeben
Walter

Nochmals Hallo,
leider die Lösung vergessen, wie man in einer Berechnungsformel, nen fest fixierten Text ausgeben kann.
Beispielergebnis: 12 Bananen (12 ist errechnet, Bananen ist der feste Text.
War, glaube ich, ganz einfach :-(((
Danke + Gruß
Walter
23.10.2008 23:15:29
Thread-ID: 1018831
7 Beiträge
Array-Formel in VBA-Code umwandeln?
Robert

Hallo,
ich bräuchte bitte eure Hilfe.
Hab folgende Formel...
Selection.FormulaArray = _
=IF(ROW(R[-107]C[-3])>COUNTA('1'!R5C[4]:R200C[4]),"""",INDEX('1'!R5C4:R200C4,SMALL(IF('1'!R5C[4]:R200C[4]<>"""",ROW(R1:R196),""""),ROW(R[-107]C[-3]))))"
Mein Problem ist, dass ic...
26.10.2008 10:56:28
Thread-ID: 1019326
13 Beiträge
Textformatierung in einer Formel
Dieterlem

Hallo Excelfreunde,
ich möchte ein Wort fett innerhalb eines Formelergebnisses fett darstellen. Beispiel:
"WENN(A1="Ja";"Beispieltext soll Fett dargestellt werden";"")
Dabei soll nur das Wort 'Fett', fett formatiert werden.
Ist so etwas möglich?
Gruß
Dieterlem
27.10.2008 19:55:00
Thread-ID: 1019731
3 Beiträge
Anzeige
Formel mit Text Datum und wert in Zeitreihe
Karel

Hallo Forum,
Habe ein bezahl blatt mit betragen in eine Spalte wird eingetragen als Text Bezahlt oder Offen wie kann ich an hand von Datum und Text (bezalt oder Offen) diese wert in eine Zeitreihe darstellen ab Zelle i11 und i12
Tabelle1

 BCDEFGHIJKLMN11   &...
19.11.2008 20:37:00
Thread-ID: 1026214
5 Beiträge
Anzeige
Text in Zahlen umwandeln
u_hoernchen

Ich habe eine Spalte in Excel, in der vereinzelt Zellen sind, in denen Zahlen als Text formatiert sind. Da ich diese Zahlen für die weitere Verwendung als Werte haben muss und ich das dann relativ oft umfrickeln muss (ist leider ein Download aus einem Vorprogramm), frage ich mich, ob es ggf. ei...
26.11.2008 11:09:00
Thread-ID: 1027963
4 Beiträge
Formel in Makro umwandeln?
Josef_T

Guten Abend zusammen.
Habe mal wieder ein Problem, dass ich alleine nicht gelöst bekomme.
Es geht darum, einen Ausdruck zu machen wobei nur Zeilen gedruckt werden sollen, die in C einen Wert haben, der grösser Null ist.
Habe mal ein Muster hochgeladen, weil meine Fragen und Erklärun...
29.11.2008 19:08:00
Thread-ID: 1028896
6 Beiträge
Anzeige
Ergebnis in Formel = FALSCH
Josef

Hallo!
Ich bekomme bei nachstehender Formel immer die Fehlermeldung FALSCH.
=WENN(A1=1;VERKETTEN(C1;B1;"";WENN(A1=2;VERKETTEN(C2;B1;""))))
Die Werte stehen jedoch in den Spalten. In A1 entweder 1 oder 2 in der Spalte B 2008 und in C1 und C2 verschiedene Texte.
Wo habe ich hier b...
03.12.2008 14:11:00
Thread-ID: 1029820
7 Beiträge
Formel: Summe= Monat, Jaht und Text
Frank

Hallo, bräuchte mal eure Hilfe.
Habe eine Tabelle und möchte nur die Anzahl des Textes die in A stehen
aber nur von bestimmtem Jahr und Monat
es wird erst in M der Monat gesucht den ich in B2 eingebe
dann das Jahr in M das ich in F1 eingebe
und nun der Text der in A steht.
14.12.2008 10:38:00
Thread-ID: 1032734
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige