صفحه 2 از 3 نخستنخست 123 آخرینآخرین
نمایش نتایج: از شماره 11 تا 20 , از مجموع 24

موضوع: فرستدن ردیف های از یک شیت به شیت دیگر در همان ورکبوک

  1. #11


    آخرین بازدید
    2023/08/17
    تاریخ عضویت
    March 2015
    محل سکونت
    آمل
    نوشته ها
    3,343
    امتیاز
    11575
    سپاس
    1,885
    سپاس شده
    8,165 در 3,011 پست
    تعیین سطح نشده است

    نقل قول نوشته اصلی توسط shitelsz نمایش پست ها
    سلام ممنون.
    بله این اشکالو داره که چنتا لین رو باهم می*فرسته در بعضی* مورد.
    کسی* از دوستان می*تونه این مشکل رو حل کنه ؟
    مشکل برطرف شد
    فايل هاي پيوست شده فايل هاي پيوست شده

  2. سپاس ها (3)


  3.  

  4. #12


    آخرین بازدید
    2017/07/09
    تاریخ عضویت
    July 2015
    نوشته ها
    11
    امتیاز
    14
    سپاس
    0
    سپاس شده
    4 در 4 پست
    تعیین سطح نشده است

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

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

    امیدوارم که توضیحات کافی* باشه...
    فايل هاي پيوست شده فايل هاي پيوست شده

  5. #13


    آخرین بازدید
    2017/07/09
    تاریخ عضویت
    July 2015
    نوشته ها
    11
    امتیاز
    14
    سپاس
    0
    سپاس شده
    4 در 4 پست
    تعیین سطح نشده است

    این فایل درست هستش دوست من عذر می*خوام.
    فايل هاي پيوست شده فايل هاي پيوست شده

  6. #14


    آخرین بازدید
    2024/01/21
    تاریخ عضویت
    November 2013
    محل سکونت
    تهران
    نوشته ها
    1,519
    امتیاز
    6121
    سپاس
    2,884
    سپاس شده
    4,889 در 1,381 پست
    سطح اکسل
    71.67 %

    شما کافي است اين کد را براي شيت OPEN بنويسيد:
    کد PHP:
    Private Sub Worksheet_Change(ByVal Target As Range)
    Dim C As Range
    Dim D 
    As Integer
    Dim J 
    As Variant
     
    If (ActiveCell.Row And ActiveCell.Column 10) And (ActiveCell.Value "In progress" Or ActiveCell.Value "Complete"Then
        D 
    ActiveCell.Row
        J 
    ActiveCell.Value
        Rows
    (D).Cut
        Worksheets
    (J).Activate
           
    If Worksheets(J).Range("A4") = "" Then
              Worksheets
    (J).Range("A4").Select
             
    Else
              
    Worksheets(J).Range("A3").Select
              Selection
    .End(xlDown).Offset(10).Select
           End 
    If
        
    ActiveSheet.Paste
        Worksheets
    (J).Cells(ActiveCell.Row10).Value ""
        
    Worksheets("Open").Activate
        Rows
    (D).Delete
     End 
    If
    End Sub 
    و براي دو شيت ديگر هم همين کد را با تغيير اسامي شيت ها در کد مجددا" استفاده کنيد تا برعکس مطلب هم اجرا گردد.
    من فايل پيوست را فقط با کد جهت شيت OPEN به عنوان مثال برايتان مي گذارم:
    فايل هاي پيوست شده فايل هاي پيوست شده
    ویرایش توسط Ali Parsaei : 2015/07/06 در ساعت 16:22


  7. #15


    آخرین بازدید
    2017/07/09
    تاریخ عضویت
    July 2015
    نوشته ها
    11
    امتیاز
    14
    سپاس
    0
    سپاس شده
    4 در 4 پست
    تعیین سطح نشده است

    ممنونم دوست من در اولین فرصت این رو چک می*کنم و اگر به مشکلی* برخورد کردم با شما در میون میزارم.
    واقعا از راهنمایتیون ممنونم.

  8. سپاس ها (1)


  9. #16


    آخرین بازدید
    2016/01/16
    تاریخ عضویت
    December 2014
    نوشته ها
    7
    امتیاز
    12
    سپاس
    6
    سپاس شده
    2 در 1 پست
    تعیین سطح نشده است

    سوال جدید

    سلام دوستان
    یک سوال داشتم که در همین ضمینه هست.
    ممنون میشم اگه وقتتون رو بذارید.

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

    بسیار ممنونم
    فايل هاي پيوست شده فايل هاي پيوست شده
    • نوع فایل: xlsx Excel.xlsx اطلاعات (12.4 کیلو بایت, 18 نمایش)

  10. #17


    آخرین بازدید
    2023/08/14
    تاریخ عضویت
    March 2010
    محل سکونت
    تهران
    نوشته ها
    2,034
    امتیاز
    4508
    سپاس
    2,467
    سپاس شده
    4,096 در 1,241 پست
    سطح اکسل
    85.00 %

    khakzad به Yahoo ارسال پیام
    سلام
    دوست عزیز
    منطق این کار درست نیست
    شما باید یک دیتابیس داشته باشید
    و گزارش هاتون رو بر اساس اون بنویسید.
    دیتابیس همینطور که دارید وارد می کنید درسته
    کافیه مثلا با پیوت گزارش بگیرید و اسم افراد رو در لیست فیلتر بیارید
    هر لحظه اسم هر نفر رو بزنید و گزارش مربوطه رو بگیرید


  11. #18


    آخرین بازدید
    2023/08/17
    تاریخ عضویت
    March 2015
    محل سکونت
    آمل
    نوشته ها
    3,343
    امتیاز
    11575
    سپاس
    1,885
    سپاس شده
    8,165 در 3,011 پست
    تعیین سطح نشده است

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

    لینک دانلود


  12. #19


    آخرین بازدید
    2016/01/16
    تاریخ عضویت
    December 2014
    نوشته ها
    7
    امتیاز
    12
    سپاس
    6
    سپاس شده
    2 در 1 پست
    تعیین سطح نشده است

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

    بابت وقتی که گذاشتین ممنون

  13. #20


    آخرین بازدید
    2023/08/14
    تاریخ عضویت
    March 2010
    محل سکونت
    تهران
    نوشته ها
    2,034
    امتیاز
    4508
    سپاس
    2,467
    سپاس شده
    4,096 در 1,241 پست
    سطح اکسل
    85.00 %

    khakzad به Yahoo ارسال پیام
    سلام مجدد
    اگر اصرا به کد دارید که باید از تالار ویژوال کمک بگیرید و تا یک جایی پیش برید و بیاید مرحله به مرحله سوال بپرسید.
    اما در مورد پیوتف همچنان نظرم همونه.
    شما یک بار پیوت میگیرید فیلد اسم و فامیل رو می برید توی فیلتر، بعد از قسمت option گزینه show report filter page رو که بزنید، به ازای هر نام و نام خانوادگی یک شیت و با همون نام درست میکنه.

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



صفحه 2 از 3 نخستنخست 123 آخرینآخرین

اطلاعات موضوع

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

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

موضوعات مشابه

  1. پاسخ ها: 6
    آخرين نوشته: 2016/05/24, 11:54
  2. قابلیت جستجو در انجمن
    توسط aminbehdad در انجمن مشكلات كاربري شما
    پاسخ ها: 1
    آخرين نوشته: 2015/04/09, 14:35
  3. جستجو در چند شیت
    توسط a.dal65 در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 2
    آخرين نوشته: 2015/01/07, 13:41
  4. [حل شده] تهیه یک شیت راهنما برای دسترسی به شیت های یک فایل
    توسط sasami در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 3
    آخرين نوشته: 2015/01/06, 15:43
  5. جستجو در تمامی شیت های یک فایل
    توسط mahsa shayesteh در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 5
    آخرين نوشته: 2012/03/25, 15:44

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

انجمن اكسل ايران , اكسل , اكسس , سوال و جواب اكسل , سوال اكسس , انجمن اكسل ايران , توابع اكسل, آموزش اكسل, آموزش اكسس, VBA, ويژوال بيسيك

کلمات کلیدی این موضوع

علاقه مندی ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است
با ما در تماس باشيد