اذهب الي المحتوي
أوفيسنا

نجوم المشاركات

  1. عبد العزيز البسكري

    • نقاط

      13

    • Posts

      1352


  2. محمد حسن المحمد

    • نقاط

      11

    • Posts

      2220


  3. الصـقر

    الصـقر

    الخبراء


    • نقاط

      10

    • Posts

      1836


  4. سليم حاصبيا

    سليم حاصبيا

    أوفيسنا


    • نقاط

      9

    • Posts

      8723


Popular Content

Showing content with the highest reputation on 11/17/15 in مشاركات

  1. السلام عليكم ورحمة الله وبركاته البغض منا قد يرغب فى ازالة التنسيق الشرطى عن خلية أو نطاق لسبب ما مع ازالة أو ابقاء آثاره من تنسيقات مثل لون الخلايا و لون و حجم الخط .... الخ و بإذن الله تعالى سأعرض عليكم ــ اخوتى ــ كودين يؤديان هذه المهمة الأول : يقوم بازالة التنسيق الشرطى مع ازالة آثاره من نطاق محدد : Sub RemovingCFandEffects() ' Removing Conditional Formats and the Effects Dim Rng As Range Set Rng = Sheets("Sheet1").Range("A1:C10") Application.ScreenUpdating = False Rng.FormatConditions.Delete Application.ScreenUpdating = True MsgBox ("The Conditional Formats in The Range " & Rng.Address & vbCrLf & " has been Removed and The Effects") End Sub الثانى : يقوم بازالة التنسيق الشرطى من نطاق محدد مع ابقاء آثاره من تنسيقات كما هى أو بعبارة أخرى تحويل التنسيقات الشرطية الى تنسيقات عادية : Sub RemovingCFbutNotEffects() ' Removing Conditional Formats but not the Effects Dim Rng As Range, C As Range Set Rng = Sheets("Sheet1").Range("A1:C10") Application.ScreenUpdating = False For Each C In Rng ' Rng.SpecialCells(xlCellTypeAllFormatConditions) With C .Interior.Color = .DisplayFormat.Interior.Color .Font.FontStyle = .DisplayFormat.Font.FontStyle .Font.Color = .DisplayFormat.Font.Color .FormatConditions.Delete End With Next Application.ScreenUpdating = True MsgBox ("The Conditional Formats in the Range " & Rng.Address & vbCrLf & "has been removed but Not the Effects ") End Sub أتمنى أن يكون موضوعا سهلا وخفيفا ونافعا لكم ... تقبل الله منا و منكم صالح الأعمال والسلام عليكم ورحمة الله وبركاته Removing Conditional Formats.rar
    3 points
  2. السّلام عليكم و رحمة الله و بركاته بارك الله فيك أستاذنا القدير " الصّقر " على الشّرح الكافي و الشّافي .. و بعد إذنك طبعًا .. حاولت إضافة محاولة بسيطة لتقريب الفكرة أكثر بجميع ملفاته المستقبلية للأخ الكريم " محمد عبد السّلام " .. التاكست بوكس بملفك تسمّى بهذا الاسم : إذن بكل أكواد ملفك يجب عليك تسميتها بهذا الاسم : فائق إحتراماتي fatorrr.rar
    3 points
  3. ثالثا :- التعرف على خصائص الــ Frame من شاشة الخصائص اثناء عملية التصميم لمشاهدة خصائص الــ Frame شاهد الصوره التاليه وهذه صوره مكبره لخصائص الفريم هنمسك اهم الخصائص والاكثر شيوعا فى الاستخدام ونبدا نشرح بالتفصيل الخاصيه (Name) :- Name هو اسم الـ Frame المستخدم فى الاكواد وعند انشاء اى Frameيقوم الفيجوال بيسك بأعطاء اسم افتراضى له Frame1واذا قمنا بعمل Frame ثانى فأن الفيجوال بيسك يعطى له اسم افتراضى Frame2 وانا افضل عدم تغيير اسماء Frameالافتراضيه التى عرفها الفيجوال بيسك فعندما نريد كتابه كود خاص بالعنصر Frame فيجب علينا الالتزام بالاسم الموجود فى الخاصيه Name --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( Back Color):- هذه الخاصيه تتيح للمستخدم تغيير لون خلفية الـ Frame على اليسار يوجد سهم اضغط عليه ستظهر لك قائمة يمكنك من خلالها اختيار اللون المناسب كما يحلو لك لا نحتاج الى ارفاق صوره للتوضيح لانه نفس الشرح اللى عملناه قبل كدا فى شرح الليبل والتكس بوكس والكمبوبوكس --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( Border Color):- هذه الخاصيه تتيح للمستخدم تغيير لون حدود الـ Frame على اليسار يوجد سهم اضغط عليه ستظهر لك قائمة يمكنك من خلالها اختيار اللون المناسب كما يحلو لك --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( Caption ):- هذه الخاصيه تتيح للمستخدم كتابة عنوان للـــ Frame --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( Enabled ):- هذه الخاصيه تحمل خيارين true و False عند اختيارك true سوف يكون الــ Frame والعناصر بداخله متاحه امام المستخدم عند عمل الفورم وهو الاختيار الافتراضى للفيجوال عند اختيارك False سوف يكون الــ Frame والعناصر بداخله غير متاحه امام المستخدم عند عمل الفورم يعنى هيكون محمى --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( Font ):- هذه الخاصيه تتيح للمستخدم تغيير نوع وحجم وسماكة الخط لعنوان الـ Frame ( الذى يتم كتابته بالخاصيه Caption ) على اليسار يوجد سهم اضغط عليه ستظهر لك قائمة يمكنك من خلالها اختيار نوع وحجم وسماكة الخط كما يحلو لك --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( ForeColor ):- هذه الخاصيه تتيح للمستخدم لون الخط لعنوان الـ Frame ( الذى يتم كتابته بالخاصيه Caption ) ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( Height ):- هذه الخاصيه تتيح للمستخدم التحكم فى ارتفاع الـ Frame فيمكنك أما من خلال التصميم السحب بالماوس للاسفل لتحديد الارتفاع للـ Frameأو كتابة رقم للارتفاع فى الخاصيه Height ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( Left ):- هذه الخاصيه تتيح للمستخدم التحكم فى بعد الـ Frame عن الضلع الايسر من الفورم ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( Top ):- هذه الخاصيه تتيح للمستخدم التحكم فى بعد الـ Frame عن الضلع الاعلى من الفورم ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( Width ):- هذه الخاصيه تتيح للمستخدم التحكم فى عرض الـ Frame فيمكنك أما من خلال التصميم السحب بالماوس يميناً أو يساراً لتحديد عرض الـ Frameأو كتابة رقم للعرض فى الخاصيه Width ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( Visible ):- وهذه الخاصيه تتيح للمستخدم التحكم فى ظهور او عدم ظهور الــ Frame عند عرض الفورم وعند الضغط على السهم المجاور لها ستجد لها خيارين True و False عندد اختيار True سوف يظهر الـ Frame على الفورم عند فتحه ( وهذا هو الخيار الافتراضى من الفيجوال بيسك ) وعند اختيار False ٍسوف يختفى الـ Frame على الفورم عند فتحه يعنى هيكون غير ظاهر ومخفى لا يراه المستخدم ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِSpecial Effect ):- هذه الخاصيه للـ Frame تعطى اشكال مبهره ومميزه للـ Frame على اليسار ستجد سهم اضغط عليه ستظهر لك قائمة وبها خمس خيارات جرب الخيارات ثم اختر الشكل المناسب لذوقك ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِScrollBars ):- هذه الخاصيه من أهم الخصائص للـ Frame لانها تتيح للمستخدم عمل سكرول بار رأسى أو أفقى أو رأسى وأفقى أو بدون سكرول بار نهائيا شاهد الصوره التاليه الاختيار الاول : - fmScrollBarsNone وهو الاختيار الافتراضى للفيجوال وهو جعل الـ Frame بدون سكرول بار لا رأسى ولا أوفقى الاختيار الثانى:- fmScrollBarsHorizontal وهو جعل الـ Frame باسكرول بار افقى الاختيار الثالث:- fmScrollBarsVertical وهو جعل الـ Frame باسكرول بار راسى الاختيار الرابع:- fmScrollBarsBoth وهو جعل الـ Frame باسكرول بار رأسى و أفقى ( الاتنين معا ) ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِScrollHeight ):- عند اختيارك من الخاصيه ScrollBars الاختيار الثالث fmScrollBarsVertical أو الاختيار الرابع fmScrollBarsBoth فيجب تحديد ارتفاع الاسكرول بار بكتابة رقم فى الخاصيه ScrollHeight ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِScrollWidth ):- عند اختيارك من الخاصيه ScrollBars الاختيار الثانى fmScrollBarsVertical أو الاختيار الرابع fmScrollBarsBoth فيجب تحديد عرض الاسكرول بار بكتابة رقم فى الخاصيه ScrollWidth ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِScrollLeft ):- هذه الخاصيه مرتبطه بالخاصيه ScrollWidth تتيح لنا تحديد كم يبعد الاسكرول بار الافقى عن عن الضلع الايسر للفريم عند فتح الفورم ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِScrollTop ):- هذه الخاصيه مرتبطه بالخاصيه ScrollHeight فهى تتيح لنا تحديد كم يبعد الاسكرول بار الراسىعن عن الضلع الاعلى للفريم عند فتح الفورم ------------------------------------------------------------------------------------------------------------------------ طبعا انا عارف ان الخاصيه ScrollWidth & ScrollLeft & ScrollHeight & ScrollTop غير واضحه لكم لذالك هنقوم بشرح مثال عملى حتى تتضح لنا الصوره كامله عن هذه الخصائص فى عمل اسكرول بار والتحكم فيه مثال 1 :- عمل اسكرول بار رأسى والتحكم فى شريط التمرير فى هذه الصوره نريد عما اسكرول بار رأسى للفريم شاهد اول خطوه لماذا لم يظهر شريط التمريرداخل الاسكرول بار ؟؟؟؟؟ سامع ياسر العربى بيرد عليا وبيقول لان الخاصيه ScrollHeight = 0 هقوله برافوووووووووو طيب يالا نكتب رقم ارتفاع الاسكرول بار وليكن 100 الترجمه الحرفيه لكلمة ScrollHeight تعنى ارتفاع شريط التمرير شاهد الصوره بعد ما نكتب رقم ارتفاع الاسكرول ارتفاعه =100 للاسف يا عم ياسر كتبنا ارتفاعه 100 ومازال لا يوجد شريط تمرير ترى ما السبب ؟؟ رد عليا الاخ عبدالعزيز البسكرى قاعد صاحى معانا ومركز وقال لان ارتفاع الفريم فى الخاصيه Height = 270 وارتفاع شريط التمرير 100 برافووووو فأرتفاع الفريم اكبر من ارتفاع شريط التمرير لذالك لا يظهر الفايده من شريط التمرير الوصول الى المساحه اللى اكبر من ارتفاع الفريم نفسة لانها غير ظاهره فتعالو نكتب ارتفاع شريط التمرير وليكن 270 ونشوف ايه اللى هيحصل شاهد الصوره شاهد الصوره ارتفاع الفريم يساوى ارتفاع شريط التمرير = 270 لذالك ظهر شريط التمرير لكن لما تيجى تحركه مفيش مساحه مساحه هيتحرك فيها جرب تضغط على السهم اللى بالاعلى او الاسهم اللى بالاسفل اللى موجود بالاسكرول بار ستجد ان الشريط لا يتحرك لانه مساوى للفريم بالارتفاع فمش قادر يتحرك مفيش مساحه يتحرك فيها طيب تعالو نكتب ارتفاع شريط التمرير وليكن 300 ونشوف ايه اللى هيحصل شاهد الصوره طيب كدا عرفنا ازاى نعمل اسكرول بار راسى من الخاصيه ScrollBars وذالك من خلال اختيار fmScrollBarsVertical وعرفنا ايضا ازاى نتحكم فى ارتفاع الشريط من الخاصيه ScrollHeight عايزين نعرف ازاى نتحكم فى موضوع الشريط عند فتح الفورم يعنى فين تكون بدايته هنا تاتى اهمية الخاصيه ScrollTop تعالو نشوف الصوره دى كدا انتهينا من المثال الاول وعرفنا ازاى نعمل اسكرول بار رأسى ونتحكم فى ارتفاع شريط التمرير وكمان نتحكم فى بداية الشريط عند فتح الفورم ---------------------------------------------------------------------------------------------------------------- مثال 2 :- عمل اسكرول بار أفقى والتحكم فى شريط التمرير فى هذه الصوره نريد عما اسكرول بار رأسى للفريم شاهد اول خطوه لماذا لم يظهر شريط التمريرداخل الاسكرول بار ؟؟؟؟؟ سامع ابويوسف بيرد عليا وبيقول لان الخاصيه ScrollWidth = 0 هقوله برافوووووووووو طيب يالا نكتب رقم ارتفاع الاسكرول بار وليكن 200 الترجمه الحرفيه لكلمة ScrollWidth تعنى عرض شريط التمرير شاهد الصوره بعد ما نكتب رقم العرض للاسكرول عرضه = 200 للاسف يا ابويوسف كتبنا عرض 200 ومازال لا يوجد شريط تمرير ترى ما السبب ؟؟ رد عليا الاخ ابوالبراء قاعد صاحى معانا ومركز وقال لان عرض الفريم فى الخاصيه Width = 360 وعرض شريط التمرير 200 برافووووو فعرض الفريم اكبر من عرض شريط التمرير لذالك لا يظهر الفايده من شريط التمرير الوصول الى المساحه اللى اكبر من عرض الفريم نفسة لانها غير ظاهره فتعالو نكتب عرض شريط التمرير وليكن 360 ونشوف ايه اللى هيحصل شاهد الصوره شاهد الصوره عرض الفريم يساوى عرض شريط التمرير = 360 لذالك ظهر شريط التمرير لكن لما تيجى تحركه مفيش مساحه مساحه هيتحرك فيها جرب تضغط على السهم اللى بالايمن او الاسهم اللى بالايسر اللى موجود بالاسكرول بار ستجد ان الشريط لا يتحرك لانه مساوى للفريم بالعرض فمش قادر يتحرك مفيش مساحه يتحرك فيها طيب تعالو نكتب عرض شريط التمرير وليكن 450 ونشوف ايه اللى هيحصل شاهد الصوره طيب كدا عرفنا ازاى نعمل اسكرول بار افقى من الخاصيه ScrollBars وذالك من خلال اختيار fmScrollBarsHorizontal وعرفنا ايضا ازاى نتحكم فى ارتفاع الشريط من الخاصيه ScrollWidth عايزين نعرف ازاى نتحكم فى موضوع الشريط عند فتح الفورم يعنى فين تكون بدايته هنا تاتى اهمية الخاصيه ScrollLeft تعالو نشوف الصوره دى كدا انتهينا من المثال الثانى وعرفنا ازاى نعمل اسكرول بار افقى ونتحكم فى عرض شريط التمرير وكمان نتحكم فى بداية الشريط عند فتح الفورم ---------------------------------------------------------------------------------------------------------------- محلوظه مهمه جدا : انا شرحت على الصوره التاليه وهى كما نرى لا تحتاج عمل اسكرول بار لان كافه العناصر اللى بالفريم ظاهره وعرض الفريم مناسب لها لذالك انصح بأنه لا نلجأ لعمل سكرول بار سواء افقى او راسى او الاتنين معا الا اذا كان العناصر بالفريم كتيره وانا مش عايز اكبر حجم الفريم حتى لا يأخذ مساحه على الفورم فوقتها نلجأ للاسكرول بار **************************************************************************************** الى لقاء اخر من حلقات سلسلة علمنى كيف اصطاد ان شاء الله هيكون عن التعامل مع خصائص الــ Frame فى لغة البرمجه انتظرونا تقبلوا تحياتى
    3 points
  4. استعمل المعادلة IFERROR انظر الى المثال المرفق Use IFERROR.zip
    2 points
  5. جرب هذا الملف القائمة المنسدلةتستجيب لاي تعديل او زيادة في البيانات قائمه منسدله مطاطة.zip
    2 points
  6. السلام عليكم بعد إذن إخوانى الافاضل الاستاذ القدير / ابو خليل والاستاذ القدير / احمد يعقوب والاستاذ القدير / ياسر العربى وبعد هذه الحلول الرائغة اسمحوا لى بهذة الاضافة على الاخ / ناصر ان يضع كود التنسيق لآخى القدير الحاج / احمد يعقوب فى بداية كود استدعاء البيانات ليتم استدعاؤها على النحو المطلوب ليصبح الكود هكذا Sub MACRO1() 'äÓÎ ÊäÓíÞ æÑÞÉ 2 Çáì ßá ÇæÑÇÞ ÇáãáÝ Dim RN1 As Range, SH, ER ' Sheets("æÑÞÉ2").Select Sheets("æÑÞÉ2").Range("A9:J9").Copy For SH = 2 To Sheets.Count ER = Sheets(SH).UsedRange.Rows.Count Set RN1 = Sheets(SH).Range("A8:J" & ER) RN1.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False RN1.PasteSpecial Paste:=xlPasteColumnWidths Next SH Application.CutCopyMode = False End Sub Sub test() Dim Col As New Collection, Arr, i As Long, J As Long On Error Resume Next Arr = Sheet1.Range("A7:J" & Sheet1.Cells(Rows.Count, "A").End(xlUp).Row).Value For i = 2 To UBound(Arr, 1) For J = 2 To UBound(Arr, 2) Col.Add Key:=J & Chr(2) & Arr(i, 1), Item:=Arr(i, J) Next J Next i With Sheet2.Range("A7:J" & Sheet2.Cells(Rows.Count, "A").End(xlUp).Row) Arr = .Value For i = 2 To UBound(Arr, 1) For J = 2 To UBound(Arr, 2) Arr(i, J) = Col(J & Chr(2) & Arr(i, 1)) Next J Next i .Value = Arr End With End Sub Sub Bring_Data() Dim i As Long Dim K As Long Dim LastRow As Integer Dim SourceSheet As Worksheet Set SourceSheet = ThisWorkbook.Sheets("sheet3") LastRow = SourceSheet.Range("e" & Rows.Count).End(xlUp).Row Application.ScreenUpdating = False Range("E7").Select K = 0 For i = 8 To LastRow + 8 Step 20 SourceSheet.Range("E" & i & ":V" & i + 19).Copy Range("A" & K + i).Select ActiveSheet.Paste K = K + 7 Next Application.ScreenUpdating = True End Sub Sub Clear_Data() Dim LastRow As Integer LastRow = Range("a" & Rows.Count).End(xlUp).Row Range("A8:V" & LastRow).Clear End Sub Sub Clear_Sheet2_Data() Dim LastRow As Integer LastRow = Sheet2.Range("a" & Rows.Count).End(xlUp).Row Sheet2.Range("B8:J" & LastRow).Clear End Sub Sub Call_All() Dim myConfirm myConfirm = MsgBox("åá ÊÑíÏ äÓÎ ÇáÊäÓíÞÇÊ", vbYesNo) If myConfirm = vbYes Then MACRO1 myConfirm = MsgBox("åá ÊÑíÏ ÇÓÊÏÚÇÁ ÇáÈíÇäÇÊ", vbYesNo) If myConfirm = vbYes Then test myConfirm = "" myConfirm = MsgBox(" åá ÊÑíÏ ÊÑÍíá ÇáÈíÇäÇÊ", vbYesNo) If myConfirm = vbYes Then Sheet5.Select Bring_Data Sheet2.Select End If myConfirm = "" myConfirm = MsgBox("åá ÊÑíÏ ãÓÍ ãÍÊæíÇÊ äØÇÞ ÇáÈíÇäÇÊ", vbYesNo) If myConfirm = vbYes Then Clear_Sheet2_Data myConfirm = "" myConfirm = MsgBox("åá ÊÑíÏ ÇáÈÏÁ Ýì äÞá ÇáÈíÇäÇÊ áØÈÇÚÉ ÇáßÔæÝ", vbYesNo) If myConfirm = vbYes Then StartTimer End Sub أرجو أن أكون قد وفقت فى تقديم مايصبوا اليه أخى الفاضل ناصر المصرى تقبلوا جميعا وافر احترامى وجزاكم الله خيرا
    2 points
  7. السّلام عليكم و رحمة الله و بركاته و هنا أُؤكّد أستاذي القدير و أخي المحترم " حسام " على ما ذكرتَهُ أنتَ بسلسلة شروحاتك .. باستحسانك تسمية الأشياء بمسمّياتها أنا معك بهذا الطّرح و هذا الطلب .. و هذا أمر مهم يجب الوقوف عليه أو حتى المطالبة به مستقبلاً .. هذا منتدى تعليمي بالدرجة الأولى و الأخيرة .. تقوم أنتَ بتسمية التاكست بوكس حسب هواك مثلا " حمامَة " أجيء أنا لفتح الملف لأتعلّم منه و أستفيد من أكواده كمبتديء .. يضيع كل وقتي في البحث عن ماهية هذه " الحمامة " هل هي حمامة فعلاً .. هل هي تاكست بوكس أم ليبل أم كومبوبوكس أم ليست بوكس .... هل طارتْ أم حطّتْ بينما عندما نسمي الكائنات بأسمائها الافتراضية ... مباشرة سأذهب إلى التاكست بوكس أتمنى أنّ الفكرة وصلت .. على كل حال هذه ليست فكرتي بل هي فكرة ألأخ الغالي و الأستاذ الحبيب " الصقر " فائق إحتراماتي
    2 points
  8. السّلام عليكم و رحمة الله و بركاته الأستاذ القدير و الأخ الغالي " محمّد حسن المحمّد " سأخرج من الموضوع قليلاً لأقول لك : و الله و الله و الله .. أنت أحد أولئك الأشخاص الذّين أتمنّى و أدعو الله مخلصًا أن أتعرّف عليهم عن قرب .. كم تمنيت أنّك مثلاً مقيم بجنبي أو جاري ... أو .. أو .. بارك الله فيك على التّشجيع الطيّب و الكلمات الطيّبة .. أحسن الله إليك مثلما تحسن إلينا دومًا بكلماتك الشّذيّة فائق إحتراماتي لشخصك المحترم السّلام عليكم و رحمة الله و بركاته " حسام عيسى " ألف شكر يا غالي على الكلمات الطيّبة من انسان أكثر من طيّب و صلت لك و نفذ رصيد إعجاباتي .. سأمنحها لك حينَ ميْسرة بإذن الله فائق إحتراماتي لشخصك المحترم
    2 points
  9. تفضل استاذى الفاضل هذا هو الكود المستخدم Private Sub UserForm_Initialize() TextFind.SetFocus End Sub اعتذر منك حاولت رفع الملف لكن للاسف يبدو فى مشكله فى رفع الملفات
    2 points
  10. اغرى امرؤ يوما غلاما جاهلا ...... بنقوده كيما ينال به ضرر قال ائتني بفؤاد أمك يا فتى ...... ولك الجواهر والدراهم والدرر فمضى وأغمد خنجرا في صدرها ..... والقلب أخرجه وعاد على الأثر لكنه من فرط سرعته هوى ........ فتدحرج القلب المضرج إذ عثر ناداه قلب الأم وهو معفر ...... ولدي حبيبي هل أصابك من ضرر؟؟؟؟ فكأن هذا الصوت رغم حنوه ...... غضب السماء على الغلام قد انهمر فارتد نحو القلب يغسله بما ...... لم يأتها أحد سواه من البشر واستل خنجره ليطعن نفسه ...... طعنا فيبقى عبرة لمن اعتبر ويقول يا قلب انتقم مني ولا ...... تغفر فإن جريمتي لا تغتفر ناداه قلب الأم كف يدا ولا ...... تذبح فؤادي مرتين على الأثر :( :( :(
    2 points
  11. حدد اي خلية من العامود E يجب ان تكون لغة الكيبورد اجنبية مع الاستمرار بالضغط على Alt اضغط على حرف O ثم الحرف D يظهر لك مربع حواري اختر منه Custom و سوف ترى ماذا فعلت
    2 points
  12. الصفر لا يظهر فقط في العامود E بعد الاذن من اخي ياسر العربي المعادلة التي اخي ياسر وضعتها تضغ فراغاً اذا كانت الخلية التي تقابلها في العامود A فارغة مما ينعكس سلباً على المعادلات اللاحقة اذا كنت مرتبطة بهذه المعادلة (لا تستطيع الحمع مثلاً) show_hide_zero.zip
    2 points
  13. بعد اذن الغاليين بقي نفترض ان الراجل عاوز خلايا فاضية وخلايا فيها صفار بقي نعمل ايه رخامة بقي وانا رخم نشتغل بحبيبة الغاليين IF New Microsoft Office Excel Worksheet.rar
    2 points
  14. أخي الكريم وائل .. بعد إذن أخي وحبيبي في الله زيزو العجوز
    2 points
  15. كنترول المدرسة.rar هذا ما استطعت ان اتوصل اليه فى برنامج الكنترول الخاص بى هل هذا هو الطريق الصحيح ام لا مع العلم انى ما كنت بعرف اعمل اى حاجة على الاكسس قبل مشاركتى فى المنتدى والفضل لله وحده ثم للاساتذة برجاء المساعدة لاكماله
    1 point
  16. السّلام عليكم و رحمة الله و بركاته أستاذي الغالي " ياسر العربي " .. و تبقى حلولك دائمًا أكثر دقّة من محاولات الحلول لدينا بارك الله فيك على تدخّلاتك المميّزة و المفيدة و التي تحل كثير من مشاكلنا المعقّدة جزاك الله خيرًا و زادك من علمه و فضله فائق إحتراماتي سيّدي الفاضل
    1 point
  17. يا جماعة الخير ..محدش يعرف رقم تليفون علاء رسلان أو يقدر يتواصل معاه ...
    1 point
  18. الله عليك أخى الحبيب الغالى / عبد العزيز رائــــــــــــــــــــــــــــع جدا جزاك الله خيرا
    1 point
  19. لقد سبقتني اخي الغالي عبد العزيز وكنت سأرفق نصك المتحرك هذا ولكن دائما ما اتأخر جزاك الله كل الخير اما بالنسبة للعمل علي الفورم التاني والعمل في نفس الوقت علي الشيت يرجى تطبيق مثلما قال اخي عبد العزيز حدد الشيت الثاني واختار show modal=False
    1 point
  20. حبيبى الغالى على قلبى أستاذى ومعلمى القدير / ياسر خليل ألف ألف شكر على كلماتك الرائعة وتشجيعك الدائم لى وأعزرنى أخى الحبيب لا أدرى أن الموضوع مكرر من قبل فأنا أحاول جاهدا البحث عن كل ماهو مفيد وجديد لهذا المنتدى العظيم الذى أكن له كل إحترام وتقدير وأقر له بالجميل فأنا تعلمت منه الكثير والكثير وما زلت أتعلم من أساتذة هذا الصرح العلمى الهائل وبعدين أنا مقدرش أزعل من أخويا ربنا يديم المعزة والأخوة بيننا تقبل خالص تحياتى وتقديرى
    1 point
  21. السلام عليكم - اسعد الله أوقاتكم : الزملاء المحاسبون – الأساتذة المحترمون مرفق ملف اكسل يحوي برنامجين عن احتساب نسب التحليل المالي والتحليل المقارن ( النسب الرئيسية والهامة فقط ) مع استخلاص تفسير لكل نسبة البرامج تحتوي معادلات بسيطة جدا – والغاية هي كيفية استثمار الاكسل في استخلاص نسب التحليل المالي الفكرة بالأصل لاساتذتي: ( عبد الله المدني + محمد فوزي سلام ) / + ياسرالحافظ البرامج تحتوي النسب الرئيسية ويمكن للمستثمر إضافة النسب التي تلزم لعمل مؤسسته حيث أرفقت ملف وورد بمعظم نسب التحليل المالي مع شروحات وتفسيرات وفقكم الله ياسر الحافظ " ابو الحارث " تحليل مالي اكسل.rar
    1 point
  22. مشاركة بجوار حل أخي الكريم أحمد الفلاحجي حيث عند إدراج رقم في حقل Quantity بالنموذج الفرعي سيتم خصم الرقم المدرج من الكمية الموجودة بالمخزن وأيضا أضفت في النموذج الرئيسي فكرة عمل الكود من خلال زر خصم وإضافة للكميات بشكل مباشر تحياتي للجميع new-----edit.rar
    1 point
  23. اتفضل اخى محاوله منى لعلها تفى بالغرض بعد ماتخلص اضغط على زر التحديث up_new.rar
    1 point
  24. السّلام عليكم و رحمة الله و بركاته اعتذر منك لم اتابع المضوع مشغول شوية أخي المحترم " حسام واخى وحبيبى عبدالعزيز بك البسكرى باركم الله فيكم ونفع بكم الاسلام والمسلمين وبارك الله لكم في علمكم وزادكم فضلا وعلما
    1 point
  25. بارك الله فيك جزاك الله خيرًا و زادها بميزان حسناتك و جعل كل كلمة تتفوّهها بألف حسنة فائق إحتراماتي
    1 point
  26. اخى واستاذى الفاضل عبدالعزيز ما شاء الله عليك دائما تاتى بما هو جديد ومفيد جزاكم الله خيرا وجعل اعمالك فى ميزان حسناتك تقبل تحياتى
    1 point
  27. ارفق مثال عملي لما تريد كما الملف عندك وحط بيانات وهميه ليتم التطبيق عليه مع شرح مبسط تحياتي
    1 point
  28. السلام عليكم إخوتي الكرام ..أخي الحبيب عبد العزيز الذي يفاجئنا كل يوم بمفاجآت سارة تارة في موضوع وتارة في موضوع آخر ...وكلها من النوادر وكأنك غواص ماهر يغوص في بحر الإكسيل ليخرج درراً وجواهر يتزين بها أمثالي من المبتدئين ... سر ونحن معك بخطىً مباركة أخي الحبيب ...والسلام عليكم.
    1 point
  29. استاذى واخى وحبيبى عبدالعزيز بك البسكرى مشكور يا غالى على التوضيح جزاكم الله خيرا الاستاذ الفاضل محمد عبدالسلام لو حضرتك متابع سلسلة شروحات الفورم كنت عرفت ان الاسم اللى بالخاصيه Name هو اللى بيتكتب بالاكواد تقبلوا تحياتى
    1 point
  30. ماشاء الله عليك أستاذ محمد وجزاك الله خيرا وزادك الله من علمه
    1 point
  31. السلام عليكم أستاذنا الكريم ...بل أنت أستاذنا ونحن نتشرف بك صحيح هذه المعادلة التي لايتخلل قائمتها المنسدلة فراغات أو في نهايتها...جزاكم الله خير...أحسنتم أحسن الله إليكم.
    1 point
  32. السلام عليكم ورحمة الله بارك الله فيك أخي وحبيبي عبد العزيز البسكري على العمل الرائع والمتميز جميل جداً العمل منذ فترة قدنشرت موضوع فيه "ايقاف التشغيل واعادة التشغيل" من خلال الملف فقط وليس الفورم رابط الموضوع لأثراء الجمالية وروح التنافس لنشر العلم والمعرفة بين الجميع اطفاء واعادة تشغيل الكبيموتر من الملف ولكن ماشاء الله تبارك الله ملف توجد فيه احترافية اكبر تقبل تحياتي ومروري
    1 point
  33. ألف شكر .. بارك الله فيك لمرورك العطر فائق إحتراماتي السّلام عليكم و رحمة الله و بركاته ألف شكر أستاذي القدير " مختار حسين محمود " على المرور العطر و الكلمات الطيّبة لا ينكر الجميل إلاّ جاحد .. و أنت أحد الذين لهم فضل كبير .. كبير جدًّا .. في جعلي أعشق الاكسل بارك الله فيك .. جزاك الله خيرًا و زادك من علمه و فضله فائق إحتراماتي السّلام عليكم و رحمة الله و بركاته ألف شكر أستاذي القدير " ياسر خليل أبو البراء " على الكلمات الطيّبة و المشجّعة مرورك العطر أضفى لموضوعي معنى أكثر .. و قيمةً أكبر كيف لا .. و أنت أحد أولئك الذين أدين لهم بالكثير نظير ما قدّموه لي و لغيري في سبيل بناء هذا الصّرح التّعليمي الكبير .. بتنوير معلوماتنا و تنوير منتدياتنا بكل سخاء و عطاء بارك الله فيك .. جزاك الله خيرُا و جعل كل حرف ممّا تقدّمه لنا بألف حسنة فائق إحتراماتي
    1 point
  34. انسخ دي وحطها في المكان Type فوق واضغط اوك [=0]"";General
    1 point
  35. الأب والأستاذ القدير / محمد حسن المحمد ألف ألف مليون مبرورك على هذه الترقية المستحقة وألف شكرا للأستاذ الحبيب / عبد العزيز على هذه اللفته الطيبة وأهنئه أيضا ونهنئ أنفسنا بترقيته المستحقة مع مزيد من التقدم والرقى والإزدهار تقبلوا خالص تحياتى وتقديرى
    1 point
  36. أشكرك أخي الحبيب ياسر وأرجو الله أن يهب لك من فضله ويجزل لك العطاء وهو خير مسؤول . لك مني أطيب التحيات وأجمل الأمنيات. والسلام عليكم أستاذي الكريم وأخي الحبيب محمد الريفي أشكرك على هذه الإطلالة البهية وتمنياتك الطيبة وأرجو الله أن يجزيك بخير منها..والسلام عليكم أشكرك أستاذي وأخي الحبيب إبراهيم وأدعو الله أن نبارك لك بتحقيق أمانيك الغالية..بارك الله لك بعمرك والسلام عليكم أخي وأستاذي الحبيب الصقر ...نِعْمَ المعلم والأخ الذي أشكره على كل أعماله...لك مني أطيب وأجمل الأمنيات والسلام عليكم
    1 point
  37. ألف مبروك استاذي و اخي محمد الى المزيد من التقدم والمثابرة
    1 point
  38. دا طلع في حد رخم تاني غيري اهو خلاص ياعم انا ارفق ليك الدروس كهدايا مني ياعم ولو نسيت اني ارفق يبقي كانك مسمعتش مني البوقين دول ماشي ياحبي اه لا توعد وانت فرحان - لا تقرر وانت غضبان خليها معلقة كدا
    1 point
  39. تفضل جعفر 260.الشبكة الإستدلالية للمرتبات.accdb.zip
    1 point
  40. اخى الحبيب والغالى ياسر والله موضوع Pdf ده بقى مهمة اللى لازمه الشرح انا والله ماعندى نسخه من الشرح انا بشرح مباشرة على الموقع فى مره النور قطع بدون حفظ ورجعت عملت اعاده للشرح مره اخرة كله والله وعلى قلبى زى العسل لان اللى عايز يعمل شئ وعند اصرار هيعمله وانا عايز اقدم شئ واللى عايز يتعلم هيعرف ازاى يحتفظ بالدرس ويستفيد منه دا لو كان لازمه لكن اوعدك ان شاء الله بعد الانتهاء من الشروحات نعمله كتاب الكترونى بأذن الله وطبعا ده مش هيكون لوحدى هيكون بهمتكم معانا تقبل تحياتى
    1 point
  41. السلام عليكم بعد اذن الاخوه الاحبه هذا حل اخر باستخدام التنسيقات الرقمية المخصصه فقط انسخ هذا الكود وطبق كما فى الصوره mm/dd
    1 point
  42. حقك ياحبيبي يا ابو يوسف تسلم ياغالي ظبطت معاك بقيت محترف
    1 point
  43. السلام عليكم يرجى الاطلاع على الملف المرفق إثراء لما تقدم به أخي العزيز ياسر...اعذرني أخي ياسر..فمنكم نستفيد. السلام عليكم.rar
    1 point
  44. تفضل التحويل Fail = 0 If [eslam] < 50 Then Fail = 1 Else Fail = 0 End If If [arab] < 50 Then Fail = Fail + 1 Else Fail = Fail + 0 End If If [engl] < 50 Then Fail = Fail + 1 Else Fail = Fail + 0 End If If [comp] < 50 Then Fail = Fail + 1 Else Fail = Fail + 0 End If If [Math] < 50 Then Fail = Fail + 1 Else Fail = Fail + 0 End If جعفر
    1 point
  45. اخي هذا الفيديو يشرح عمل ملف تنفيذي (ملف exe) https://www.youtube.com/watch?v=q4Q5FHL1ROY وهذا الرابط به مطلوبك ان شاء الله https://drive.google.com/file/d/0By-6mWvbY8PWWUUzeG00TXp4a0E/view?pli=1
    1 point
  46. الف شكر وانا مستفيد الله طول عمرك ابو خليل
    1 point
  47. تنسيقات ملفات Excel التنسيق الملحق الوصف Excel Workbook xlsx. تنسيق الملفات الافتراضي الذي يستند إلى XML لكلٍ من Excel 2010 وExcel 2007. لا يمكنه تخزين تعليمات الماكرو البرمجية لـ Microsoft Visual Basic for Applications (VBA)‎‎ أو أوراق الماكرو لـ Microsoft Office Excel 4.0 ‎(.xlm)‎.‎ Excel Workbook ‎(code)‎ xlsm. تنسيق الملف الذي يستند إلى XML والممكّن بماكرو لكلٍ من Excel 2010 وExcel 2007. يخزّن تعليمات الماكرو البرمجية لـ VBA أو أوراق الماكرو لـ Excel 4.0 (.xlm)‎. Excel Binary Workbook xlsb. تنسيق الملف الثنائي (BIFF12) لكلٍ من Excel 2010 وExcel 2007. Template xltx. تنسيق الملف الافتراضي لقالب Excel لكلٍ من Excel 2010 وExcel 2007. لا يمكنه تخزين تعليمات الماكرو البرمجية لـ VBA أو أوراق الماكرو لـ Excel 4.0 ‏(xlm.). Template (code)‎ xltm. تنسيق الملف الممكّن بماكرو لقالب Excel لكلٍ من Excel 2010 وExcel 2007. لا يمكنه تخزين تعليمات الماكرو البرمجية لـ VBA أو أوراق الماكرو لـ Excel 4.0 ‏(xlm.). Excel 97- Excel 2003 Workbook xls. تنسيق الملف الثنائي (BIFF8) في Excel 97 - Excel 2003. Excel 97- Excel 2003 Template xlt. تنسيق الملف الثنائي (BIFF8) في Excel 97 - Excel 2003 لقالب Excel. Microsoft Excel 5.0/95 Workbook xls. تنسيق الملف الثنائي (BIFF5) في Excel 5.0/95. XML Spreadsheet 2003 xml. تنسيق الملف XML Spreadsheet 2003 (XMLSS)‎. XML Data xml. تنسيق بيانات XML. Excel Add-In xlam. تنسيق الوظيفة الإضافية الذي يستند إلى XML والممكّن بماكرو ماكرو لكلٍ من Excel 2010 وExcel 2007. الوظيفة الإضافية هي عبارة عن برنامج تكميلي مصمم لتشغيل تعليمات برمجية إضافية. يعتمد هذا التنسيق استخدام مشاريع VBA وأوراق الماكرو في Excel 4.0 ‏(xlm.). Excel 97-2003 Add-In xla. وظيفة Excel 97-2003 الإضافية، برنامج تكميلي مصمم لتشغيل تعليمات برمجية إضافية. يعتمد هذا التنسيق استخدام مشاريع VBA. Excel 4.0 Workbook xlw. تنسيق ملف Excel 4.0 الذي يحفظ أوراق العمل وأوراق المخططات وأوراق الماكرو فقط. يمكنك فتح مصنف بتنسيق الملف هذا في Excel 2010، لكن لا يمكنك حفظ ملف Excel بتنسيق الملف هذا.
    1 point
  48. أخواتي وأخواني الأحباء تحية طيبة وبعد ،،،،،،،،،،،،،،،، أهديكم اليوم برنامج ادارة الحسابات الاصدار الثاني وأتمنى أن ينال رضاكم وأتمنى عليكم ان تبدوا أرائكم حتى يتم تطوير البرنامج ويستفيد منه الجميع . ملاحظة : بالنسبة الى اضافة أو تعديل القيود اليومية يتم من خلال جداول مؤقتة فإذا كان القيد سليم ويراد حفظه أو تحديثه يتم نقله الى الجداول الاصلية وحذفه من الجداول المؤقتة. وتقبلوا مني فائق الاحترام والتقدير Accounts_2008.rar
    1 point
  49. سلمت يداك اخي كمال ان كلمة عمل رائع تعني الاجحاف بحقك ولا تكفي لوصف مجهودك فعلا انه مجهود جبار وعمل اكثر من رائع اخي كمال لو تكرمت فلي ملاحظة صغيرة وهي خاصية البحث حيث ان التركيز يعود الى مربع البحث وبالتالي لا يمكن كتابة اكثر من حرف وعلى كل الاحوال برنامج كامل والكمال لله وما شاء الله عليك وعلى عملك جعلة الله في ميزان حسناتك وجزاك الله الف خير
    1 point
×
×
  • اضف...

Important Information