بارك الله فيك أخي الغالي محمد المصري
من أول مشاركة إفادة للجميع قبل طلب المساعدة ..
جزيت خيراً على المعلومات القيمة التي تفيد المبتدئين بشكل كبير
عايزين منك متابعة في حلقات افتح الباب ..
http://www.officena.net/ib/index.php?showtopic=56941
أخي دا مجرد ملف صوتي فقط يعمل عند فتح الإكسيل ، ولن يفتح الإكسيل إلا بعد الانتهاء منه
أما بالنسبة لطبك يوجد بالمنتدى برنامج المحاسب على ما أعتقد به هذه الخاصية
قم بالبحث عن البرنامج وشوف إذا كان هو دا المطلوب أولا لا
السلام عليكم ورحمة الله وبركاته
إخواني الكرام في الصرح العملاق أوفيسنا (الذي يعتبر بمثابة الأم التي تحتضن أبناء الوطن جميعهم)
أقدم لكم موضوع بسيط جدا في كيفية تظليل عمود وصف الخلية النشطة بناءً على رغبة الأخ الحبيب أحمد غانم (حفظه الله ورعاه)
إذا أردت تنفيذ الفكرة بنفسك قم بعمل الآتي :
أولاً حدد خلايا ورقة العمل بأكملها ..مش صعبة يا أحمد
ثانياً روح للتنسيق الشرطي ..واختار New Rule ثم Use a formula to determine which cells to format ثم اكتب المعادلة التالية :
=COLUMN()=COLUMN(INDIRECT($P$1))
اضغط Format ثم التبويب Fill واختار اللون اللي على مزاجك (يا لذيذ يا رايق)
كرر نفس الخطوات السابقة مرة أخرى واكتب المعادلة التالية أيضاً ..
=ROW()=ROW(INDIRECT($P$1))
ثالثاً : كليك يمين على ورقة العمل ثم View Code واكتب الكود التالي :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = False
Range("P1").Value = Target.Address
Application.ScreenUpdating = True
End Sub
رابعاً ودي أهم خطوة : بس خلاص
جرب الملف المرفق .. في الملف المرفق قمت بتلوين بعض النطاقات ، وعمل تنسيق شرطي للتأكد من أن الكود لا يؤثر بأي حال على التنسيق الشرطي الموجود ولا على الخلايا التي تم تلوينها من قبل ، ويسمح أيضاً بتلوين أي خلايا تريدها
Highlight Activecell's Row And Column V2.rar
بعد إذن أخي الحبيب جلال ..
أنا حقيقة لا أحب اختلاط الموضوعات ، فكنت أفضل إذا كان لأحد طلب معين أو تعديل على ملف أن يكون في موضوع منفصل .. حتى يكون المنتدى أكثر ترتيبا وتنظيماً ، وأسهل في البحث عن موضوعات محددة
لذا أعتذر عن الإنخراط ها هنا في موضوع الأخ أحمد غانم
والأخ الحبيب أحمد أرجو ألا تسيء فهمي ..كل الحكاية إننا عايزين نتعلم تنظيم الموضوعات ، حتى لا تختلط الأمور ببعضها ..
عموما سأقوم بعمل موضوع جديد إن شاء الله الآن للأستاذ أحمد غانم .. لمتابعة موضوعه ..
تقبلوا تحياتي
المشكلة يبدو أنها عامة ..من إمبارح
مش عارف أنا دلوقتي تم تسجيل خروجي .. فيبدو أن العمل قائم على حل المشكلة أو ربما تكون قد تم حلها بالفعل سنجرب ونرى
تقبل تحياتي أيها الصقر المبدع
فكرة في منتهى الروعة والجمال ..بارك الله فيك أخي الحبيب حسام
تعديل تافه في المعادلة عشان لو جربت سريلة الفاتورة هتوصل لحد 1/10 فقط ..
للتعديل على المعادلة فقط غير الرقم الأخير قبل علامة +1 بهذا الشكل:
=1 & "/" & MID(K7,3,2)+1
الرقم كان واحد غيرته لـ 2 .. ولو عايز سريلة أكتر من 100 فاتورة خلي الرقم 3
بس بصراحة فكرة حلوة جداً ..
تسلم يا أبو الأفكار ..
أخي إبراهيم
المعادلة في المشاركة رقم #18 ؟أفضل .حيث يمكن الجمع بين الثلاثة أعمدة في عمود واحد للنتائج أما إذا طبقت المعادلة :
=IF($D3=1,MAX(F$2:F2,$A$2)+$E3,IF($D3=2,MAX(F$2:F2,$B$2)+$E3,IF($D3=3,MAX(F$2:F2,$C$2)+$E3,"")))
فإنها لن تعطي نتائج صحيحة
فين الجدول ؟ يبدو أن إرفاق الملفات لا يعمل ..
جربت من شوية إرفاق ملف ولم يعمل معي ...
وبعدين ايه حكايتك مع الجداول المتحركة ..أنا حاسس إن الموضوع بقا في بحر الرمال العظيم