اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر

السادة الأفاضل

تحية طيبة وعطرة علي الجميع

أريد عند الضغط دبل كليك على الصنف الذي يظهر في الليست بوكس يرحل في التيكست بوكس الإختيار الأول وعند الضغط دبل كليك مرة أخرى علي أي صنف أخر في الليست بوكس يرحل في التيكست بوكس الإختيار الثاني وكذالك مع الإختيار الثالث

مع وافر الأحترام .

اليكم المرفقات

فاتورة.rar

قام بنشر

السلام عليكم

ضع هذا الكود بين اكواد الفورم


Private Sub ListFind_DblClick(ByVal Cancel As MSForms.ReturnBoolean)

Dim i As Integer

For i = 1 To 3

    If Len(Trim(Me.Controls("TextBox" & i))) = 0 Then

        Me.Controls("TextBox" & i) = Me.ListFind.Value

        Exit For

    End If

Next

End Sub

ودمتم في حفظ الله

  • Like 1
  • 1 year later...
قام بنشر

أستاذنا الفاضل/ عبد الله باقشير

تحية طيبة وعطرة

ماذا لو أردنا ترحيل العمود الثاني أو الثالث

من الليست بوكس إلي التيكست بوكس

وجزاكم الله خيراً .

  • 1 year later...
قام بنشر

أستاذنا الفاضل/ عبد الله باقشير

السادة أعضاء المنتدى

ألا يوجد حل للطلب الأخير

وهو

ماذا لو أردنا ترحيل العمود الثاني أو الثالث

من الليست بوكس إلي التيكست بوكس

بدلا من العمود الأول

وجزاكم الله خيراً .

قام بنشر

أستاذنا الفاضل/ عبد الله باقشير

السادة أعضاء المنتدى

ألا يوجد حل للطلب الأخير

وهو

ماذا لو أردنا ترحيل العمود الثاني أو الثالث

من الليست بوكس إلي التيكست بوكس

بدلا من العمود الأول

وجزاكم الله خيراً .

هذا التعبير للعمود الثاني

Me.ListFind.Column(1)

وهذا للثالث

Me.ListFind.Column(2)

وهكذا .................

تحياتي

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