بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
البحث في الموقع
Showing results for tags 'كود vba'.
تم العثور علي 5 نتائج
-
.thumb.gif.27c4a79ce23abc61b721f833e6899131.gif)
السلام عليكم ورحمة والله تعالى وبركاته طيب ببساطه انظر للسلسلة النصية الاتية "Moh8202281012343434" ونريد التعديل عليها لتظهر بهذا الشكل "Moh-820-228-101-234-343-4" او بهذا الشكل "Moh,820,228,101,234,343,4" او بهذا الشكل Moh820/228101/234343/4 يتم عمل ذلك من خلال الكود الاتى Function ReFormat(ByVal strText As String, Optional strSymbol As String = "-", Optional intCountDigits As Integer = 3) Dim i As Long ReFormat = "" For i = 0 To Len(strText) - 1 Step intCountDigits If i = 0 Then ReFormat = Mid(strText, i + 1, intCountDigits) Else ReFormat = ReFormat & strSymbol & Mid(strText, i + 1, intCountDigits) End If Next i End Function syntax code ReFormat(string ,Symbol, Count Digits) Result By default syntax used ReFormat(string) Symbol >-->> - Count Digits >-->> 3 اذا من خلال استدعاء الكود عن طريق البنية المفضلة الاتية: ReFormat(string) تحصل على اضافة العلامة - بعد كل 3 مواضع فى السلسلة النصية اما اذا اردت التعديل فى شكل الرمز وعدد المواضع يمكنك استخدام الكود الاتى : ReFormat(string ,Symbol, Count Digits) مثلا لو اردت استخدام الرمز $ بدلا من الرمز - وتريد وضع الرمز فى السلسلة النصية بعد كل خمس مواضع يكون الكود كالأتى: ReFormat(string ,"$", 5)- 3 replies
-
- 1
-
-
- شخابيط
- شخابيط وافكار
- (و22 أكثر)
-
اريد كود عند ادخال رقم الهوية و الضغط على زر البحث يقوم بالبحث عنها في شيت الاكسيل و يعرض لي صف الخليها في شيت الاكسيل كلها في الخانات الموضحه على اليوزر فورم نظاما.xlsm
-
لدي مشكلة في ملف إكسل المؤلف من شريحتين: - الأولى xyz الذي يحتوي على نتائج بعض الطلاب - الثانية students والتي تحتوي على أسماء الطلاب والمطلوب: كود VBA يكتب كل أسماء المواد المحمولة (الراسبة أي: الغياب أو أقل من 60 درجة) في السنة الأولى في الشريحة students في الخلية C1,C2....... في الفصل الثاني فقط وأسماء المواد المحمولة في السنة الثانية في نفس الشريحة في الخلية D1,D2....... في الفصل الثاني فقط وعلى كل الأحوال كل الشكر لكم وللسادة المشرفين والسادة الأعضاء نتائج.rar
-
السلام عليكم,, عملت لكم صورة توضيحية حتى تفهمون قصدي اريد عند الضغط على الزر حفظ يتم حفظ السجلات الظاهرة امامكم السجل الذي امامه CheeckBox = True يتم حفظه بإسم (غائب) والذي يكون CheckBox = False يتم حفظه بإسم حاضر يعني مختصر عمل لوب كيف ذلك؟
-
ارجو من عمالقة موقع اوفيسنا المساعدة في التعديل على كود حساب الوقت ولكم مني جزيل الشكر والتقدير Book1.rar
