عبدالباسط الطقاوي

بارك الله فيك استا\ الكريم وزادك الله من العلم 

المطلوب تحديد قيمة الراتب من شيت جدول المرتبات عند تحديد الدرجة والعلاوة في شيت بيانات الموظفين 

متلا عند اختيار درجة 8 ( الخلية E) و العلاوة 5  الخلية (F) تكون قيمة المرتب الاساسي (1800 الخلية G ) يتم جلب قيمة الراتب تلقائي من خلال الجدول الموجود في شيت جدول المرتب 

شيت خاص برواتب الموظفين 

ورقة1.xlsx

السلام عليكم جميعا 

اريد مساعدة عند كتابة الدرجة في الخلية والعلاوة في شيت بيانات الموظفين اريد مايقابلها من  قيمة الراتب من شيت جدول المرتبات

ولكم مني جزيل الشكر 

ورقة1.xlsx

السلام عليكم قمت بتحميل برنامج الصادر والوارد من المنتدى وعند فتح البرنامج تظهر خطأ ان minimum بين value يجب ان يكون 102 لا تصلح و maximun

ولقد ارفقت المعادلة ممكن تحتاج تعديل وشكرا 

https://www.mediafire.com/file/b3u4m8w0vi3sg8m/%D8%A7%D9%84%D8%B5%D8%A7%D8%AF%D8%B1_%D9%88%D8%A7%D9%84%D9%88%D8%A7%D8%B1%D8%AF.rar/file

في ١٧‏/٦‏/٢٠٢١ at 10:05, عبدالباسط الطقاوي said:

رابط البرنامج المراد تعديل المعادلة 

https://www.mediafire.com/file/b3u4m8w0vi3sg8m/%D8%A7%D9%84%D8%B5%D8%A7%D8%AF%D8%B1_%D9%88%D8%A7%D9%84%D9%88%D8%A7%D8%B1%D8%AF.rar/file

السلام عليكمقمت بتحميل برنامج الصادر والوارد من المنتدى وعند فتح البرنامج تظهر خطأ ان minimum بين value يجب ان يكون 102 لا تصلح و maximun

ولقد ارفقت المعادلة ممكن تحتاج تعديل وشكرا 

EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPane1', @value=N'[0E232FF0-B466-11cf-A24F-00AA00A3EFFF, 1.00]
Begin DesignProperties = 
   Begin PaneConfigurations = 
      Begin PaneConfiguration = 0
         NumPanes = 4
         Configuration = "(H (1[37] 4[41] 2[5] 3) )"
      End
      Begin PaneConfiguration = 1
         NumPanes = 3
         Configuration = "(H (1 [50] 4 [25] 3))"
      End
      Begin PaneConfiguration = 2
         NumPanes = 3
         Configuration = "(H (1 [50] 2 [25] 3))"
      End
      Begin PaneConfiguration = 3
         NumPanes = 3
         Configuration = "(H (4 [30] 2 [40] 3))"
      End
      Begin PaneConfiguration = 4
         NumPanes = 2
         Configuration = "(H (1 [56] 3))"
      End
      Begin PaneConfiguration = 5
         NumPanes = 2
         Configuration = "(H (2 [66] 3))"
      End
      Begin PaneConfiguration = 6
         NumPanes = 2
         Configuration = "(H (4 [50] 3))"
      End
      Begin PaneConfiguration = 7
         NumPanes = 1
         Configuration = "(V (3))"
      End
      Begin PaneConfiguration = 8
         NumPanes = 3
         Configuration = "(H (1[56] 4[18] 2) )"
      End
      Begin PaneConfiguration = 9
         NumPanes = 2
         Configuration = "(H (1 [75] 4))"
      End
      Begin PaneConfiguration = 10
         NumPanes = 2
         Configuration = "(H (1[66] 2) )"
      End
      Begin PaneConfiguration = 11
         NumPanes = 2
         Configuration = "(H (4 [60] 2))"
      End
      Begin PaneConfiguration = 12
         NumPanes = 1
         Configuration = "(H (1) )"
      End
      Begin PaneConfiguration = 13
         NumPanes = 1
         Configuration = "(V (4))"
      End
      Begin PaneConfiguration = 14
         NumPanes = 1
         Configuration = "(V (2))"
      End
      ActivePaneConfig = 0
   End
   Begin DiagramPane = 
      Begin Origin = 
         Top = 0
         Left = 0
      End
      Begin Tables = 
         Begin Table = "Sadir_Tbl"
            Begin Extent = 
               Top = 19
               Left = 399
               Bottom = 149
               Right = 585
            End
            DisplayFlags = 280
            TopColumn = 0
         End
         Begin Table = "Places_Tbl"
            Begin Extent = 
               Top = 47
               Left = 635
               Bottom = 177
               Right = 805
            End
            DisplayFlags = 280
            TopColumn = 0
         End
         Begin Table = "Sadir_Tbl1"
            Begin Extent = 
               Top = 83
               Left = 178
               Bottom = 196
               Right = 348
            End
            DisplayFlags = 280
            TopColumn = 0
         End
      End
   End
   Begin SQLPane = 
   End
   Begin DataPane = 
      Begin ParameterDefaults = ""
      End
      Begin ColumnWidths = 35
         Width = 284
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
      End
   End
   Begin CriteriaPane = 
  ' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'VIEW',@level1name=N'View_Sadir'
