• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Textbox barkod okuyucuyla veri girme hak.

Katılım
23 Nisan 2005
Mesajlar
34
Excel Vers. ve Dili
Office 2010-2016
herkese iyi akşamlar.

Çalışma sayfasına textboxa aşağıdaki kodu ekledim. Textboxa ilk veri okutuyorum ikinci veriyi okuttuğumda arkasına ekleyip aktarıyor. ilk veri girdikten sonra ikinci veri girilirken textboxun sıfırlanmasını istiyorum.
Umarım anlatabilmişimdir.
Saygılar.
Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then
say = WorksheetFunction.CountA([A1:A65536])
Cells(say + 1, 1) = TextBox1
End If
End Sub
örnek dosya ekte
 

Ekli dosyalar

Kodun alt kısmını aşağıdaki şekilde değiştirin... (kırmızı kodu ekleyin)
Textbox1.Text=""
End If
End Sub
 
Geri
Üst