تهيه بانك اطلاعاتي از فايل هاي متعدد

[hoosein]

سلام
من يه فايل اكسل دارم كه آيتم هاي مختلفي داره
اينو ميخوام در اختيار افراد زيادي قرار بدم تا مشخصات خودشون رو بر اساس اون ايتمها پر كنن و بعد فايل تكميل شده رو بهم برگردونن
حالا ميخوام از مجموع اين فايلها كه به دستم رسيده يه بانك جامع درست كنم كه مثلا در يك شيت تمامي اطلاعات همه افراد باشه
چطور ميتونم اينكارو بكنم
تشكر

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[khakzad]

سلام
توی فایل دیتابیستون باید ی ماکرو بنویسید که با اجرای اون مثلا ی پنجره باز شه.فایل های مورد نظر انتخاب بشن و بعد از باز شدن، فیلدهای مورد نظر کپی بشن و تووی دیتا بیستون ثبت بشن.بعد از ثبت اطلاعات هر فایل اون فایل بسته بشه و بره روی فایل بعدی

[hoosein]

سلام
توی فایل دیتابیستون باید ی ماکرو بنویسید که با اجرای اون مثلا ی پنجره باز شه.فایل های مورد نظر انتخاب بشن و بعد از باز شدن، فیلدهای مورد نظر کپی بشن و تووی دیتا بیستون ثبت بشن.بعد از ثبت اطلاعات هر فایل اون فایل بسته بشه و بره روی فایل بعدی

سلام
تشكر خانم پاكزاد
مرحله اول رو انجام دادم ولي نميدوم بعد از بستن فايل اولي كه اطلاعات رو انتقال دادم ، چجوري بگم بره رو فايل بعدي
الان هر بار ماكرو رو اجرا ميكنم اطلاعات همون فايل اول رو اضافه ميكنه
اگه ميشه جزئيات كار رو بيشتر توضيح بديد
تشكر

[امين اسماعيلي]

با درود
من یه فایل جامع و خوب در این خصوص دارم اماده میکنم که شما هر چند تا فایل با هر اسمی که داشته باشن ( اکسل باشه) رو انتخاب میکنین و بعد از اون تمام اطلاعات اونها میاد تو شیت 1 پشت سر هم میشینه . فقط یه ایراد داره که میخوام حلش کنم. البته اگر شما بگی که ایا همه اطلاعات تو اون شیت ها که به افراد میدین پر کنن تا یه حد پر میشه یا حداکثرش چند تاست و یه نمونشو بزارین بهتر میشه کار کرد ولی در کل امادش میکنم .

از اینکه خودتم چند تا مرحلشو انجام دادی . خیلی خوشحال شدم . موفق باشی.

[hoosein]

با درود
من یه فایل جامع و خوب در این خصوص دارم اماده میکنم که شما هر چند تا فایل با هر اسمی که داشته باشن ( اکسل باشه) رو انتخاب میکنین و بعد از اون تمام اطلاعات اونها میاد تو شیت 1 پشت سر هم میشینه . فقط یه ایراد داره که میخوام حلش کنم. البته اگر شما بگی که ایا همه اطلاعات تو اون شیت ها که به افراد میدین پر کنن تا یه حد پر میشه یا حداکثرش چند تاست و یه نمونشو بزارین بهتر میشه کار کرد ولی در کل امادش میکنم .

از اینکه خودتم چند تا مرحلشو انجام دادی . خیلی خوشحال شدم . موفق باشی.

سلام
تشكر جناب آقاي اسماعيلي
والا من نمونه اي كه مد نظرمه فايل خيلي ساده اي هست كه ميخوام در اختيار افراد قرار بدم تا مشخصات سن و تلفن خودشون رو توش وارد كنن و دوباره فايل رو برگردونن
تعداد آيتم ها هم محدود هست
براي نمونه يه فايل زيپ پيوست ميكنم شما ملاحظه بفرماييد
فايلها رو ميشه به افراد بگم بر اساس شماره پرسنلي شون سيو كنند
و قراره اطلاعان اين سه نفر تو فايل بانك بشينه

http://s2.picofile.com/file/7684646876/excel.rar.html