GO
EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPane2', @value=N'    Begin ColumnWidths = 11
         Column = 1440
         Alias = 900
         Table = 1170
         Output = 720
         Append = 1400
         NewValue = 1170
         SortType = 1350
         SortOrder = 1410
         GroupBy = 1350
         Filter = 1350
         Or = 1350
         Or = 1350
         Or = 1350
      End
   End
End
' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'VIEW',@level1name=N'View_Sadir'
GO
EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPaneCount', @value=2 , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'VIEW',@level1name=N'View_Sadir'
GO
EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPane1', @value=N'[0E232FF0-B466-11cf-A24F-00AA00A3EFFF, 1.00]
Begin DesignProperties = 
   Begin PaneConfigurations = 
      Begin PaneConfiguration = 0
         NumPanes = 4
         Configuration = "(H (1[50] 4[5] 2[16] 3) )"
      End
      Begin PaneConfiguration = 1
         NumPanes = 3
         Configuration = "(H (1 [50] 4 [25] 3))"
      End
      Begin PaneConfiguration = 2
         NumPanes = 3
         Configuration = "(H (1 [50] 2 [25] 3))"
      End
      Begin PaneConfiguration = 3
         NumPanes = 3
         Configuration = "(H (4 [30] 2 [40] 3))"
      End
      Begin PaneConfiguration = 4
         NumPanes = 2
         Configuration = "(H (1 [56] 3))"
      End
      Begin PaneConfiguration = 5
         NumPanes = 2
         Configuration = "(H (2 [66] 3))"
      End
      Begin PaneConfiguration = 6
         NumPanes = 2
         Configuration = "(H (4 [50] 3))"
      End
      Begin PaneConfiguration = 7
         NumPanes = 1
         Configuration = "(V (3))"
      End
      Begin PaneConfiguration = 8
         NumPanes = 3
         Configuration = "(H (1[56] 4[18] 2) )"
      End
      Begin PaneConfiguration = 9
         NumPanes = 2
         Configuration = "(H (1 [75] 4))"
      End
      Begin PaneConfiguration = 10
         NumPanes = 2
         Configuration = "(H (1[66] 2) )"
      End
      Begin PaneConfiguration = 11
         NumPanes = 2
         Configuration = "(H (4 [60] 2))"
      End
      Begin PaneConfiguration = 12
         NumPanes = 1
         Configuration = "(H (1) )"
      End
      Begin PaneConfiguration = 13
         NumPanes = 1
         Configuration = "(V (4))"
      End
      Begin PaneConfiguration = 14
         NumPanes = 1
         Configuration = "(V (2))"
      End
      ActivePaneConfig = 0
   End
   Begin DiagramPane = 
      Begin Origin = 
         Top = 0
         Left = 0
      End
      Begin Tables = 
         Begin Table = "Places_Tbl"
            Begin Extent = 
               Top = 20
               Left = 18
               Bottom = 150
               Right = 188
            End
            DisplayFlags = 280
            TopColumn = 0
         End
         Begin Table = "Wared_Tbl1"
            Begin Extent = 
               Top = 24
               Left = 452
               Bottom = 160
               Right = 622
            End
            DisplayFlags = 280
            TopColumn = 0
         End
         Begin Table = "Wared_Tbl"
            Begin Extent = 
               Top = 19
               Left = 217
               Bottom = 253
               Right = 403
            End
            DisplayFlags = 280
            TopColumn = 0
         End
      End
   End
   Begin SQLPane = 
   End
   Begin DataPane = 
      Begin ParameterDefaults = ""
      End
      Begin ColumnWidths = 22
         Width = 284
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
         Width = 1500
      End
   End
   Begin CriteriaPane = 
      Begin ColumnWidths = 11
         Column = 1440
         Alias = 900
         Table = 1170
         Output = 720
         Append = 1400
         NewValue = 1170
         SortType = 1350
         SortOrder = 1410
         GroupBy = 1350
         Filter = 1350
         Or = 1350
       ' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'VIEW',@level1name=N'View_Wared'
