(28/10/2020, 23:20)atoykan yazdı: [ -> ]Barkod okuyucunuz okuduğu veriyi nasıl kayıt ediyor bilgisayara, txt dosya olarak mı, csv olarak mı, kendi dbsi var webde kayıt mı ediyor, vs.
Siz bu veriyi kullanacaksınız ister Access ister Excel olsun. Bunu bilmeden nasıl kullanacağınız, ne tip bir kod hazırlanacağını bilemeyiz.
Not belgesine kaydediyor. Not belgesinden
Vba veriyi aktara bilir isek
Access gerek kalmaz çünkü ürünü kaydettiğimizde zaten
Access barkod kodu da aktarılmış olacak.
Excel içine txt dosyasından dış veri olarak bu bilgileri alabilirsiniz. Özellikle bir makro oluşturmaya ihtiyacınız var ise de barkod okuyucunun örnek bir kaydını yüklerseniz ona göre bir kodlama üzerinde çalışabiliriz.
(28/10/2020, 23:35)atoykan yazdı: [ -> ]Excel içine txt dosyasından dış veri olarak bu bilgileri alabilirsiniz. Özellikle bir makro oluşturmaya ihtiyacınız var ise de barkod okuyucunun örnek bir kaydını yüklerseniz ona göre bir kodlama üzerinde çalışabiliriz.
Çihaz ne yazıkki işyerinde ama videosunu buldum
https://www.youtube.com/watch?v=vKocQSHsl54&t=376s aynı bu şekilde oluşturuyor elle içe aktarmay yerine makro ile kendisnin bilgiyi oradan almasını tercih ederim .
Barkodlarınızın formatı belirli mi peki?
Örneğin ABC123456789 şeklinde mi veya özel karakterler kullanılıyor mu +, - , / gibi?
Örnek Bir Çalışma Buldum belki buradan bana yardımcı olabilirsiniz.
(28/10/2020, 23:45)atoykan yazdı: [ -> ]Barkodlarınızın formatı belirli mi peki?
Örneğin ABC123456789 şeklinde mi veya özel karakterler kullanılıyor mu +, - , / gibi?
Ramaksal ve metin sel barkodlar.
Sub imp_brcd()
Dim x As Double, txt As String
Open "C:\Users\xxx\Desktop\brcd.txt" For Input As #1 'brcd.txt barkod dosyanızın adı ve dosya yolu ile güncelleyin
x = 0
Do While Not EOF(1)
Line Input #1, txt
Cells(1, 1).Offset(x, 0) = txt ' A1 hücresinden itibaren eklemeye başlar isterseniz değiştirin
x = x + 1
Loop
Close #1
End Sub
kodlarda yer alan brcd.txt barkod dosyanız için benim uydurduğum bir ad siz dosya ismini kendi dosya isminiz ile değiştirin ve "C:\Users\xxx\Desktop\brcd.txt" dosya yolunu bilgisayarınızda kayıtlı olduğu yol olarak güncelleyin. Arzu ederseniz bir buton ekleyerek bu kodu ona atayabilirsiniz verinizi çekip excele işler.