فريدة العصر قام بنشر يوليو 23, 2020 قام بنشر يوليو 23, 2020 ما المقصود بالمتغير Lab.Caption = .Cells(ii, 3).Row فى كود البحث للاستاذ / مجدى يونس حيث اننى عند تطبيقه يعطينى رسالة ( متغير غير معرف ) If Me.TextBox4.Value = "" Then Exit Sub Set Sh = Sheets("ورقة1") With Sh Me.TextBox1.Value = "": Me.TextBox2.Value = "": Me.TextBox3.Value = "" Last = .Range("A" & Rows.Count).End(xlUp).Row For ii = 1 To Last If LCase(CStr(.Cells(ii, 1).Value)) = LCase(CStr(TextBox4.Value)) Then ' TextBox1.Value = .Cells(ii, 1).Value TextBox2.Value = .Cells(ii, 2).Value TextBox3.Value = .Cells(ii, 3).Value Lab.Caption = .Cells(ii, 3).Row CommandButton3.Enabled = True: CommandButton2.Enabled = True: CommandButton1.Enabled = False End If Next ii End With If Me.TextBox1.Value = "" Then MsgBox "This Name Does Not Exist", vbExclamation, "Search" CommandButton3.Enabled = False: Lab.Caption = "": CommandButton2.Enabled = False: CommandButton1.Enabled = True End If End Sub
أفضل إجابة ابراهيم الحداد قام بنشر يوليو 23, 2020 أفضل إجابة قام بنشر يوليو 23, 2020 السلام عليكم ورحمة الله ربما Lab يرمز الى Label و Lab.Caption يقصد بها ان العنوان الذى سوف يظهر على Label يكون هو النص او القيمة المكتوبة فى الصف ii و العمود 3 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.