با سلام خدمت اساتيد محترم
در فايل پيوست ارسالي در شيت انبار ستونaوb اطلاعات شيت هاي مورد نظر ماست.
يعني از اين شيت به تعداد ست از كل موجودي هر شيت كسر يا اضافه بشه
زماني كه كليد ماكرو ميزنيم در كشو كومبو باكس نام دو تيبل inوoutامده.
بطور مثال:
1-نام دو شيت را وارد و تعداد ست هايي كه ميخوايم كسر بشه وارد ميكنيم حالا در يوزرفورم در كشو كوبو باكس table.in انتخاب مشخصات نوشته و كليد ثبت ميزنيم.
مشخصات در table.in واردبه صورت بايگاني وارد بشه
حالا در شيت 1111به تعداد عدد ستي كه وارد كرديم در ستون موجودي اضافه بشه.موجودي رديف 1بشه40.رديف دو8 و رديف سه 40 تا بشه.
اين تغييرات براي شيت هايي كه اسمشون در انبار نام صفحه امده اعمال بشه.
حالا اگه ما در كشو كوبو باكس table.out*زديم بستگي به نام صفحه و تعدا ست نوشته شده از موجودي كل رديف هاي شيت ها كسر كنه
اطلاعات در تيبل ها بعد از اجرا هر ماكرو به صورت بايگاني پشت سر هم بياد و پاك نشه
ممنون ميشم كد اين برنامه برام كامل كنيد.
در فايل پيوست ارسالي در شيت انبار ستونaوb اطلاعات شيت هاي مورد نظر ماست.
يعني از اين شيت به تعداد ست از كل موجودي هر شيت كسر يا اضافه بشه
زماني كه كليد ماكرو ميزنيم در كشو كومبو باكس نام دو تيبل inوoutامده.
بطور مثال:
1-نام دو شيت را وارد و تعداد ست هايي كه ميخوايم كسر بشه وارد ميكنيم حالا در يوزرفورم در كشو كوبو باكس table.in انتخاب مشخصات نوشته و كليد ثبت ميزنيم.
مشخصات در table.in واردبه صورت بايگاني وارد بشه
حالا در شيت 1111به تعداد عدد ستي كه وارد كرديم در ستون موجودي اضافه بشه.موجودي رديف 1بشه40.رديف دو8 و رديف سه 40 تا بشه.
اين تغييرات براي شيت هايي كه اسمشون در انبار نام صفحه امده اعمال بشه.
حالا اگه ما در كشو كوبو باكس table.out*زديم بستگي به نام صفحه و تعدا ست نوشته شده از موجودي كل رديف هاي شيت ها كسر كنه
اطلاعات در تيبل ها بعد از اجرا هر ماكرو به صورت بايگاني پشت سر هم بياد و پاك نشه
ممنون ميشم كد اين برنامه برام كامل كنيد.
کامنت