[امين اسماعيلي]

با درود

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

دومین مزیت فایل : حتما نیاز نیست که در فایل هایی که به دست پرسنل یا هر شخصی میدین فقط یه ردیف پر شده باشه. اگرم چند تا ردیف پر شده باشه . خودش تشخیص میده . این فایل بسته به خواسته شماا اماده شده که تا E ستون داشتین . با یه تغییر ساده میشه ارتقائش داد.
یه تغییر ساده در حروف داخل vba


لینک دانلود :

http://uplod.ir/hvz3t2yik6bc/excel.rar.htm

یه نکته فراموش نشه واسه دوستان عزیز دیگه . این فایل پسوند xlsx داره ساپورت میکنه اگر خواستین میتونین تو کد ها ورژن رو تغییر بدین به افیس خودتون . البته دوستمون فک کنم مشکلی ندارن. با توجه به نمونه فایلی که گذاشتن

[hoosein]

با درود

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

دومین مزیت فایل : حتما نیاز نیست که در فایل هایی که به دست پرسنل یا هر شخصی میدین فقط یه ردیف پر شده باشه. اگرم چند تا ردیف پر شده باشه . خودش تشخیص میده . این فایل بسته به خواسته شماا اماده شده که تا E ستون داشتین . با یه تغییر ساده میشه ارتقائش داد.
یه تغییر ساده در حروف داخل vba


لینک دانلود :

http://uplod.ir/hvz3t2yik6bc/excel.rar.htm

یه نکته فراموش نشه واسه دوستان عزیز دیگه . این فایل پسوند xlsx داره ساپورت میکنه اگر خواستین میتونین تو کد ها ورژن رو تغییر بدین به افیس خودتون . البته دوستمون فک کنم مشکلی ندارن. با توجه به نمونه فایلی که گذاشتن

تشكر جناب اسماعيلي
خيلي عالي بود ♥
يه عرض ديگه هم خدمتتون داشتم و اون اينكه
آيا ميشه از طريق استفاده از توابع هم اينكار رو انجام داد
مثلا با توجه به فايل نمونه و با علم به اينكه اسامي فايلها رو داشته باشيم تو شيت بانك ( همون كد 101-105-110) بتونيم براي رديف اول در سلول a2 در فايل بانك دستي لينك بديم به فايلهاي مرجع مشابه :

=[101.xlsx]Sheet1!$A$2:$E$2 

و از سمت چپ تعميم بديم تا e2 رو پر كنه
و بعد بشه با استفاده از فرمولي مقادير مشابه (105-110) رو در تعميم هاي بعدي جايگزين [101.xlsx] عدد داخل كروشه كنيم ؟

يعني ميشه كاري كرد كه عدد داخل كروشه رو بشه تغيير داد ؟
مثلا با يه if يا iferror بهش بگيم اگه سلول f3 عدد 105 بود برو داخل كروشه رو عدد 105 بذار ؟
[hr]
در واقع شبيه فرمول زير براي رديف چهارم جدول

=IF(F4="";"";[f4.xlsx]Sheet1!$A$2:$E$2) 

با فرض اينكه در سلول F4 عدد 105 رو داريم
چجوري بهش بگيم بجاي f4 داخل كروشه عدد متناظر رو بذاره (105) ؟
پيشاپيش تشكر از لطفتون

[khakzad]

سلام
با تشکر از جناب اسماعیلی که زحمت کشیدن.(خدا رو شکر ایشون هستن، کم کاری های ما رو جبران می کنن)
ببخشید من خیلی سرم شلوغ بود تازه الان رسیدم بیام سایت و چک کنم

موفق باشید

[امين اسماعيلي]

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

[khakzad]

دوست عزیز کافیه این قسمت
!f4.xlxs ] sheet1]
توی فرمول رو به شکل زیر تغییر بدین:

&"!f4 &".xlxs ] sheet1 &"]"

اینطوری هرچی داخل f4 بنویسید همون خروجی مورد نظر که توی اولین خط نوشتین رو میده
(توجه کنید که فقط همین قسمت از فرمول رو تغییربدین.بقیش عینا تکرار میشه)