ابو شرف قام بنشر أغسطس 26, 2007 مشاركة قام بنشر أغسطس 26, 2007 بسم الله الرحمن الرحيم الأخوان الأعزاء في المنتدى سلام الله عليكم ورحمة وبركاته اخواني الأعزاء ارجو الأٍستفسار حول امكانية امتلاك صلاحية فتح ملف اكسل لعدة مرات فقط اي ممكن ان اعطي الى شخص يفتح الملف خمس مرات والى شخص اخر في مكان اخر عشرة مرات والى شخص مائة مرة ( مع شرح وافي لهذه الميزة ) ارجو مساعدتي مع التقدير والأحترام . وفقكم الله لما فيه الخير وألأصلاح . اخوكم المحاسب ابو شرف 26/8/2007 رابط هذا التعليق شارك More sharing options...
أكرم الغامدي قام بنشر أغسطس 30, 2007 مشاركة قام بنشر أغسطس 30, 2007 أخي أبو شرف لعل هذا الكود يفيدك فيما تريد Option Explicit Private Sub Form_Load() retvalue = GetSetting("A", "0", "Runcount") GD$ = Val(retvalue) + 1 SaveSetting "A", "0", "RunCount", GD$ If GD$ > 3 Then ' الرقم (3) يحدد عدد مرات التشغيل MsgBox ("انتهت مدة تشغيل البرنامج ،،، قم بشراء النسخة الكاملة من المنتج") Unload Me End If End Sub رابط هذا التعليق شارك More sharing options...
h63 قام بنشر أغسطس 30, 2007 مشاركة قام بنشر أغسطس 30, 2007 اخى العزيز السلام عليكم ورحمة الله برجاء اخىالعزيز اذا كنت تعلم اين نضع الكود مع الشرح بالتفصيل الممل هشام رابط هذا التعليق شارك More sharing options...
band قام بنشر أغسطس 31, 2007 مشاركة قام بنشر أغسطس 31, 2007 أخي أبو شرف لعل هذا الكود يفيدك فيما تريد Option Explicit Private Sub Form_Load() retvalue = GetSetting("A", "0", "Runcount") GD$ = Val(retvalue) + 1 SaveSetting "A", "0", "RunCount", GD$ If GD$ > 3 Then ' الرقم (3) يحدد عدد مرات التشغيل MsgBox ("انتهت مدة تشغيل البرنامج ،،، قم بشراء النسخة الكاملة من المنتج") Unload Me End If End Sub اين تستخدم .. نرجو الشرح للأهمية رابط هذا التعليق شارك More sharing options...
أكرم الغامدي قام بنشر سبتمبر 1, 2007 مشاركة قام بنشر سبتمبر 1, 2007 (معدل) تستخدم في الكود الخاص بفتح كتاب الاكسيل Private Sub Workbook_Open() End Sub وإن شاء الله في حال أصلح المنتدى تحميل الملفات سأضع مثال على ذلك إذا لم تتوصلوا للحل. تم تعديل سبتمبر 1, 2007 بواسطه أكرم الغامدي رابط هذا التعليق شارك More sharing options...
band قام بنشر سبتمبر 1, 2007 مشاركة قام بنشر سبتمبر 1, 2007 تستخدم في الكود الخاص بفتح كتاب الاكسيل Private Sub Workbook_Open() End Sub وإن شاء الله في حال أصلح المنتدى تحميل الملفات سأضع مثال على ذلك إذا لم تتوصلوا للحل. لم اتمكن من استخدامه اعمل لنا مثال على الاكسل وارفعه لنا ولو في موقع اخر وشكرا لك رابط هذا التعليق شارك More sharing options...
أكرم الغامدي قام بنشر ديسمبر 16, 2007 مشاركة قام بنشر ديسمبر 16, 2007 أعتذر عن التأخير. ___________________.rar رابط هذا التعليق شارك More sharing options...
m_abdelsamad قام بنشر ديسمبر 26, 2007 مشاركة قام بنشر ديسمبر 26, 2007 أخوى أكرم يبدو لي أن هذا الملف لا يعمل وقد حاولت معة كثيراً فيسمح لي بفتحة أكثر من 5 مرات فبرجاء مراجعة الكود ورفع الملف الصحيح وجزاك الله خيراً رابط هذا التعليق شارك More sharing options...
h63 قام بنشر ديسمبر 26, 2007 مشاركة قام بنشر ديسمبر 26, 2007 السلام عليكم اخى العزيز مشكور وحياك الله الملف يعمل جيد جدا هشام رابط هذا التعليق شارك More sharing options...
h63 قام بنشر ديسمبر 26, 2007 مشاركة قام بنشر ديسمبر 26, 2007 السلام عليكم اخى ابو اكرم ما الحل الان غيرت فى الكود وفعلا قفل بعد ثلاث مرات ولا اعرف كيف افتحه مره اخرى وكلما حملته من جديد يعطنى نفس الرسالة رابط هذا التعليق شارك More sharing options...
شحادة بشير قام بنشر ديسمبر 26, 2007 مشاركة قام بنشر ديسمبر 26, 2007 السلام عليكماخى ابو اكرم ما الحل الان غيرت فى الكود وفعلا قفل بعد ثلاث مرات ولا اعرف كيف افتحه مره اخرى وكلما حملته من جديد يعطنى نفس الرسالة وعليكم السلام ورحمة الله وبركاتهآخذ عقلك أبو أكرم هذا الأخ أكرم الغامدي وليس أبو أكرم لكن ما تخجل إليك الطريقة افتح أي ملف إكسل واذهب إلى: أدوات---ماكرو----الأمان اجعل الأمان مرتفع جداً ومن التبويب ناشرون موثوقون ألغ علامة الصح من أمام "الثقة بالوصول إلى مشروع فيجوال بيسك" الآن احفظ التغييرات اذهب إلى ملف الأخ أكرم الغامدي سيفتح معك ويعطيك رسالة تعطيل الماكرو اضغط عليها وادخل لمشروع الفيجول عن طريق: أدوات---ماكرو---محرر فيجوال بيسك في الورقة المسماة thisworkbook ستجد هذه العبارة If GD > 3 Then غير رقم 3 واجعله مثلاً 1000 احفظ التغييرات كاملة الآن عد للماكرو وأعده كما كان في المستوى المنخفض بالإضافة إلى الثقة بمشروع فيجوال بيسك وهكذا سيفتح الملف ولن غلق إلا بعد أن تفتحه أكثر من 1000 تحياتي لك رابط هذا التعليق شارك More sharing options...
m_abdelsamad قام بنشر ديسمبر 27, 2007 مشاركة قام بنشر ديسمبر 27, 2007 أخي أبو أكرم مشكور التوضيح لكن ما تقولة يلغى فائدة الكود بمعنى لو انني أدخلت هذا الكود لحماية برنامج معين يمكن للمستخدم إختراقة من خلال تعطيل الماكرو وهذا ما لا نريده. مشكور أخى وأرجو معالجة الكود بطريقة لا تمكن المستخدم من الدخول على الملف حتى لو تم تعطيل الماكرو . شكراً وجزاك الله خيراً. رابط هذا التعليق شارك More sharing options...
شحادة بشير قام بنشر ديسمبر 27, 2007 مشاركة قام بنشر ديسمبر 27, 2007 أخي أبو أكرم مشكور التوضيح لكن ما تقولة يلغى فائدة الكود بمعنى لو انني أدخلت هذا الكود لحماية برنامج معين يمكن للمستخدم إختراقة من خلال تعطيل الماكرو وهذا ما لا نريده. مشكور أخى وأرجو معالجة الكود بطريقة لا تمكن المستخدم من الدخول على الملف حتى لو تم تعطيل الماكرو . شكراً وجزاك الله خيراً. أخي الحبيب لا يوجد شيء اسمه حماية مطلقةباختصار: حماية الأوفيس من أضعف الحمايات ويمكن الوصول إليها بسهولة لقد تم فك حماية ملفات أصعب من هذا بالكثير الكثير بالرغم من ذلك ففكرة الأخ أكرم رائعة ومفيدة وليس كل شخص يجيد الفك حياك الله رابط هذا التعليق شارك More sharing options...
m_abdelsamad قام بنشر ديسمبر 27, 2007 مشاركة قام بنشر ديسمبر 27, 2007 شكراً وجزاك الله خيراً رابط هذا التعليق شارك More sharing options...
أكرم الغامدي قام بنشر ديسمبر 28, 2007 مشاركة قام بنشر ديسمبر 28, 2007 (معدل) أخي أبو أكرم أنت فعلا تأخذ العقل حبيبي بارك الله فيك. أشكرك على المساندة والمساعدة لإخوانك بهذا المنتدي الذي نحن فيه لهذا السبب. وأشكر كل من قام بالمرور والتعليق في الموضوع. وأحب أن أضيف معلومة صغيرة: أنه يوجد برنامج يتحكم بأي ملف إكسل تريده ليجعله كملف تنفيذي دون الحاجة لتمكين وحدات الماكرو. وهذه ملفات محسّنة بالمرفقات. الملف (3Times Only) نفس الملف القديم ولكن به تغيير بسيط. الملف (New Chance) يعطي فرصة جديدة أي يصفر العملية من جديد. 3_Times_Only.rar New_Chance.rar تم تعديل ديسمبر 28, 2007 بواسطه أكرم الغامدي 1 رابط هذا التعليق شارك More sharing options...
شحادة بشير قام بنشر ديسمبر 28, 2007 مشاركة قام بنشر ديسمبر 28, 2007 وأحب أن أضيف معلومة صغيرة:أنه يوجد برنامج يتحكم بأي ملف إكسل تريده ليجعله كملف تنفيذي دون الحاجة لتمكين وحدات الماكرو. السلام عليكم وربارك الله بك أخي الحبيب هل تقصد برنامج لتحويل الإكسل لملف تنفيذي (هذا أعرفه) إن كنت تقصد غيره فنرجو التوضيح بو ركت أخي الحبيب رابط هذا التعليق شارك More sharing options...
gelani قام بنشر ديسمبر 28, 2007 مشاركة قام بنشر ديسمبر 28, 2007 رائع جداً جداً وفقكم الله جميعاً وهنا أود أسأل الأخ أكرم الغامدي وفقه الله عن الملف التنفيذي الذي يغني عن استخدام الماكرو مع الشرح إذا كان ذلك ممكن . حيث أنني أضطر الى تخفيض مستوى الأمان وفي حالة تشغيل البرنامج على جهاز به الأمان مرتفع يتوقف عمل البرنامج إلى أن يتم تخفيض مستوى الأمان وتشغيل البرنامج من جديد . تحياتي وتقديري . رابط هذا التعليق شارك More sharing options...
nahas soft قام بنشر يناير 15, 2008 مشاركة قام بنشر يناير 15, 2008 شكرا رابط هذا التعليق شارك More sharing options...
أكرم الغامدي قام بنشر مارس 1, 2008 مشاركة قام بنشر مارس 1, 2008 أعتذر عن التأخير في الرد، وذلك بسبب عدم إعلامي من قبل المنتدى بالمشاركات الجديدة على البريد، ولولا أنني أرجع كل فترة للمواضيع القديمة المشترك بها لما علمت عن وجود هذه الردود. وأحب أن أضيف معلومة صغيرة:أنه يوجد برنامج يتحكم بأي ملف إكسل تريده ليجعله كملف تنفيذي دون الحاجة لتمكين وحدات الماكرو. السلام عليكم وربارك الله بك أخي الحبيب هل تقصد برنامج لتحويل الإكسل لملف تنفيذي (هذا أعرفه) إن كنت تقصد غيره فنرجو التوضيح بو ركت أخي الحبيب نعم أخي الحبيب هذا ما أقصده. رائع جداً جداً وفقكم الله جميعاً وهنا أود أسأل الأخ أكرم الغامدي وفقه الله عن الملف التنفيذي الذي يغني عن استخدام الماكرو مع الشرح إذا كان ذلك ممكن . حيث أنني أضطر الى تخفيض مستوى الأمان وفي حالة تشغيل البرنامج على جهاز به الأمان مرتفع يتوقف عمل البرنامج إلى أن يتم تخفيض مستوى الأمان وتشغيل البرنامج من جديد . تحياتي وتقديري . أخي جيلاني هذا رابط البرنامج ومعه شرح وافي من استاذنا هادي سالم جزاه الله عنا خير الجزاء. وجزى الله خيراً كل من دعى وشكر وشارك في هذا الموضوع. رابط هذا التعليق شارك More sharing options...
خالد رخا قام بنشر يونيو 20, 2008 مشاركة قام بنشر يونيو 20, 2008 رائع وجزاك الله خيراً ولى سؤال من فضلك هل يوجد برنامج لفك الحماية عن ملفات الكسيل ( معرفة كلمة المرور ) أرجوا الافادة رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يونيو 20, 2008 مشاركة قام بنشر يونيو 20, 2008 السلام عليكم و رحمة الله وبركاته الأساتذة - اكرم الغامدي و ابو اكرم مشكورين جدا - وما قصرتم الله يوفقكم دائما الى ما يحب ويرضى رابط هذا التعليق شارك More sharing options...
أبو جديد قام بنشر يونيو 21, 2008 مشاركة قام بنشر يونيو 21, 2008 ألف شكر لكم يا شباب رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان