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

برعکس کردن یک رشته در اکسل چطور می‌شه؟

+1 امتیاز
1,878 نمایش

چطور می‌شه در اکسل یک رشته رو به صورت برعکس بنویسم؟ مثلاً برعکس رشته‌ی abcd می‌شه dcba. این رشته‌ها رو باید از یک سلول اکسل بخونیم

پرسیده شده پنجشنبه ۲۶ دی ۱۳۹۲ توسط prodo (7,935 امتیاز)

2 پاسخ

+1 امتیاز

با سلام
کافی است ماجول زیر را بنویسید

Sub ReverseText()
'Updateby20131128
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    xValue = Rng.Value
    xLen = VBA.Len(xValue)
    xOut = ""
    For i = 1 To xLen
        getChar = VBA.Right(xValue, 1)
        xValue = VBA.Left(xValue, xLen - i)
        xOut = xOut & getChar
    Next
    Rng.Value = xOut
Next
End Sub
پاسخ داده شده چهارشنبه ۳۱ تیر ۱۳۹۴ توسط ناشناس
ویرایش شده چهارشنبه ۳۱ تیر ۱۳۹۴ توسط prodo
+1 امتیاز
پاسخ داده شده چهارشنبه ۳۱ تیر ۱۳۹۴ توسط ناشناس
ویرایش شده چهارشنبه ۳۱ تیر ۱۳۹۴ توسط prodo
...