اظهار اخر رقم حساب في فورم

[الجازع]

الاخوة والأساتذة               الافاضل

تحية طيبة...

 

اسعد الله ايامك

 

لدي طلب ارجو من الله ان يكون بمقدوركم مساعدتي في تحقيقه.

 

كما هو مرفق لكم ملف يوضح لكم الطلب وهو اظهار ارقام الحسابات في مربع تكست بوكس مع مراعاة حالة الحساب .

 

ولكم جزيل الشكر والتقدير....

0011 - 0012 - Copy.rar

[الجازع]

للرفع

[شوقي ربيع]

لسلام عليكم

استعمل هذا الكود

Sub Actv()
Dim sh As Worksheet: Set sh = Sheet1
Dim lr As Long: lr = sh.Cells(sh.Rows.Count, "M").End(xlUp).Row + 1
Me.TextBox5.Value = sh.Range("B" & lr).Value
End Sub

كل ما تحتاجه  قم باستدعائه فقط

مثلا عندما تريد ان تضهر النتيجة في بداية اقلاع الفورم اكتب العبارة call activ في حدث  UserForm_Initialize

[الجازع]

اشكرك جزيل الشكر

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

ياريت لو تقدر تنفيذ الكود على الملف المرفق بحيث عند الضغط على زر الارسال

 

واشكر لك حسن تعاونك

وهذا ما عهدنا منكم

 

ولكم جزيل الشكر والتقدير...

0011 - 0012 - Copy.zip

تم تعديل يونيو 2, 2014 بواسطه الجازع

[الجازع]

الحمدلله تم تجهيز الملف

اشكرك يا استاذي الفاضل