GO
EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPane2', @value=N'  Or = 1350
         Or = 1350
      End
   End
End
' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'VIEW',@level1name=N'View_Wared'
GO
EXEC sys.sp_addextendedproperty @name=N'MS_DiagramPaneCount', @value=2 , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'VIEW',@level1name=N'View_Wared'
GO
 

بارك الله فيك استاد عبدالله ولكل من حاول المساعدة 

بقفت مشكله واحدة وهي اريد عند فتح الشيت ان تظهر شاشة ادخال الرقم السري مباشرة ولكم مني جزيل الشكر

السلام عليكم 

طلبا وليس امر لدي شيت اكسل وجدته في المنتدى وقمت بإجراء بعض التعديلات عليه حتى يتماشى مع طبيعة العمل لدينا 

المشكلة هي عندما اقوم بفتح الشيت والنقر على ايقونة بخت وطباعة بيانات الموظف وعند النقر على ايقونة الرجوع يعطي خطأ في المعادلة ارجو منكم المساعدة 

وهناك طلب اخر بعد ادن حضراتكم هو اريد عند النقر على الشيت ان تظهر شاشة الدخول مباشرة التي تظهر فيها كلمة المرور وشكرا 

كلمة المرور 1984

النقل البري بيانات الموظفين.xlsm

استاد عبدالله الصاري بارك الله فيك ورحم الله والديك وان شاء الله في ميزان حسناتك واسف على تعبك 

استاد عبدالله الصاري بارك الله فيك علي المجهود الاكتر من الرائع فعلا هدا المطلوب ولدي طلب اخر اريد ان يظهر الفورم بعد فتح الملف الاكسل وشكرا جزيلا لك

السلام علكيم ايها الاخوة اعضاء المنتدى لدي ملف اكسل يحتوي على بيانات للموظفين قمت بتعديل بعض البيانات واريد كود في شيت print بحيت اذا ادخلت رقم التسلسل لموظف يجلب لي البيانات الخاصة للموظف ذات الرقم التسلسل في شيت data

النقل البري.xlsm

استاد علي محمد شكرا على الاهتمام ولكن الملف لا يعمل لا اعرف ما السبب وانا استخدم اوفس 2007 

استاد علي محمد هل بإمكانك حفظ الملف اوفس 2007 ورفعه من جديد 

السلام عليكم لدي ملف اكسل من عمل الاستادة ساجدة وقمت بتعديل في بعض البيانات بما يتماشى مع طبيعة العمل واريد من حضراتكم المساعة في كتابة كود الطباعة بحيت يقوم بطباعة الورقة الخاصة في ( print) واريد ايضا عند فتح الشيت يظهر الفورم التاني كلمة المرور والرقم السري وبعد كتابة الرقم السري صحيح يظهر الفورم الدي به بيانات مباشرة وشكرا

النقل البري.xlsm

السام عليكم لقد عملت شيت اكسل يحتوي على بيانات تفصيلية للموظف وعملت الفورم وعملت معادلة لترحيل البيانات من الفورم الى الشيت وهو اول عمل اقوم به بعد تعلمت شيئا من المنتدى واريد من حضراتكم مساعدتي في اجراء بعد المعادلات وهي كود التعديل والحدف وكود للطباعة ( في شيت يحتوي على فورم للطباعة في الاكسل ) وكود للبحت باسم الموظف واريد ايضا في الرقم التسلسل ان يظهر تلقائيا واسف جدا على كثة الطلبات وحقيقة حاولت ان اضع كود للبحت ولكن لم تنجح محاولاتي 

من فضلك لا تقوم برفع الملف مضغوط طالما حجم الملف صغير ويمكن رفعه بدون ضغط تجنبا لعدم اهدار وقت الأساتذة

استمارة موظفين.xlsm

لقد وجدت ملف وهو يفي بالغرض يحتاج الى بعض التعديلات البسيطة اضافة في الفورم رقم المنطومة //// واضافة خانة بعد كلمة المؤهل العلمي  ( تاريخ الحصول عليه ) واضافة بعد الدرجة ( كلمة العلاوات و شهر العلاوة ) واضافة بعد جهة العمل ( رقم الوظيفة في  الملاك ) وحدف سن التقاعد ومعلومات المعاش  ارجو ان اكون قد  اوضحت 

شئون الموظفين.rar

السلام عليكم ورحمة الله تعالى وبركاته 

عودنا والعود احمد بعد غياب طويل عن المنتدى 

