Ausgabe in UserForm aus Tabelle

Computer: Software & Programmierung Visual Basic
#1

Hallo alle zusammen,

Ich muss in einer Hausaufgabe, den rausgesuchten Wert aus einer Tabelle in der UserForm anzeigen, doch es klappt nicht.
Ich habe es bisher so versucht:

If Artikelnummer = Worksheets(„Vertrieb“).Cells(2, i) Then
Artikel = Worksheets(„Vertrieb“).Cells(3, i).Value
Preis = Worksheets(„Vertrieb“).Cells(4, i)
Else: MsgBox („Der Artikel konnte nicht gefunden werde. Überprüfen sie die Groß- und Kleinschreibung!“)
End If

Es wäre nett, wenn ihr mir den Fehler raussuchen könntet.

#2

einer Tabelle in der UserForm anzeigen, doch es klappt nicht.
Ich habe es bisher so versucht:
If Artikelnummer = Worksheets(„Vertrieb“).Cells(2, i) Then
Artikel = Worksheets(„Vertrieb“).Cells(3, i).Value
Preis = Worksheets(„Vertrieb“).Cells(4, i)
Else: MsgBox („Der Artikel konnte nicht gefunden werde.
Überprüfen sie die Groß- und Kleinschreibung!“)
End If

Hi Ivi,
wenn Userform1 die Textboxen „Artikel“ und „Preis“ hat

If Artikelnummer = Worksheets("Vertrieb").Cells(2, i) Then
 Userform1.Artikel = Worksheets("Vertrieb").Cells(3, i).Value
 Userform1.Preis = Worksheets("Vertrieb").Cells(4, i)
Else
 MsgBox ("Der Artikel konnte nicht gefunden werde. Überprüfen sie die Groß- und Kleinschreibung!")
End If

Oder so:

If Ucase(Artikelnummer) = Ucase(Worksheets("Vertrieb").Cells(2, i)) Then
 Userform1.Artikel = Worksheets("Vertrieb").Cells(3, i).Value
 Userform1.Preis = Worksheets("Vertrieb").Cells(4, i)
End If

Gruß
Reinhard

#3

Hallo Reinhard,

danke für deine Antwort, jetzt klappts auch…

mfg

ivi