نمایش نتایج: از شماره 1 تا 4 , از مجموع 4

موضوع: (آموزشی) جدا سازی نام ها از یکدیگر

  1. #1


    آخرین بازدید
    تاریخ عضویت
    January 2014
    نوشته ها
    798
    امتیاز
    1667
    سپاس
    591
    سپاس شده
    1,242 در 436 پست
    تعیین سطح نشده است

    (آموزشی) جدا سازی نام ها از یکدیگر

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

    ساده ترین راه استفاده از توابع هست اما در این بخش اگه نام و نا خانوادگی یا کلا هر جمله ای تعدادشون متناوب باشه باید برای هر تفکیک شدن یک فرمول نوشت که کار راحتی نیست
    این کد زیر تمام کلماتی که با یک space از یک دیگر جدا شده باشن رو برای ما تفکیک میکنه حالا هر تعدادی باشه مهم نیست
    کد:
    Sub foo()
    Dim varArr As Variant
    Dim i As Long, strArr() As String
    Application.ScreenUpdating = False
    With Worksheets(1)
        Let varArr = .Range(.Cells(1, 1), _
            .Cells(.Rows.Count, 1).End(xlUp)).Value
        If IsArray(varArr) Then
            For i = LBound(varArr, 1) To UBound(varArr, 1)
                Let strArr() = Split(varArr(i, 1))
                Let .Cells(i, 2).Resize( _
                    , UBound(strArr) + 1).Value = strArr
                Erase strArr
            Next
        Else: .Cells(1, 2).Resize(, 2).Value = Split(varArr)
        End If
    End With
    Application.ScreenUpdating = True
    End Sub
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.



  2.  

  3. #2


    آخرین بازدید
    2023/08/23
    تاریخ عضویت
    July 2016
    محل سکونت
    دهاقان
    نوشته ها
    73
    امتیاز
    41
    سپاس
    59
    سپاس شده
    31 در 22 پست
    تعیین سطح نشده است

    سلام ممنون
    یه سؤال
    این ماکرو اعداد رو از اول به آخر وارد می کنه
    اگه بخواهیم از آخر به اول وارد کنه چی باید تغییر کنه
    در ضمن یه ایرادی هم داره که توی فایل پیوست مشخص شده
    یعنی وقتی تعداد ردیفها زیاد میشه ، از ردیف اول انجام نمیده
    از راهنمایی شما ممنون میشم
    فايل هاي پيوست شده فايل هاي پيوست شده
    هر کس خود رأی شد هلاک می شود و آنکه با افراد صاحب نظر مشورت کند در عقل آنها شریک شده
    حضرت امیر علیه السلام

  4. #3


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

    با سلام

    از قابلیت text to columns از منوی دیتای اکسل استفاده کنید
    فايل هاي پيوست شده فايل هاي پيوست شده

  5. سپاس ها (3)


  6. #4


    آخرین بازدید
    2023/08/23
    تاریخ عضویت
    July 2016
    محل سکونت
    دهاقان
    نوشته ها
    73
    امتیاز
    41
    سپاس
    59
    سپاس شده
    31 در 22 پست
    تعیین سطح نشده است

    سلام ممنون
    خیلی عالی بود
    هر کس خود رأی شد هلاک می شود و آنکه با افراد صاحب نظر مشورت کند در عقل آنها شریک شده
    حضرت امیر علیه السلام


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

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

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

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

  1. آموزش راه اندازی یک کسب و کار آنلاین
    توسط ~M*E*H*D*I~ در انجمن مباحث مالی-بانکی-موقعیت های سرمایه گذاری
    پاسخ ها: 0
    آخرين نوشته: 2014/06/16, 10:38
  2. ُمرتب سازی خودکار در اکسل
    توسط ieumts در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 1
    آخرين نوشته: 2014/04/16, 01:07
  3. آموزش يكپارچه سازی کاربرگها با استفاده از دستور consolidate
    توسط Behnam در انجمن آموزش ابزارهاي اكسل
    پاسخ ها: 0
    آخرين نوشته: 2014/04/15, 22:09
  4. پاسخ ها: 0
    آخرين نوشته: 2014/02/18, 11:00
  5. آشکار سازی سلول های مخفی شده، پس از ذخیره سازی
    توسط only-only در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 1
    آخرين نوشته: 2012/04/24, 13:06

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

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

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

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

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

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