طلب وليس املا مساعدة في تصميم شيت اكسل بالفيجوال بيسك عبارة عن جداول للشون الموظفين وجدته في المنتدى وقمت بإجراء بعد التعديلات في الشيت اريد تعديل الفورم حسب الخانات في الشيت من خلاله يتم ادخال البيانات عن طريق الفورم وطلب اخر اريد بمجرد ان يفتح الملف يتم ظهور الفورم مباشرة مع اضافة ميزة فتح الفورم برقم سري وعدم حذف الشيت اعرف انه طلب صعب وسوف يأخد وقت ولكن طمعا في كرم الاعضاء ولأهمية الملف في انجاز الاعمال في الوظيفة ولكم مني فائق التقدير والاحترام واسف جدا على الاطالة وارجو ان ينال قبول  

2018.xlsm

سيد علي محمد بارك الله فيك ورحم الله والديك وزادك الله من المعرفة 

للرفع

السلام عليكم فضلا وليس امرا اريد تعديل في شيت الاكسل اريد نقل بيانات في الورقة رقم 3 بمعادلة  ( اسم المصرف / الفرع / رقم الحساب ) الى الورقة رقم 1 المطابقة عن طريق الرقم الوطني 

تانيا واريد عن طريق معادلة نقل بيانات في الورقة رقم 2 ( المرتب الاساسي / الدرجة الوظيفية / العلاوات) الى ورقة رقم 1 وتكون المطابقة بالرقم الوطني ايضا 

التوتيق.xlsx

السلام عليكم ورحمة الله وبركاته بعد ادنكم مساعدة لعمل شيت الاكسل بالفيجوال بيسك وهو بيانات ادارية ومالية للموظفين بدولة ليبيا اريده بالفيجوال بيسك ادا امكن وهو موجود بشيت بيانات الموظفين مع امكانية عمود المؤهلات وكذلك العقوبات والاندارات والدورات تكون قابلة للزيدة بحيت تستوعب اكتر بحيت يمكن اضافة مؤهل او عقوبة او اندار او دورة جديدة  مع التاريخ 

- وعمود العلاوة السنوية في aa تنبيه في بموعد  استحقاق العلاوة 

- اريد ربط جدول المررتبات في الشيت ( جدول المرتبات ) بالخلية ab ( الدرجة ) و الخلية ac ( العلاوة ) بيحت ادا تم ادخال الدرجة واللعلاوة حسب الجدول يكون المرتب مطابق للجدول الموجود في الجدول في الشيت جدول المرتبات واسف جدا جدا على الاطالة 

- طلب اخير حين يتم فتح الملف تضهر شاشة البيانات تلقائي بكلمة مرور 

بيانات الموظفين.xlsx

سيد احمد شكرا لك لمرورك الكريم ولملاحظاتك وسوف اقوم ان شاء الله بوضع بايانات التي طلبتها اما بخصوص طلبي بالكود فهي للحماية ولسهولة الاستخدام 

السلام عليكم ورحمة الله وبركاته بعد ادنكم مساعدة لعمل شيت الاكسل بالفيجوال بيسك وهو بيانات ادارية ومالية للموظفين بدولة ليبيا اريده بالفيجوال بيسك ادا امكن وهو موجود بشيت بيانات الموظفين مع امكانية عمود المؤهلات وكذلك العقوبات والاندارات والدورات تكون قابلة للزيدة بحيت تستوعب اكتر بحيت يمكن اضافة مؤهل او عقوبة او اندار او دورة جديدة  مع التاريخ 

- وعمود العلاوة السنوية في aa تنبيه في بموعد  استحقاق العلاوة 

- اريد ربط جدول المررتبات في الشيت ( جدول المرتبات ) بالخلية ab ( الدرجة ) و الخلية ac ( العلاوة ) بيحت ادا تم ادخال الدرجة واللعلاوة حسب الجدول يكون المرتب مطابق للجدول الموجود في الجدول في الشيت جدول المرتبات واسف جدا جدا على الاطالة 

- طلب اخير حين يتم فتح الملف تضهر شاشة البيانات تلقائي بكلمة مرور 

بيانات الموظفين.xlsx

بارك الله فيك اخ علي وكذلك الشكر موصول للاخ احمد 

السيد احمد المعادلات تعمل ولكن اريد بعض التعديل فمتلا في شيت الاخراج عند ادخال صنف متلا رقم 1 ورق تصوير نحصل على الرصيد وادا ادخلنا الصنف مرة اخرى فإن الرصيد يتغير لاحظ ان الرصيد تغير من الخانة الاولى يصبح الرصيد تابت 

عدن القيام بصرف 200 من الصنف فان الرصيد يصبح 8800

وعند القيام بصرف من نفس الصنف مرة اخرى 100 يصبح الرصد8700 

صرف 300 الرصيد 8400 

هكدا اريد المعادلة وليس كما في الشيت