[حل شده] درخواست کمک فوری از دوستان عزیز

[hassanaliba]

درخواست کمک در مورد باتون ویرایش یوزر فرم فایل ارسالی اینجانب
از دوستان عزیز خواهشمند م فایل ارسالی اینجانب دکمه ویرایش ان عمل نمی کند نسبت به ویرایش ان اقدام فرمایید
باتشکر فروان از دوستان انجمن

[M_ExceL]

درخواست کمک در مورد باتون ویرایش یوزر فرم فایل ارسالی اینجانب
از دوستان عزیز خواهشمند م فایل ارسالی اینجانب دکمه ویرایش ان عمل نمی کند نسبت به ویرایش ان اقدام فرمایید
باتشکر فروان از دوستان انجمن

سلام،
برای اینکار نیاز به دو باتن دارید، به این صورت که باتن اول، اطلاعات ردیف انتخابی در لیست باکس رو داخل تکس باکس ها قرار میده سپس بوسیله باتن دوم تغیرات
اعمال بشه.
مثال زیر رو ببینید :

Private Sub cmdEdit_Click()
    If ListBox1.ListIndex <> -1 Then
        With ListBox1
            TextBox6.Value = .List(.ListIndex, 0)
            TextBox7.Value = .List(.ListIndex, 2)
        End With
    End If
End Sub


Private Sub cmdUpdate_Click()
    lr = Cells(Rows.Count, 2).End(3).Row
        For i = 3 To lr
            If TextBox6.Text = Cells(i, 2) Then
                Cells(i, 4) = TextBox7.Value
            End If
        Next i
End Sub

[hassanaliba]

با سلام و تشکر
باتن اول که انتخاب است جواب داد و اطلاعات را در تکس باکس فراخوانی کرد ولی در ثبت اطلاعات جدید مشکل دارد و هیچ عکس العملی انجام نمی دهذ لطفا راهنمایی کنید . با تشکر

[majid_mx4]

با سلام

بنظر میرسد کد دوم جناب آقای M_Excel مشکل دارد و تمامی تاریخ های یکسان را تغییر می دهد.

اصلاح شده کد ایشان + کد جدید و یک تکست باکس بعنوان کمک جهت پیدا کردن ردیف اضافه شده است .

البته اگر فراخانی شما در هنگام تغییر لیست باکس برای پر کردن لیست باکس نبود اضافه شدن تکست باکس نیازی نبود

با تشکر میر

[M_ExceL]

با سلام و تشکر
باتن اول که انتخاب است جواب داد و اطلاعات را در تکس باکس فراخوانی کرد ولی در ثبت اطلاعات جدید مشکل دارد و هیچ عکس العملی انجام نمی دهذ لطفا راهنمایی کنید . با تشکر

بله بعد از ویرایش تاریخ، کدی که بنده قرار دادم بر مبنای جستجوی تاریخ عمل میکنه و بعد از ویرایش تاریخ عمل نخواهد کرد،
اون کد رو بنده برای مثال و برای درک بهتر شما قرار دادم، شما باید تکس باکس جدیدی هم اضافه کنید که ردیف ها رو هم در اون نمایش بده
سپس بر مبنای جستجوی شماره ردیف که غیر تکراری هست، اطلاعات رو تغییر بدهد.
مانند فایل پیوست :
یاحق.