خالد الشاعر قام بنشر فبراير 5, 2009 قام بنشر فبراير 5, 2009 برجاء المساعد ة و الافادة عندما انسخ ارقام من ملف اكسل و اضعة فى ملف اخر به ماكرو مثل التقريب لا يعمل على الخلية المنسوخة هل من حل لهذه المشكلة وشكراً
طارق محمود قام بنشر فبراير 6, 2009 قام بنشر فبراير 6, 2009 السلام عليكم المفروض ألا يوجد مشكلة فيما تقول هلا ارفقت الملف الذي به ماكرو مع الإشارة للخلايا التي واجهتك بها المشكلة
خالد الشاعر قام بنشر فبراير 10, 2009 الكاتب قام بنشر فبراير 10, 2009 السادة الخبراء عندى مشكلة مع لصق الارقام داخل الملف مع وجود ماكرو التقريب و معادلة التحقق من الصحة برجاء الافادة عن حل هذه المشكلة وشكرا _________.rar
سامح حجاب قام بنشر فبراير 10, 2009 قام بنشر فبراير 10, 2009 السلام عليكم ورحمة الله وبركاته أخي في الله أنا لست خبير ولكن بالنسبة لمعادلة التقريب فأرجو التوضيح عنها فلم أجد معادلة للتقريب أو لم أفهمها أما بالنسبة للصق الأرقام التي تريدها داخل الملف فعندما تلصقها بالطريقة العادية تلصق معها تنسيقها ولكن هناك طريقة اخرى للصق حتى تعمل معك معادلة التحقق من الصحة وهي عن طريق الضغط كليك يمين ثم لصق خاص وتغيير الكل إلى القيم أي أنك لا تريد من الأرقام التي ستلصقها بالعمود غير قيمتها فقط وأتمنى من الله أن أكون قد استطعت مساعدتك
خالد الشاعر قام بنشر فبراير 10, 2009 الكاتب قام بنشر فبراير 10, 2009 الاخ العزيز بالنسبة للتقريب فهو ماكرو عند كتابة عدد اقل من النصف مثال 1.2 يقرب الى 1.5 و لكن مع اللصق لا يعمل و بالنسبة التحقق من الصحة لا تعمل الطريق التى ذكرتها اريد عند كتابة رقم اكبر من 20 يعطى لون مختلف وشكرا على الرد و الاهتمام
سامح حجاب قام بنشر فبراير 10, 2009 قام بنشر فبراير 10, 2009 بالنسبة لعمود التقريب لي فيه حل وبالنسبة لموضوع التحقق من الصحة الطريقة صحيحة ولكني جربتها على قيمة واحدة ونجحت ولكن عدة قيم لم تنجح ولكن عندما تنسخ العمود في ملف آخر وتجرب نفس الطريقة ستجدها تعمل مع عدة قيم
خالد الشاعر قام بنشر فبراير 10, 2009 الكاتب قام بنشر فبراير 10, 2009 اذا كان فى حل اين هو وشكرا على الاهتمام وجزاك الله خيراً
هادى محمد المامون سالم قام بنشر فبراير 13, 2009 قام بنشر فبراير 13, 2009 بسم الله الرحمن الرحيم لتطبيق الكود على ملف اخر اضغط Alt +F11 ثم انسخ الكود و انقله بملفك الجديد و بالنسبه للتقريب الكود لا يعمل على جميع الاعمده و لكنه يعمل على العمود من 11 حتى 56 كم هو بالكود Private Sub Worksheet_Change(ByVal Target As Range) col = Target.Column If col = 11 Or col = 12 Or col = 15 Or col = 16 Or col = 19 Or col = 20 Or col = 23 Or col = 24 Or col = 27 Or col = 28 Or col = 31 Or col = 32 Or col = 35 Or col = 36 Or col = 39 Or col = 41 Or col = 43 Or col = 44 Or col = 47 Or col = 48 Or col = 51 Or col = 52 Or col = 55 Or col = 56 Then End Sub و يمكنك اضافه ارقام الاعمده التى تريد العمل بها و للعلم انا لاحبذ التعامل مع داله Worksheet_Change مع هذا العدد الكبير مع الاعمده , جرب نسخ مجموعه خلايا و لزقها ستجد ان الملف هنج السلام عليكم
خالد الشاعر قام بنشر فبراير 16, 2009 الكاتب قام بنشر فبراير 16, 2009 استاذى الفاضل المقصود عند لصق من ملف اخر فى ملف به هذه المكرو لا يعمل المكرو فهل يوجد علاج لهذه المشكلة ولكم جزيل الشكر
خالد الشاعر قام بنشر فبراير 17, 2009 الكاتب قام بنشر فبراير 17, 2009 يا استاذة المنتدى 105 زائر ولكن لا يوجد حل برجاء الرد للاهمية شكراً
amoudi قام بنشر فبراير 17, 2009 قام بنشر فبراير 17, 2009 السلام عليكم جرب الملف بالنسبة للتقريب ما التنسيق الشرطي لازم كمان تحوله على الماكرو علشان تتجاوز هذه المشكلة تحياتي _________.rar
خالد الشاعر قام بنشر فبراير 18, 2009 الكاتب قام بنشر فبراير 18, 2009 اشكرك جداً الحل ممتاز ولكن لو تكرمت ممكن توضح كيفية عمل التنسيق بالماكرو ولك جزيل الشكر
amoudi قام بنشر فبراير 18, 2009 قام بنشر فبراير 18, 2009 السلام عليكم سجل ماكرو بالتنسيق وضيف الكود جق الماكرو مع الكود السبق تحياتي
خالد الشاعر قام بنشر فبراير 18, 2009 الكاتب قام بنشر فبراير 18, 2009 استاذى العزيز حاولت التعديل على التنسيق الشرطى المرفق منكم بحيث اثبت خلية الرقم الرجع مث A20 بدل من رقم 20 ولكن يعطى مشكلة فى الماكرو فبرجاء الافادة ولكم جزيل الشكر
خالد الشاعر قام بنشر فبراير 18, 2009 الكاتب قام بنشر فبراير 18, 2009 استاذى العزيز يوجد فى الماكرو المرجع و هو 20 Formula1:="20" اريد ان يكون رقم الخلية بدل القيمة و مرفق ملف موضح وشكرا _________.rar
خالد الشاعر قام بنشر فبراير 18, 2009 الكاتب قام بنشر فبراير 18, 2009 اشكرك جداً ولكن يوجد نفس المشكلة الخاصة بالصق اذا تم نسخ اى رقم و تم لصقة لا يعمل الماكرو علية اشكرك جداً
amoudi قام بنشر فبراير 18, 2009 قام بنشر فبراير 18, 2009 السلام عليكم انا اريد انك تفهم الكود قبل لا تطبق ,, . حاول تتعرف على المشكلة وكيف خطوات حلها . على العموم مرفق ملف معدل . انا في الخدمة لأي استفسار . _________.rar
خالد الشاعر قام بنشر فبراير 18, 2009 الكاتب قام بنشر فبراير 18, 2009 اشكرك جدا يا استاذى العزيز ولكنى مبتدا فى الماكرو فابرجاء توضيح التعديل وما الغرض من اضافة with و end with ولك كل التقدير و الاحترام و جزاك الله كل خير
amoudi قام بنشر فبراير 18, 2009 قام بنشر فبراير 18, 2009 هذه طريقة اختصار للوصول للشي مثلا لوعندك الكود التالي Range("D953:D968").FormatConditions.Delete Range("D953:D968").FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, Formula1:=[D952] Range("D953:D968").FormatConditions(1).Interior.ColorIndex = 34 فتلاحظ تكرار object الى هو range("d953:D968")1 فيمكن كتابة بالشكل التالي With Range("D953:D968") .FormatConditions.Delete .FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, Formula1:=[D952] .FormatConditions(1).Interior.ColorIndex = 34 End With وهذا عزيزي يجعل قراء الكود اسهل والكود اصغر والأهم من ذلك كله انه يوفر الأستهلاك في الوصول لأي object (يعني شي في البرمجمة ما يهمك الآن) تحياتي
خالد الشاعر قام بنشر فبراير 18, 2009 الكاتب قام بنشر فبراير 18, 2009 اشكرك على سرعة الرد و الشرح للماكرو وجزاك الله كل خير شكراً
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.