Thema Datum  Von Nutzer Rating
Antwort
Rot Barcode scannen mit UserForm
03.08.2022 14:24:00 Dominik
Solved
03.08.2022 18:23:56 Gast01287
NotSolved
04.08.2022 06:16:48 Cat
NotSolved
04.08.2022 06:32:06 Dominik
Solved
04.08.2022 13:54:34 Gast17385
NotSolved
04.08.2022 14:19:33 Dominik
NotSolved
04.08.2022 17:19:40 Gast89508
NotSolved
04.08.2022 17:20:52 Gast26688
NotSolved

Ansicht des Beitrags:
Von:
Dominik
Datum:
03.08.2022 14:24:00
Views:
337
Rating: Antwort:
 Nein
Thema:
Barcode scannen mit UserForm

 

Hallo zusammen,

Wir wollen bei uns eine kleine Datei basteln um Barcodes in eine Tabelle zu kopieren.

Unser Ziel ist es, dass wir eine UserForm starten und über diese die Barcodes gescannt.

Wenn der Barcode gescannt wurde dann soll die Nummer in eine intelligente Tabelle geschrieben werden (Tabelle soll automatisch erweitert werden)

anschließend soll die Textbox automatisch geleert werden und der Corser wieder in der Textbox sein.

 

Wir haben eine Lösung gefunden aber mit gefällt die Lösung noch nicht, da wir "'SendKeys "{UP}"" Bzw "TAB" benutzen.

hier mal der Code

Private Sub ScanFeld_AfterUpdate()

'Tabelle einlesen
Dim tbl As ListObject
Set tbl = tb_Datenbank.ListObjects(1)

Dim Zeile As Long


    

    'Zeile hinzufügen
    tbl.ListRows.Add
    
        'Zeile in Variable speichern
    Zeile = tbl.DataBodyRange.Rows.Count



With tb_Datenbank

    tbl.DataBodyRange(Zeile, 2).Value = ScanBox.ScanFeld
    tbl.DataBodyRange(Zeile, 1).Value = Zeile

End With

ScanBox.ScanFeld = ""
'SendKeys "{UP}"

End Sub

 

Wir dachten eigentlich an ".SetFocus" aber das funktioniert leider nicht.

 

Vielen Dan schon mal

Gurß Dominik


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Barcode scannen mit UserForm
03.08.2022 14:24:00 Dominik
Solved
03.08.2022 18:23:56 Gast01287
NotSolved
04.08.2022 06:16:48 Cat
NotSolved
04.08.2022 06:32:06 Dominik
Solved
04.08.2022 13:54:34 Gast17385
NotSolved
04.08.2022 14:19:33 Dominik
NotSolved
04.08.2022 17:19:40 Gast89508
NotSolved
04.08.2022 17:20:52 Gast26688
NotSolved