اذهب الي المحتوي
أوفيسنا

اخوان مساعدة طريقة نسخ بيانات من حقل الى حقل ثاني


jojo2009

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

50 دقائق مضت, jojo2009 said:

مشكوررررر اخي العزيز

اريد بضخط  زر  نسح جميع بيانات من الراتب الحالي الى الراتب السابق 

ويصبح حقل الراتب الحالي 0 

 

اخي الكريم طلبك ما كان هيك 

على كل رح نحاول 

اوفسنا 3.png

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

بعد إذن صديقي @عبد اللطيف سلوم

ضع هذا الكود تحت الحدث الزر ......

Dim c, i
c = DCount("[الراتب السابق]", "insedData")
DoCmd.GoToRecord , , acFirst
For i = 1 To c
Me![الراتب السابق] = Me![الراتب الحالي]
Me![الراتب الحالي] = ""
DoCmd.GoToRecord , , acNext
Next i

 

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

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

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



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

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

Important Information