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

الردود الموصى بها

قام بنشر

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

قام بنشر

شاكر مرورك اخي ابوعيد ولكن مااريده هو مثلا فتحت يوم 1/9 فيظهر نموذج الادخال فسيقوم الموظف بادخال البيانات وتحفظ وعند الضغط مثلا علي يوم 2/9 فيظهر نموذج اخر فارغ لهذا اليوم وهكذا

قام بنشر

السلام عليكم
احي ابو جنا

الحمد لله انه سيلبي حاجتك

اما بالنسببة لعمله

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

الكود المستخدم في شيت اليوم

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  If Target.Row <> 8 Then Exit Sub
  If Target.Column < 3 And Target.Column > 16 Then Exit Sub
   If Cells(Target.Row - 1, Target.Column) <> "" Then
Application.ScreenUpdating = False
Sheets("Source").Visible = True
   Sheets("Source").Copy After:=Sheets("اليوم")
   ActiveSheet.Name = Format(Cells(Target.Row - 1, Target.Column), "dd_mm_yyyy")
Sheets("Source").Visible = False
Application.ScreenUpdating = True
  End If
End Sub

وان ا, اردت اي استفسار لايهمك

تحياتي

  • Like 3
قام بنشر

بارك الله فيك  اخي عادل ولكن عندي سؤال هل يمكن استدعاء تلكك الايام لمعالجة البيانات المدخله ؟ثانيا هل يصلح اني لو غيرت الشهر من 9 الي عشره هاتتغير التواريخ اللي موجوده في المربعات بالطبع بس ساعتها هاتفتح يوم جديد ولا هايفتح القديم؟

قام بنشر

اخي ابو جنا

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

تحياتي

  • Like 1

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information