tornado_3100

كود الفلترة Dim lngStart As Date Dim lngEnd As Date With Sheet1.Range("cer") الفلترة بين تاريخين .AutoFilter field:=7, Criteria1:=">=" & lngStart, Operator:=xlAnd, Criteria2:="<=" & lngEnd الفلترة بقيمة مساوية .AutoFilter field:=22, Criteria1:=Me.ComboBox1.Value, Operator:=xlFilterValues field:=7 رقم العمود الى هايطبق عليه الفلتر كود النسخ المراد نسخة Sheet1.Columns("F").Copy مكان اللصق Sheet2.Range("B7").PasteSpecial Paste:=xlPasteValues وشوف الموضوع دا

جرب كدا في حالة وجود كود الصنف يضيف الكمية dwork.xlsm

شوف دا How To Get And Insert The Last Modified User Name In Excel?

شكرا للجميع الكود للاستفادة مع شكر أ / hassona229 للمساعدة If UserForm1.Visible = True Then If UserForm1.TextBox1.Value = "" Then UserForm1.TextBox1.Value = Me.TextBox1.Value Else UserForm1.TextBox2.Value = Me.TextBox1.Value End If Else If UserForm2.Visible = True Then If search.TextBox1.Value = "" Then UserForm2.TextBox1.Value = Me.TextBox1.Value Else UserForm2.TextBox2.Value = Me.TextBox1.Value End If End If End if

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

السلام عليكم ورحمة الله وبركاته ...عندي برنامج بحتاج فيه ادخل التاريخ في اكتر من فورم لقيت فورم (كالندر) بيخرج التارخ في تكست بوكس ..محتاج كود يدينى التاريخ في التكست بوكس الي بستدعي منه date.xlsm