এক্সেল ভিবিএ "নির্বাচন না করা" চেয়েছিল


9

আমার ভিবিএ নির্বাচনের ফাঁকা থাকার জন্য দৌড় শেষ করার পরে আমি চূড়ান্ত উপস্থিতিটি দেখতে চাই - কোনও শিটের রঙিন (যদি এটি রেঞ্জ নির্বাচিত ছিল) বা কোনও গা bold় লাইন বাক্সে (নির্বাচিত ছিল এমন কিছু) তে কোনও সেল বা রেঞ্জ না থাকায়। পুপোজ: ক্লায়েন্টকে একটি পরিষ্কার চূড়ান্ত উপস্থিতি সহ উপস্থাপন করতে।

আমি অনুসন্ধান করেছি এবং এটি কীভাবে করব তা খুঁজে পাচ্ছি না। এমএস অনুসারে একটি অনির্বাচিত রয়েছে, তবে এটি কিছুই করার মতো বলে মনে হচ্ছে না।


আপনি পরিষ্কার চেহারা উপস্থাপন করার জন্য সংরক্ষণ করার সময় কেন সেল এ 1 নির্বাচন করবেন না। আপনি যদি সেল ফর্ম্যাটিংটি স্ট্রিপ করতে চান তবে এটি আলাদা জিনিস।
wbeard52

কার্সারটি কোথাও থাকতে হবে। এটিকে নীচের অংশে Worksheets("xxxx").Cells(Rows.Count,Columns.Count).Selectবা অন্য যে কোনও জায়গায় ব্যবহার করা অঞ্চল থেকে কমপক্ষে একটি স্ক্রিন দূরে রাখুন।
টনি ডালিমোর

আপনি যখন ম্যাক্রো ডাকছিলেন তখনই এটি আবার রেখে দিতে পারবেন?
সানসি

উত্তর:


9

যে কোনও ঘর নির্বাচন করুন এবং বন্ধ করুন CutCopy:

  Range("A1").Select
  Application.CutCopyMode = False

হ্যাঁ, আমার জন্য নিখুঁত। ধন্যবাদ। আমার কাছে একটি ভিবিএ ম্যাক্রো ছিল যা একটি ওয়ার্কবুক থেকে অন্য কোষে কিছু ঘর অনুলিপি করে উত্স ওয়ার্কবুকটি বন্ধ করে দেয়, তবে কিছু কক্ষ এখনও উত্সে অনুলিপি করার জন্য নির্বাচিত ছিল কারণ এটি এখনই বন্ধ হবে না। অ্যাপ্লিকেশন.কুটকোমিড = মিথ্যা আমার জন্য এটি স্থির করেছে। থ্যাঙ্কস কুঁড়ি!
TKoL

পার্শ্ব প্রতিক্রিয়া: ক্লিপবোর্ড সাফ করে। stackoverflow.com/a/17608260/733092
নওম্যানন

2

এক্সেলের সর্বদা কিছু না কিছু নির্বাচিত থাকে। চারপাশের একটি কাজ প্রয়োজন। একটি সেল অফ স্ক্রিন নির্বাচন সেখানে ফোকাস সেট করবে, যাতে এটি নিজেই কাজ করে না। এই কোডটি স্ক্রিনটিকে বন্ধ করে দেয় এবং তারপরে শিটটি দেখতে ব্যাক আপ করে দেয় A1

Sub NoSelect()    
  Range("BB100").Select
  ActiveWindow.SmallScroll up:=100
  ActiveWindow.SmallScroll ToLeft:=44
End Sub

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

Sub NoSelect()
   With ActiveSheet
   .EnableSelection = xlNoSelection
   .Protect
   End With
End Sub

শীটটি অরক্ষিত হওয়ার সাথে সাথে কার্সার একটি ঘর সক্রিয় করবে।


2

এটি করার একটি কৌশলপূর্ণ উপায় আছে।

বোতামের মতো একটি বস্তু তৈরি করুন। এই বোতামটি নির্বাচন করুন, তারপরে এটি লুকান এবং কোনও সেল নির্বাচন করা হবে না।

ActiveSheet.Shapes("Button 1").Visible = True

ActiveSheet.Shapes("Button 1").Select

ActiveSheet.Shapes("Button 1").Visible = False

এটাই.


1

একমাত্র উত্তর হ'ল প্রতারণা।

কলাম Aএবং সারি লুকান1

ভিতরে কার্সার রাখুন A1। এর কোণে একটি ছোট বিন্দু থাকবেB2


অথবা আপনি দেখতে পারা যায় এমন ব্যাপ্তির বাইরে কোনও সেল নির্বাচন করতে পারেন।
জেমস Mertz

@ ক্রোনস, যা 10% জুমে এবং 1280x1024 স্ক্রিনটি ~ HA375। সম্ভবত XFD1048576? :)
সানসি

1

আপনার নির্বাচনের আকারের উপর নির্ভর করে কোনও শিল্পকর্ম থেকে মুক্তি পাওয়ার জন্য (২০১৩ এক্সেলের মধ্যে এটিও একটি সমস্যা কিনা তা আমি জানি না, তবে ম্যাকের ক্ষেত্রে এটি আমার জন্য একটি ধ্রুবক ব্যথা ছিল) আপনি কেবল সেল দ্বারা লুপ লুপ করতে পারেন এবং প্রতিটি নির্বাচন করুন।


1

কোনও ঘর নির্বাচন করার আগে স্ক্রিন আপডেট বন্ধ করে, নির্বাচিত কক্ষগুলিতে স্ক্রোল অস্থায়ীভাবে অক্ষম করা হয়।

এই কোডটি বর্তমানে কোন ঘরগুলি দৃশ্যমান তা পরীক্ষা করে এবং দৃশ্যমান পরিসরের নীচে প্রথম ঘরটি নির্বাচন করে যা দৃষ্টিতে নয়। উদাহরণস্বরূপ, যখন আমি এটি চেষ্টা করি: দৃশ্যমান পরিসরটি A1: BC79 হয়, সুতরাং এই কোডটি A80 নির্বাচন করে নীচে এবং ডানদিকে স্ক্রোলিং করে এবং এটি আবার চালানো এক্সেলটি প্রকাশ করে যা প্রথম দৃশ্যমান কলামের নীচে দৃশ্যমান নয় এমন প্রথম ঘরটি নির্বাচন করে।

দিম আর রেঞ্জ হিসাবে
অ্যাপ্লিকেশন.স্ক্রিনআপডিটিং = মিথ্যা
সেট =
r (r.Cells.Count + 1)। নির্বাচন করুন
অ্যাপ্লিকেশন.স্ক্রিনআপডিটিং = সত্য


1

খুব পুরানো প্রশ্ন, তবে রেফারেন্সের জন্য আমার উত্তর:

তুমি ব্যবহার করতে পার

With ActiveSheet
    .EnableSelection = xlNoSelection
    .Protect
End With

0

একটি কৌশল ব্যবহার করুন: একটি আকার যুক্ত করুন, তারপরে এটি নির্বাচন করুন এবং এটি লুকান।

এর সোর্স কোড এই সাইটে বিভিন্ন প্রশ্নের উত্তরে।

আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.