با سلام و وقت بخیر ، میخوام بدونم امکانی هستش که مجبور نباشم نوار کنار اکسل حرکت بدم و با انتخاب کد مربوطه به ردیف مورد نظر برم و یه جور حالت انتقال سریع به ردیف مورد نظر بهم بده ؟فایل مورد نظر پیوست می باشد .با تشکر فراوان
دسترسی سریع
Collapse
این تاپیک قفل است.
X
X
-
با سلام
با استفاده از قابلیت های رویدادها در اکسل در صورت تغییر دیتای سلول H3 عمل فیلتر انجام میگیرد
کد PHP:Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Me.Range("H3")) Is Nothing Then
ActiveSheet.Range("$E:$F").AutoFilter Field:=1, Criteria1:=Range("h3")
End If
End Sub
فایل های پیوست شده -
این ماکرو را در فایل بررسی کنید
کد PHP:Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Me.Range("H3")) Is Nothing Then
Rows("4:4").Select
Range("F3").Select
ActiveWindow.SmallScroll Down:=Range("H3") - 23
End If
End Sub
فایل های پیوست شدهLast edited by iranweld; 2016/08/29, 10:14.کامنت
کامنت