اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

تعديل على كود ترحيل


إذهب إلى أفضل إجابة Solved by عبدالفتاح في بي اكسيل,

الردود الموصى بها

السلام عليكم ورحمة الله

السادة الافاضل

بعد اذنكم محتاج تعديل على الكود الاتي وهو موجود داخل فورم الوارد في الملف محتاج عند الانتهاء من التسجيل يتم الوقوف على خانة الكود داخل الفورم بعد كل عملية ادخال للبيانات الكود المكتوب هو كالاتي

Private Sub CommandButton1_Click()
Dim my As Worksheet, rng As Range
Set my = Sheet6
Set rng = my.Range("g2100").End(xlUp).Offset(1, 0)
rng.Offset(0, 0).Value = Me.TextBox1.Value
rng.Offset(0, -3).Value = Me.TextBox2.Value
Me.TextBox1.Value = ""
Me.TextBox2.Value = ""
End Sub

باركود.xlsm

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information