شحادة بشير قام بنشر يناير 14, 2008 مشاركة قام بنشر يناير 14, 2008 الأخ mr toto : نورت بمرورك الكريم الأخ member : أهلا بك وشرفت الموضوع، لكن الطريقة غير فعالة وتحتاج إلى الكثير الكثير من الوقت تخيل أن عندك عدة دفاتر تحضير كما حدث مع أخينا المستشار، وتريد الاستبدال في كل الدفاتر هل كل مرة ننفذ طريقتك هذا سيحتاج منا الكثير، أما طريقة الماكرو فتمتلك من خلالها قاعدة بيانات هائلة، والكلمة التي تكتبها لن تكتبها مرة أخرى حياكم الله رابط هذا التعليق شارك More sharing options...
المستشار22 قام بنشر يناير 24, 2008 الكاتب مشاركة قام بنشر يناير 24, 2008 السلام عليكم ورحمة الله وبركاته أخي العزيز : أبو أكرم .... قاعدة البيانات التي أرسلت لى (( مشكورا)) توقفت عن العمل بعد مرور اكثر من شهر وكانت رائعة جدا لا أدري ماهو السبب ؟؟؟ مع العلم انني نقلتها الى حاسب أخر فلم تعمل ....ولم تستبدل الكلمات التي اريد وفقك الله لكل خير في الدنيا ولآخرة رابط هذا التعليق شارك More sharing options...
ابو ناره قام بنشر فبراير 7, 2008 مشاركة قام بنشر فبراير 7, 2008 مشكوووووووووووووووووووووووووووور رابط هذا التعليق شارك More sharing options...
شحادة بشير قام بنشر فبراير 10, 2008 مشاركة قام بنشر فبراير 10, 2008 السلام عليكم ورحمة الله وبركاته لا أعلم سبب المشكلة ولا أتمنى أن لاتكون قد عطبت بالخطأ كان عليك أن تبقي نسخة منها جانبا كل فترة أرجو منك أن تتكرم برفعها لننظر فيها رابط هذا التعليق شارك More sharing options...
alwed2 قام بنشر فبراير 28, 2008 مشاركة قام بنشر فبراير 28, 2008 الاخ ابو اكرم احتاج مساعدتك بتعديل قاعدة بيانات sql بلأمكان فتحها بالورد المشكله طبقت الشرح ومانضاف الماكرو في المستند جربت على مستند جديد للمحاوله ونفس المشكله يليت تتواصل معي على المسنجر al-kaltham5@al-wed.cc وجزاك الله خير رابط هذا التعليق شارك More sharing options...
أبو مريم قام بنشر مارس 5, 2008 مشاركة قام بنشر مارس 5, 2008 بارك الله فيك رابط هذا التعليق شارك More sharing options...
محمود كامل قام بنشر يوليو 10, 2010 مشاركة قام بنشر يوليو 10, 2010 كل المرفقات عندى لا تعمل ولا أستطيع تحميلهاالرجاء دلونى ماذا أفعل رابط هذا التعليق شارك More sharing options...
محمود كامل قام بنشر يوليو 10, 2010 مشاركة قام بنشر يوليو 10, 2010 السلام عليكم ورحمة الله وبركاته لا أعلم سبب المشكلة ولا أتمنى أن لاتكون قد عطبت بالخطأ كان عليك أن تبقي نسخة منها جانبا كل فترة أرجو منك أن تتكرم برفعها لننظر فيها ألأخ أبو أكرم المرفقات عندى لا تعمل ماذا أفعل لكى استطيع تحميلها رابط هذا التعليق شارك More sharing options...
egyptian_eg قام بنشر يوليو 11, 2010 مشاركة قام بنشر يوليو 11, 2010 السلام عليكم عليك بتحميل برنامج winrar لفك ضغط الملفات www.rarlabs.com رابط هذا التعليق شارك More sharing options...
egyptian_eg قام بنشر يوليو 11, 2010 مشاركة قام بنشر يوليو 11, 2010 موضوع مرتبط و به استكمال لفكرة الأخ أبو أكرم ، لتطبيق الفكرة على عدد من الملفات مرة واحدة http://www.officena.net/ib/index.php?showtopic=29408 رابط هذا التعليق شارك More sharing options...
شريف خضير قام بنشر ديسمبر 25, 2010 مشاركة قام بنشر ديسمبر 25, 2010 شكراً وجارى تجربة الطريقة . رابط هذا التعليق شارك More sharing options...
شحادة بشير قام بنشر أبريل 3, 2011 مشاركة قام بنشر أبريل 3, 2011 السلام عليكم تم رفع الملف من جديد لمن طلبه حياكم الله بحث واستبدال.rar رابط هذا التعليق شارك More sharing options...
ahmed saif قام بنشر ديسمبر 4, 2011 مشاركة قام بنشر ديسمبر 4, 2011 مجهود رائع رابط هذا التعليق شارك More sharing options...
تومي محمد قام بنشر نوفمبر 21, 2012 مشاركة قام بنشر نوفمبر 21, 2012 أخي ابو أكرم عملت نفس الخطوات وعدة مرات حتى اتمكن من تفادي الخطا الذي يظهرمباشرة بعد تحديد قاعدة البيانات وها هو الخطا الذي يعينه وورد داخل الكود(باللون الاحمر) Dim doc As Document Dim db As DAO.Database Dim rs As Recordset Dim f As FileDialog Set f = Application.FileDialog(msoFileDialogFilePicker) f.Show If f.SelectedItems(1) = "" Then GoTo l Set doc = Application.ActiveDocument Set db = OpenDatabase(Name:=f.SelectedItems(1)) Set rs = db.OpenRecordset(Name:="TATA") While Not rs.EOF With doc.Content.Find .ClearFormatting .Text = rs(0) With .Replacement .ClearFormatting .Text = rs(1) End With .Execute Replace:=wdReplaceAll, _ Format:=True, MatchCase:=True, _ MatchWholeWord:=True End With rs.MoveNext Wend rs.Close db.Close Exit Sub l: رابط هذا التعليق شارك More sharing options...
saeedelarabi قام بنشر يناير 24, 2015 مشاركة قام بنشر يناير 24, 2015 السلام عليكم أستاذ ابو اكرم جراك الله خيرا لكن اذا انا زودت خانات جديدة لاتتغير ما الحل ؟ رابط هذا التعليق شارك More sharing options...
lerby-7 قام بنشر أكتوبر 18, 2018 مشاركة قام بنشر أكتوبر 18, 2018 شكراااا لك رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.