واردکردن اطلاعات یه فایل اکسل به طوراتوماتیک در فایل اکسل دیگر

[amin.t]

با درود
لطف دارین از همه دوستان بابت کمرنگ شدن حضورم معذرت میخوام - سخت بهم نگیرین یکم گیرم این روزا - و اما یادگیری برنامه نویسی - ایشالا تو همین سایت دوره هایی گذاشته میشه که شرکت در انها خالی از لطف نیست و بعدش تمرین و تمرین و تمرین + مشکلات قبلی دوستانو برسی کردن

سلام آقای اسماعیلی
ممنون از راهنماییتون .بی صبرانه منتظر دوره های آموزشیتون می مانم.
دوست عزیز من با اجازتون از کد های شما در فایل جدیدم استفاده کردم و دوست دارم شما اونو یه نگاه کنید و اگر نکته خاصی بود بیان کنید.
تنها مشکلی که فکر می کنم وجود دارد زمان آپ دوم به بعده که فایل tsetmc در درایو c ایجاد شده و اکسل دوباره که میاد فایل رو ذخیره کنه ازمون سئوال میکنه ،بنظر شما راه حلی برای ذخیره اتوماتیک داده و رفع این مشکل وجود دارد.
دوباره ممنون .

Book1.xlsm - 99 KB

[Ali Parsaei]

سلام آقای اسماعیلی
ممنون از راهنماییتون .بی صبرانه منتظر دوره های آموزشیتون می مانم.
دوست عزیز من با اجازتون از کد های شما در فایل جدیدم استفاده کردم و دوست دارم شما اونو یه نگاه کنید و اگر نکته خاصی بود بیان کنید.
تنها مشکلی که فکر می کنم وجود دارد زمان آپ دوم به بعده که فایل tsetmc در درایو c ایجاد شده و اکسل دوباره که میاد فایل رو ذخیره کنه ازمون سئوال میکنه ،بنظر شما راه حلی برای ذخیره اتوماتیک داده و رفع این مشکل وجود دارد.
دوباره ممنون .

Book1.xlsm - 99 KB

سلام،
با اجازه آقاي اسماعيلي،
من يک مشکل شبيه مشکل شما داشتم،
لينک زير را نگاه کنيد، آقاي قاسميان يک کد براي غير فعال کردن آلرت ها گذاشته، فکر کنم مشکلتون را حل کند:
[حل شده] پيغام اخطار در خصوص وجود ماکرو موقع بستن فايلي که ماکرو ندارد!!

[amin.t]

سلام،
با اجازه آقاي اسماعيلي،
من يک مشکل شبيه مشکل شما داشتم،
لينک زير را نگاه کنيد، آقاي قاسميان يک کد براي غير فعال کردن آلرت ها گذاشته، فکر کنم مشکلتون را حل کند:
[حل شده] پيغام اخطار در خصوص وجود ماکرو موقع بستن فايلي که ماکرو ندارد!!

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

[Ali Parsaei]

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

مشکلتون با همون رفع مي شود، ببينيد من توضيح مي دهم چکار کنيد:
روي دگمه استارت راست کليک کنيد، ASSING MACRO را بزنيد و بعد EDIT را بزنيد، بعد در پنجره اي که باز مي شود کد زير را جايگزين کد ماکرو START کنيد، يعني اولين خط که نوشته ()SUB START تا اولين جايي که نوشته END SUB و پايينش خط تيره کشيده را انتخاب کرده و کد زير را جايگزين آن کنيد، در اصل فقط دو خط به کد قبلي اضافه شده که اولي آلرت ها را غير فعال و بعدي آنها را فعال مي کند، اون دو خط را هم اگر خواستيد مي توانيد با مقايسه کد زير و کد قبلي به صورت دستي هم تايپ کنيد:

Sub Start()
'
'
 Start Macro'

    Application.DisplayAlerts = False
    Workbooks.Add
    ChDir "C:\"    
    ActiveWorkbook.SaveAs Filename:="C:\tsetmc.xlsx", FileFormat:= _        
    xlOpenXMLWorkbook, CreateBackup:=False
    Application.DisplayAlerts = True
    ActiveWindow.Close
    Application.Run "DownloadFile"
    Application.Run "Insert"
End Sub 

[amin.t]

مشکلتون با همون رفع مي شود، ببينيد من توضيح مي دهم چکار کنيد:
روي دگمه استارت راست کليک کنيد، ASSING MACRO را بزنيد و بعد EDIT را بزنيد، بعد در پنجره اي که باز مي شود کد زير را جايگزين کد ماکرو START کنيد، يعني اولين خط که نوشته ()SUB START تا اولين جايي که نوشته END SUB و پايينش خط تيره کشيده را انتخاب کرده و کد زير را جايگزين آن کنيد، در اصل فقط دو خط به کد قبلي اضافه شده که اولي آلرت ها را غير فعال و بعدي آنها را فعال مي کند، اون دو خط را هم اگر خواستيد مي توانيد با مقايسه کد زير و کد قبلي به صورت دستي هم تايپ کنيد:

Sub Start()
'
'
 Start Macro'

    Application.DisplayAlerts = False
    Workbooks.Add
    ChDir "C:\"    
    ActiveWorkbook.SaveAs Filename:="C:\tsetmc.xlsx", FileFormat:= _        
    xlOpenXMLWorkbook, CreateBackup:=False
    Application.DisplayAlerts = True
    ActiveWindow.Close
    Application.Run "DownloadFile"
    Application.Run "Insert"
End Sub 

سلام
بله حالا درست شد
دست شما و آقای اسماعیلی درد نکنه.
واقعا اکسل دنیای شیرینی داره.

[Amir Ghasemiyan]

سلام
بله حالا درست شد
دست شما و آقای اسماعیلی درد نکنه.
واقعا اکسل دنیای شیرینی داره.

دوست عزيز در صورتي كه به جواب مورد نظرتون رسيديد گزينه حل شد (تيك سبز رنگ) در پست اولتون رو كليك كنيد
با تشكر

[mixer17]

سلام آقای اسماعیلی
ممنون از راهنماییتون .بی صبرانه منتظر دوره های آموزشیتون می مانم.
دوست عزیز من با اجازتون از کد های شما در فایل جدیدم استفاده کردم و دوست دارم شما اونو یه نگاه کنید و اگر نکته خاصی بود بیان کنید.
تنها مشکلی که فکر می کنم وجود دارد زمان آپ دوم به بعده که فایل tsetmc در درایو c ایجاد شده و اکسل دوباره که میاد فایل رو ذخیره کنه ازمون سئوال میکنه ،بنظر شما راه حلی برای ذخیره اتوماتیک داده و رفع این مشکل وجود دارد.
دوباره ممنون .

Book1.xlsm - 99 KB

سلام جناب اسماعیلی عزیز لطفاً خاصیتی مثل فایل ضمیمه رو هم به فایل خروجی تولید شده اضافه کنید.کدها در این برگه وجود دارن ولی محل اضافه شدنشون رو من نمی دونستم.تشکر

[mahyar.mohammady]

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

ممنون

[Alisimah]

این فایل را ویروس دار تشخیص میده و دانلود نمیشه

[mohammad0147]

سلام روش استفاده این فایل چطوریه
من نتونستم
میشه توضیح بدین؟