سلام
خسته نباشید لطفا بفرمایید هر یک از این ردیفها چه کارهای را انجام میدن
Columns("A:A").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$A$1006").AutoFilter Field:=1, Criteria1:="<>"
Range("G1:O1").Select
ActiveWindow.ScrollColumn = 2
ActiveWindow.ScrollColumn = 3
ActiveWindow.ScrollColumn = 4
اخطار: این یک موضوع قدیمی است
به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.
علاقه مندی ها (Bookmarks)