zakwan قام بنشر أبريل 25, 2009 قام بنشر أبريل 25, 2009 الاخوة الافاضل سلام الله عليكم ورحمتة وبركاتة امابعد.... لدي تقرير فية الكثير من (Text Box) المتتابعة ولكن لهم اسماء متفرقة مااريدة بالضبط هو اعادة تسمية هذه ال (Text Box) عن طريق تحديدهم ثم اعادة تسميتهم مرة واحدة اي مثال لدي المربعات في التقرير كتالي : Text 25 Text26 Text46 Text55 Text56 Text70 Text77 Text88 مااريدة ... عند تحديدهم مرة واحدة ليصبحوا كتالي: Text01 Text02 Text03 Text04 Text05 Text06 Text07 Text08 Text09 Text10 اي متسلسلين اتمنى ان اكون اوصلت فكرة سؤالي بشكل واضح واتمنى ان اجد لديكم الاجابة مع الشكر الجزيل لكم
Dream_Works قام بنشر أبريل 26, 2009 قام بنشر أبريل 26, 2009 يمكنك وضع كود مثل هذا في أي زر لنموذج ( فورم ) و تشغيله ملحوظة : ضع اسم التقرير المطلوب في المتغير ReportName Private Sub Command24_Click() Dim c As Control, i As Byte, ReportName As String ReportName = "Report1" DoCmd.OpenReport ReportName, acViewDesign For Each c In Reports(ReportName).Controls If c.ControlType = acTextBox Then i = i + 1 c.Name = "Text" + Format(i, "00") End If Next c DoCmd.Close acReport, ReportName, acSaveYes End Sub
zakwan قام بنشر أبريل 27, 2009 الكاتب قام بنشر أبريل 27, 2009 الاخ القدير Dream_Works اولا جزاك الله كل خير لمساعدتك ثانيا اضع لك مثال على ذلك في المرفقات حيث ان الطريقة فشلت معي مع الشكر الجزيل والامتنان Test1.rar
Dream_Works قام بنشر أبريل 27, 2009 قام بنشر أبريل 27, 2009 الكود ما فيه مشاكل أخوي ... و لكن لأنك وضعت أسماء تبدأ بكلمة Text من قبل فحصل تشابه في الأسماء بين مربعات النصوص عندك جرب غير كلمة "Text" الموجودة بالكود عندك إلى أي كلمة أخرى لم تستخدمها من قبل و شغل الكود ... ثم غير مرة أخرى إلى كلمة Text و شغل ملحوظة : ضع هذا السطر بالكود بدل الموجود عندك ... ( إضافة بسيطة ) DoCmd.OpenReport ReportName, acViewDesign, , , acHidden
zakwan قام بنشر أبريل 28, 2009 الكاتب قام بنشر أبريل 28, 2009 اخي القدير Dream_Works جاري التجريب وسوف اطلعك على التطورات ان شاء الله والف الف شكر لك ولتعاونك
zakwan قام بنشر أبريل 28, 2009 الكاتب قام بنشر أبريل 28, 2009 ياسيدي كل التقدير والاحترام زبط ومشي الحال وعال العام تقبل تحياتي وجعل الله مافعلت في ميزان حسناتك
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.