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

[mokaram]

سلام دوستان
من یه فایل اکسل دارم که میخوام اگه روی هر خونه از ستون a مثلا a5 کلیک یا دابل کلیک کردم یه یوزر فرم باز بشه که تمام اطلاعات هموم سطر تو جاهائیکه تو فرم تعبیه کردیم بشینه
ممنون میشم اگه کمکم کنید متشکر

[mokaram]

RE: انتخاب یک سلول و باز شدن فرم

دوست خوبم آقای یوسفی(plc_ pcb) زحمت این کار را کشیدند و طبق دستور زیر این کار انجام شد

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim ads, ads1, val As String
ads = Target.Address
ads1 = Mid(ads, 2, 2)
val = Target.Value
If ads1 = "A$" Then
UserForm1.TextBox1.Value = val
UserForm1.Label1.Caption = ads
UserForm1.Show
End If
End Sub
فقط یه سوال دیگه من چطور میتونم تو اون فرمی که فراخوانی میشه عددی که وارد میکنم تو یکی از تکست ها اون عدد بیاد از عددی که تو ستون چهارم فایل اکسل هست کم بشه و حاصل رابده تو همو فایل اکسل
ممنون میشم اگه جواب بدید

[Alireza]

RE: انتخاب یک سلول و باز شدن فرم

سلام
لطقاّ فایل رو ضمیمه کنید