شماره گذاری ستون ردیف

Collapse
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • ظهور 313

    • 2017/01/20
    • 244

    پرسش شماره گذاری ستون ردیف

    سلام و عرض ادب خدمت دوستان،
    برای فیلتر اطلاعات یك جدول، از یه همچین فرمولی استفاده میكنم
    Private Sub PARDAKHTHA_KOD()
    LastRow = Sheets("DARAMAD").Range("AB:AG").Cells.find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
    lastrow_2 = Sheets("GOZARESH").Range("AQ:AU").Cells.find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row


    For i = 2 To LastRow
    If Sheets("DARAMAD").Range("AC" & i).Value = Sheets("gozaresh").Range("AC2") Then
    lastrow_2 = lastrow_2 + 1
    Sheets("GOZARESH").Range("AQ" & lastrow_2).Value = Sheets("DARAMAD").Range("AB" & i).Value
    Sheets("GOZARESH").Range("AR" & lastrow_2).Value = Sheets("DARAMAD").Range("AD" & i).Value


    End If
    Next i
    End Sub

    حالا مشكل اینه كه میخوام ستون ردیف (مثلا ستون AA)، متناسب با مقدار داده‌های وارد شده، شماره‌گذاری بشه، این كار رو با فرمول توی اكسل نمیخوام انجام بدم، لطفا راهنمایی بفرمایید
چند لحظه..