بحث مخصص من جوجل فى أوفيسنا
![]()
Custom Search
|

عاطف عبد العليم محمد
03 عضو مميز-
Posts
236 -
تاريخ الانضمام
-
تاريخ اخر زياره
السمعه بالموقع
18 Goodعن العضو عاطف عبد العليم محمد

البيانات الشخصية
-
Gender (Ar)
ذكر
-
Job Title
accountant
اخر الزوار
بلوك اخر الزوار معطل ولن يظهر للاعضاء
-
لاب جديد لايفتح ملف ماكرو
عاطف عبد العليم محمد replied to عاطف عبد العليم محمد's topic in منتدى الاكسيل Excel
الاوفيس وجدته 64 bit ولم تحل المشكلة للاسف اذا في اقتراحات اخرى -
لاب جديد لايفتح ملف ماكرو
عاطف عبد العليم محمد replied to عاطف عبد العليم محمد's topic in منتدى الاكسيل Excel
جزاك الله خير الجزء الثاني من اجابتك كنت فعلتها أما الجزء الاول ف اذا تكرمت مزيد من الشرح هل الاوفيس نفسه فيه اصدار 64 او 32؟ -
السلام عليكم ورحمة الله وبركاته اشتريت لاب جديد إمكانياته عاليه و نقلت ملف كبير من الكمبيوتر على فلاشة ثم للاب و اللاب لايفتحه الا بعد عدة محاولات للإصلاح ولما يفتحه يكون قد حذف كل الماكرو بالملف جربت ملفات أخرى احجامها كبيرة. نفس النتيجةي بينما يفتح عادي ملف حجمه صغير وفيه ماكرو لاحظت ان اللاب 32 بايت والكمبيوتر كان 64 بايت و اسماء الصفحات في الماكرو تظهر كعلامات استفهام. لايظهر الاسم الاوفيس بالكمبيوتر اظنه 2016 باللاب الاوفيس قد يكون أحدث اصدار ويندوز 11 فضلا اقتراح حل للمشكلة شكرا لكم وفق الله الجميع لكل خير
-
المواريث بالاكسل النسخة الحديثة
عاطف عبد العليم محمد replied to hadadakhaled's topic in منتدى الاكسيل Excel
جزاك الله خير اردت ان ادخل مسألة المتوفي انثي لم يظهر الزوج ك وارث ؟ -
السلام عليكم ورحمة الله وبركاته لدي هذا الكود واصله من هذا المنتدى ــ اسأل الله ان يغفر لكل من ينفع الناس فيه اريد ان يكون الكود لتلوين خلفية الخلايا و في نفس الوقت تلوين النص بلون مختلف يكون واضح دائما ( لا يتشابه مع خلفية الخلية ) Option Explicit Sub kh_Color1() Dim Obj As Object Dim cel As Range Dim MyColor Dim MyInteriorColor Dim txt As String Dim lr As Long, R As Long, mr As Long Application.ScreenUpdating = False ''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''' Set Obj = CreateObject("Scripting.Dictionary") ''''''''''''''''''''''''''''' MyColor = 900000 MyInteriorColor = 800444 ''''''''''''''''''''''''''''' Sheets("قيود اليومية").Select lr = Cells(Rows.Count, "a").End(xlUp).Row mr = Cells(Rows.Count, "g").End(xlUp).Row Range("a6:j" & lr).Interior.Color = MyInteriorColor Application.ScreenUpdating = False For R = 6 To lr txt = Trim(Cells(R, "g")) If Len(txt) Then If Obj.exists(txt) Then Range(Cells(R, "a"), Cells(R, "j")).Interior.Color = Obj(txt) Else Obj.Add txt, MyColor Range(Cells(R, "a"), Cells(R, "j")).Interior.Color = MyColor MyColor = MyColor + 7000111 End If End If Next Set Obj = Nothing ''''''''''''''''''''''''''''' Application.ScreenUpdating = True End Sub
-
جمع عمود والمعيار بعمود آخر
عاطف عبد العليم محمد replied to عاطف عبد العليم محمد's topic in منتدى الاكسيل Excel
تمام بارك الله فيكم وجزاكم الله خيرا -
السلام عليكم ورحمة الله وبركاته الموضوع بسيط حاولت البحث عن الحل ولم أفلح عندي عمود فيه ارقام حساب وعمود آخر فيه المبالغ اريد جمع المبالغ لعدة ارقام حساب متوالية مثلا من 1 الى 3 المرفق فيه توضيح و لكن البيانات الفعلية كثيرة ف ارجو ان يكون الرد صالح لذلك و ان امكن بكود يكون افضل شاكرا لكم جمع مشروط.xlsx
-
مشكلة عدم ظهور استبدال القيم والتعليقات
عاطف عبد العليم محمد replied to عاطف عبد العليم محمد's topic in منتدى الاكسيل Excel
اخي هشام جزاك الله خيرا -
مشكلة عدم ظهور استبدال القيم والتعليقات
عاطف عبد العليم محمد replied to عاطف عبد العليم محمد's topic in منتدى الاكسيل Excel
جزاكما الله خيرا محمد هشام. إيهاب عبد الحميد واعتذر لكم ــ سأوضح المطلوب ـ لا يهمني البحث في التعليقات ــ يهمني البحث عن الخانات التي تحتوي على قيم كالآتي =2+5 ( 7 ) ــ اذا بحث عن 7 فلا تظهر نتيجة أذا كانت خلية تحتوي على 7 وخلية أخرى تحتوي على 7 ولكن نتيجة جمع 2+5 مثلا فعند البحث والاستبدال يتعامل مع 7 ولا يتعامل مع الخلية التي بها 7 نتيجة جمع 2+5 المطلوب بحث في الورقة النشطة في نطاق محدد وقد وجدت هذا الكود لتحديد النطاق Set rng = Application.InputBox("Select a range", "Title Here", Type:=8) -
مشكلة عدم ظهور استبدال القيم والتعليقات
عاطف عبد العليم محمد replied to عاطف عبد العليم محمد's topic in منتدى الاكسيل Excel
شكرا جزيلا إيهاب عبد الحميد لتوضيح المشكلة اكثر اذا بحث عن 3 فلا مشكلة اذا كانت الخلية تحتوي 3 اما اذا كانت تحتوي على =1+2 فيعطي لم يتمكن من العثور عليها اذا تفضلت ــ إن تيسر لك تعديل الكود بحيث يظهر امكانية ادخال input box القيمة التي يبحث عنها القيمة المراد استبدالها نطاق التغيير بدلا من جعله في كل الصفحة -
مشكلة في حفظ الملف مفاجأة اريد حلها لو سمحتم
عاطف عبد العليم محمد replied to اوفيس 2003's topic in منتدى الاكسيل Excel
حيث لم يجاوبك احد ف اتجرأ على الاجابة اذا كان لديك نسخة أخرى من الملف backup ف اشتغل عليها و انسخ الشغل الجديد فيها من الملف التالف او افتح ملف جديد و انقل له كل ما في الملف التالف ممكن بالنسخ وحاول بنقل الصفحات اليه و اجعل دائما عندك نسخة احتياطية من الملف حدثها يوميا ــ ابحث عن كود يحفظ لك الملف احتياطيا وفقك الله -
اخي محمد هشام. جزاك الله الف خير بعتذر لك ظننت ان وصفي للمشكلة من البداية كان كاف و بعتذر لك مرة اخرى لعدم السرعة في ارفاق الملفات وعلى كل حال الملف كان كبيرا ( عدم السرعة بسبب انني انشغلت في البحث عن حل لمشكلة حقيقية أخرى ولم اجد لها حل حتى في المنتديات الأجنبية ، فتحت بها موضوع جديد لعلك تتفضل وتمر عليه و تفيدنا مرة أخرى ) والاجابة الاخيرة منكم اخذت منها ما يفيد حل المشكلة بارك الله فيكم و شكرا لكم