পরবর্তী নতুন সামগ্রীতে যাওয়ার জন্য শর্টকাট (এক্সেল)


2

আমি জানতে চাই যে সরানোর জন্য একটি শর্টকাট আছে কিনা এবং কোনও সারিতে শেষ কক্ষ বা বর্তমান কক্ষের মতো একই সামগ্রী সহ কমন নির্বাচন করুন। অর্থাত ctrl + arrow ডাটা অ্যারের প্রান্তে সরাতে পারে, তবে আমি সরাতে চাই এবং আদর্শভাবে একই প্রদর্শিত সামগ্রীর অ্যারের প্রান্তে (যেমন একই ফলাফল, তবে একই সূত্র নাও) সবাইকে নির্বাচন করতে চাই।

উদাহরণস্বরূপ "100" সহ 100 টি কোষ সহ আমার একটি কলাম আছে, তারপরে "2" সহ 100 টি কোষ এবং "3" সহ 100 টি কোষ রয়েছে। "2" শর্টকাট দিয়ে ঘরগুলির একটি নির্বাচন করলে আমি "3" এর আগে "2" এর সাথে শেষ ঘরটি নির্বাচন করব।

কোষগুলির প্রদর্শিত ফলাফল এবং কোষের সামগ্রীর মধ্যে পার্থক্যের মোকাবেলা করলে উত্তরটি দুর্দান্ত হবে (অর্থাৎ কলামের কোষগুলি যা "2" প্রদর্শন করে তা আসলে "= 1 + 1" এবং "=" 3-1 ")।

উত্তর:


1

Excel এ নির্মিত এমন কোনও ফাংশন নেই তবে আপনি এটি তৈরি করতে পারেন।

এক্সেল 2010 কীবোর্ড শর্টকাট , এক্সেল 2013 কীবোর্ড শর্টকাট , এক্সেল অনলাইন কীবোর্ড শর্টকাট

আপনি যা চান কীবোর্ড শর্টকাট অনুকরণ করতে, আপনি ব্যবহার করে VBA ব্যবহার করতে পারেন Application.OnKey একটি ম্যাক্রো একটি কীবোর্ড সমন্বয় বরাদ্দ করার পদ্ধতি। নিম্নরূপ ধারণা: Workbook_Open ইভেন্টে, ম্যাক্রোগুলিতে কীবোর্ড আদেশগুলি বরাদ্দ করুন Workbook_BeforeClose ইভেন্টে, একই কমান্ডগুলিকে কিছুই নির্দিষ্ট করুন (ডিফল্টে রিসেট করুন) একটি মডিউলে, সেই কীবোর্ডের কমান্ডগুলির জন্য আপনি যে subroutines চালাতে চান তা লিখুন

এখন, যখনই আপনি ওয়ার্কবুকটি খুলবেন, আপনার নির্বাচিত কীবোর্ড কমান্ডগুলি ম্যাক্রো চালাবে যা আপনি যা চান তা করতে পারবেন। এই শীট কাছাকাছি চলন্ত চেয়ে আরো উপায় জন্য ভাল। আমার উদাহরণে, আমি ডাউন এবং আপের জন্য CTRL + D এবং CTRL + U কীগুলি বরাদ্দ করেছি কিন্তু আপনি যেগুলি আপনার কাছে সবচেয়ে বেশি ইন্দ্রিয় তোলে তা চয়ন করুন। আপনি যদি এই কীবোর্ড কমান্ডগুলি প্রতিটি ফাইলের জন্য কাজ করতে চান তবে প্রাইমাইজটি একই রকম যে আপনি তাদের পরিবর্তে আপনার ব্যক্তিগত ম্যাক্রো কার্যক্ষেত্রে সেগুলি সংরক্ষণ করুন।

আমি ফাইল সংযুক্ত করতে পারি না তাই কোড এখানে। (মনে রাখবেন যে এই কোডটি রুক্ষ এবং দ্রুত। আমি সবচেয়ে সহজ উদাহরণ চাই, সবচেয়ে শক্তিশালী কোড নয়।)

"এই ওয়ার্কবুক" বস্তুর মধ্যে:

Private Sub Workbook_Open()
    Application.OnKey "^d", "findLastOfThis"
    Application.OnKey "^u", "findFirstOfThis"
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.OnKey "^d"
    Application.OnKey "^u"
End Sub

একটি মডিউল মধ্যে:

Option Explicit
Private Sub findLastOfThis()
    Dim val As Variant
    Dim r As Long, c As Long
    val = ActiveCell.Value
    c = ActiveCell.Column
    For r = ActiveCell.Row To ActiveSheet.UsedRange.Rows.Count
        If Cells(r, c).Value <> val Then Exit For
    Next
    r = r - 1
    Cells(r, c).Activate
End Sub

Private Sub findFirstOfThis()
    Dim val As Variant
    Dim r As Long, c As Long
    val = ActiveCell.Value
    c = ActiveCell.Column
    For r = ActiveCell.Row To 1 Step -1
        If Cells(r, c).Value <> val Then Exit For
    Next
    r = r + 1
    Cells(r, c).Activate
End Sub
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.