نحوه تعریف گسترش فرمول یک ستون با توجه به داده های موجود در ستون متناظر !

Collapse
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • Skynet

    • 2017/03/02
    • 142

    نحوه تعریف گسترش فرمول یک ستون با توجه به داده های موجود در ستون متناظر !

    با سلام و احترام
    سوالی داشتم بظاهر ساده ولی سخت ( البته سخت برای من )
    در فایل نمونه ، در یک ستون فرمولی نوشته شده که به مقدار متناظر در ستون مقابل مربوط هست.

    یک ماکرو ظبط کردم و معرفی کردم فرمول رو تا 100 سطر پایین گسترش بده ! بدون توجه به ستون متناظرش !
    ولی در واقع می خوام ماکرو بصورتی عمل کنه که گسترش فرمول به سمت پایین تا حدی پیش بره که در ستون مقابل تا 5 ردیف پایین ترش اگر داده بود گسترش انجام بشه در غیر این صورت دیگر ادامه نده !

    این شرط گسترش رو در ماکرو به چه صورتی باید تعریف کرد ؟ خیلی ممنونم

    کد:
    Sub Macro1()'
    ' Macro1 Macro
    '
    
    
    '
        Range("F2").Select
        Selection.AutoFill Destination:=Range("F2:F100"), Type:=xlFillDefault
        Range("F2:F7").Select
    End Sub
    Click image for larger version

Name:	1.jpg
Views:	1
Size:	108.1 کیلو بایت
ID:	145341
    فایل های پیوست شده
    Last edited by Skynet; 2017/03/23, 23:43.
  • Skynet

    • 2017/03/02
    • 142

    #2
    نوشته اصلی توسط Skynet
    با سلام و احترام
    سوالی داشتم بظاهر ساده ولی سخت ( البته سخت برای من )
    در فایل نمونه ، در یک ستون فرمولی نوشته شده که به مقدار متناظر در ستون مقابل مربوط هست.

    یک ماکرو ظبط کردم و معرفی کردم فرمول رو تا 100 سطر پایین گسترش بده ! بدون توجه به ستون متناظرش !
    ولی در واقع می خوام ماکرو بصورتی عمل کنه که گسترش فرمول به سمت پایین تا حدی پیش بره که در ستون مقابل تا 5 ردیف پایین ترش اگر داده بود گسترش انجام بشه در غیر این صورت دیگر ادامه نده !

    این شرط گسترش رو در ماکرو به چه صورتی باید تعریف کرد ؟ خیلی ممنونم

    کد:
    Sub Macro1()'
    ' Macro1 Macro
    '
    
    
    '
        Range("F2").Select
        Selection.AutoFill Destination:=Range("F2:F100"), Type:=xlFillDefault
        Range("F2:F7").Select
    End Sub
    [ATTACH=CONFIG]14550[/ATTACH]

    کامنت

    چند لحظه..