تحويل كود vba الى منشى تعبيير

[ابو هاله النبلسي]

If IsNull(Me.stage5) Then
MsgBox "empty"
End If
If IsNull(Me.step) Then

Me.step = 1

ElseIf Me.step = 11 Then

Else

Me.step = Me.step + 1

End If

 

 

المطلوب اعلاه يتم في استعلام في الملف المرفق 

Database22.accdbFetching info...

تم تعديل مارس 31, 2023 بواسطه ابو هاله النبلسي

[محمد احمد لطفى]

تفضل هل هذا ما تريد

Database22.accdbFetching info...

تم تعديل مارس 31, 2023 بواسطه محمد احمد لطفى

[ابو هاله النبلسي]

  في 31‏/3‏/2023 at 11:00, محمد احمد لطفى said:

تفضل هل هذا ما تريدDatabase22.accdb

388 kB · 1 download

Expand  

هل يتم دمج الحقلين في الاستعلام الذ قمت حضرتك بانشائهم في حقل واحد stage +step

[ابو هاله النبلسي]

استاذي في حالة الارقام يكتب كتابة مثلا 1 اولى 2 ثانية حسب الجقل

Database22.accdbFetching info...

[محمد احمد لطفى]

كده الموضوع اختلف

تم تعديل مارس 31, 2023 بواسطه محمد احمد لطفى

[ابو هاله النبلسي]

  في 31‏/3‏/2023 at 11:16, ابو هاله النبلسي said:

استاذي في حالة الارقام يكتب كتابة مثلا 1 اولى 2 ثانية حسب الحقل

Database22.accdb 500 kB · 0 downloads

Expand  

@محمد احمد لطفى

تم تعديل مارس 31, 2023 بواسطه ابو هاله النبلسي

[محمد احمد لطفى]

تقريبا سوف تحتاج الى دالة  Replace

[ابو هاله النبلسي]

  في 31‏/3‏/2023 at 11:16, محمد احمد لطفى said:

كده الموضوع اختلف

Expand  

اشكرك جدا استاذي انا كان المفروض من البداية اكتبه لك الارقام على شكل نص الخطا خطئي

[ابوخليل]

الكود الذي كتبته يشتمل على خطأ

الافضل انك توضح ما تريد بكلمات عربية معلومة مثلا :

اذاكانت قيمة الحقل الفلاني كذا تكون النتيجة كذا ,,

واذا الحقل العلاني كذا تكون النتيجة كذا ... وهكذا

[ابو هاله النبلسي]

  في 31‏/3‏/2023 at 11:20, ابوخليل said:

الكود الذي كتبته يشتمل على خطأ

الافضل انك توضح ما تريد بكلمات عربية معلومة مثلا :

اذاكانت قيمة الحقل الفلاني كذا تكون النتيجة كذا ,,

واذا الحقل العلاني كذا تكون النتيجة كذا ... وهكذا

Expand  

احسنت ان شاء الله القادم افضل شكراً لحضرتك