ناصر سعيد
05 عضو ذهبي-
Posts
1,963 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
2
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو ناصر سعيد
-
لانني احبك في الله استاذ حماده ...ارجو اشتراكك ايضا في http://laernoffice.com/vb/f7
-
ربنا يحفظك ويبارك لك يا استاذ حماده =========== لو اردت ان اغير لون الازرار فقط .. كيف ؟
-
ربنا يجزيك الخير استاذ حماده مفيش فكره تخفي ملف الاكسيل اثناء ظهور فورمه الباسوورد .. يعني اضغط على الملف تظهر الفورمه فقط وبعد ادخال بيانات الاسم والرقم السري تظهر ورقه اكسيل معينه شكرا .. ربنا يرحم والدك ويرحم والدي
-
الملفات مش راضيه تفتح ... هل الباسوورد خطأ ؟ لو تكرم احد الخوة يعيد تحميلها مع جعل ايم المستخدم وكلمه المرور سهله ... 1 مثلا
-
تغيير إعدادات أمان الماكرو يمكنك تغيير إعدادات أمان الماكرو في مركز التوثيق ما لم يقم مسؤول النظام في مؤسستك بتغيير الإعدادات الافتراضية لمنعك من تغيير الإعدادات. ضمن علامة التبويب المطور ، في المجموعة تعليمات برمجية، انقر فوق أمان الماكرو. ملاحظة إذا لم تكن علامة التبويب المطور متوفرة، فقم بما يلي لعرضها: انقر فوق علامة التبويب ملف، ثم فوق خيارات، ثم فوق الفئة تخصيص الشريط. في القائمة علامات تبويب رئيسية، حدد خانة الاختيار المطور، ثم انقر فوق موافق. انقر فوق أي علامة تبويب أخرى للعودة إلى الملف. في الفئة إعدادات الماكرو، ضمن إعدادات الماكرو، انقر فوق الخيار الذي تريده. للحصول على معلومات تفصيلية حول هذه الإعدادات، راجع المقطع إعدادات أمان الماكرو وتأثيراتها السابق ذكره في هذه المقالة. ملاحظة يتم تطبيق أي تغييرات تقوم بإجرائها في Excel في الفئة إعدادات الماكرو على Excel فقط ولا تؤثر على أي برنامج آخر من Microsoft Office. تلميح يمكنك أيضاً الوصول إلى مركز التوثيق من مربع الحوار خيارات. انقر فوق علامة التبويب ملف، ثم فوق خيارات، ثم فوق الفئة مركز التوثيق. انقر فوق إعدادات مركز التوثيق، ثم فوق الفئة إعدادات الماكرو. =========== https://support.office.com/ar-sa/article/تغيير-إعدادات-أمان-الماكرو-في-Excel-3b5ec213-efcc-4d48-9efd-83d097397a7e
-
انت رجل لاتزكى على الله ... اكتب نبذه عن طلبك
-
درس اكسل : اسم المستخدم وكلمة المرور .
ناصر سعيد replied to ناصر سعيد's topic in منتدى الاكسيل Excel
================================ Private Sub CommandButton1_Click() ورقة1.Activate Sheets("ورقة1").Visible = True Dim username As String Dim password As String username = TextBox1.Text password = TextBox2.Text Dim x As Integer x = 2 Do While Cells(x, 1).Value <> "" If Cells(x, 1).Value = username And Cells(x, 2).Value = password Then MsgBox "أهلا وسهلا يا " & " " & username, , " برنامج المحاسبة والإدارة""" Me.Hide form2.Show Sheets("ورقة1").Select ActiveWindow.SelectedSheets.Visible = False End Else x = x + 1 End If Loop MsgBox "Please check you username or Password!" TextBox1.Text = "" TextBox2.Text = "" TextBox1.SetFocus End Sub Private Sub CommandButton2_Click() Application.Quit End Sub Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) Cancel = True End Sub -
اسم المستخدم ( 1 ) والرقم الباسوورد ( 1 ) ================= اسم المستخدم وكلمة المرور.rar