پرش به آخرین سلول واقعی در اکسل

Question

دایان در مورد مشکلی که با یک فایل وارد شده به اکسل داشت، نوشت. این فایل که توسط یک برنامه غیر اکسل ایجاد شده است، حاوی 50000 رکورد است، اما تنها 87 رکورد اول حاوی هر گونه داده است. هنگامی که فایل وارد می شود، فشار دادن Ctrl+End به جای سلول J87 به سلول J50000 منتقل می شود. دایان به این فکر می کرد که چگونه می تواند اکسل را به انتهای داده های واقعی-J87 برساند.

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

اگر این مشکل را حل نکرد، به احتمال زیاد داده‌هایی که به اکسل وارد کرده‌اید شامل کاراکترهای غیرچاپی مانند فاصله است. اگر این ها در سلول ها بارگذاری شوند، اکسل آنها را به عنوان داده می بیند، حتی اگر شما این کار را نکنید. برای تعمیر کتاب کار با حذف داده‌ها، ردیف 88 (یکی که درست بعد از داده‌هایتان است) را انتخاب کنید و سپس کلیدهای Shift و Ctrl را با فشار دادن فلش پایین نگه دارید. تمام سطرها از 88 تا آخرین سطر در کاربرگ باید انتخاب شوند. کلید Delete را فشار دهید ، کتاب کار را ذخیره کنید و دوباره آن را باز کنید. Ctrl+End باید خوب کار کند.

اگر تعداد کمی از این فایل‌ها را دارید، باید «پاک‌سازی» کنید، یا اگر باید این کار را به طور منظم انجام دهید، به یک ماکرو برای کمک به شما نیاز دارید. ماکرو زیر را در نظر بگیرید:

Sub ClearEmpties()
    Dim c As Range
    Dim J As Long

    J = 0
    Selection.SpecialCells(xlCellTypeConstants, 23).Select
    For Each c In Selection.Cells
        J = J + 1
        StatusBar = J & " of " & Selection.Cells.Count
        c.Value = Trim(c.Value)
        If Len(c.Value) = 0 Then
            c.ClearFormats
        End If
    Next
    StatusBar = ""
End Sub

این ماکرو تمام سلول‌های کاربرگ را که دارای ثابت هستند انتخاب می‌کند (به عبارت دیگر، آنها حاوی فرمول نیستند). سپس از هر یک از آن سلول‌ها عبور می‌کند و از تابع Trim برای حذف فضاهای اصلی یا انتهایی از محتویات استفاده می‌کند. اگر سلول خالی باشد، هر قالب بندی از سلول پاک می شود.

وقتی ماکرو تمام شد، می‌توانید کتاب کار را ذخیره کرده و ببندید، آن را دوباره باز کنید و باید بتوانید از Ctrl+End برای رفتن به انتهای واقعی داده‌های خود استفاده کنید. اگر این باز هم کار نکرد، به این معنی است که سلول‌هایی که به کتاب کار وارد می‌شوند دارای یک کاراکتر نامرئی و غیرچاپی دیگری هستند. به عنوان مثال، ممکن است برخی از شخصیت های کنترلی عجیب و غریب در سلول ها وجود داشته باشد. در این مورد، باید با کسی که فایل واردات شما را ایجاد می کند صحبت کنید. بهترین راه حل، در این مرحله، این است که شخص برنامه خود را تغییر دهد تا حاوی "سطل زباله" ای نباشد که اکسل با محتوای سلول معتبر اشتباه می گیرد.