پرسش جستوی یک عنوان براساس 6 شرط

[m.javad]

عرض سلام و خسته نباشید خدمت استادان گرامی
یه فایل انبارداری پیوست کردم که میخام با 6 شرط (یعنی اطلاعات 6 عنوان را دستی وارد کنم) اطلاعات از شیت موجودی فراخوانی شود و مقدار ورودی یا خروجی با مقدار موجودی اولیه جمع یا کسر شود.
نهایت تشکر را از همتون دارم.

[iranweld]

با سلام

در فایل پیوست کلیه موارد خواسته شده در یک شیت محاسبه میگردد

با ورود دیتا در قسمت زرد رنگ ورودی و خروجی ، مانده کل و ورودی کل و خروجی کل محاسبه میگردد

Sub Worksheet_Change(ByVal Target As Range)

    If Not Intersect(Target, Me.Range("Table1[vorodi]")) Is Nothing Then
    
    Target.Offset(, 2) = Target + Target.Offset(, 2)
    
    Target.Offset(, 3) = Target + Target.Offset(, 3)
        
    End If
    
    
    If Not Intersect(Target, Me.Range("Table1[khoroji]")) Is Nothing Then
    
    Target.Offset(, 1) = Target.Offset(, 1) - Target
    
    Target.Offset(, 3) = Target + Target.Offset(, 3)
        
    End If
    
    End Sub 

[m.javad]

ممنون

[Amir Ghasemiyan]

ممنون

دوست عزيز لطفا اگر جواب سوالتون رو گرفتين تاپيك رو حل شده كنيد

[m.javad]

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

[كامران]

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

این فایل تقدیم شما
با توجه به این فرض که فایل نهائی همین هست که گذاشتین منم روی اندازه ها و مشخصات این فایل کار کردم

[m.javad]

سلام دوست عزیز
با عرض شرمندگی فایل پیوست شما خطا میزنه هم در ورود به انبار هم خروج

[كامران]

سلام دوست عزیز
با عرض شرمندگی فایل پیوست شما خطا میزنه هم در ورود به انبار هم خروج

از خطا اسکرین شات بگیرید

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

[كامران]

سلام دوست عزیز
با عرض شرمندگی فایل پیوست شما خطا میزنه هم در ورود به انبار هم خروج

اگه همون فایل رو اجرا کرده باشی احتمالش کمه خطا بده ولی اگه فرمها و کدها رو ببدی تو یه فایل دیگه یا حتی تو همون فایل تو هر صفحه اگه ستونی رو قبل از انتهای جدول کم و زیاد کنی امکان خطا هست
اگه اینجوریه باید ببینی آدرسها چه تغییری کرده عوضش کنی