वीबीए का उपयोग कर एक्सेल प्रोग्रामिंग करते समय मैं कुछ भी चयन कैसे सेट करूं?

Question

जब मैं range.copy और range.paste का उपयोग करने के बाद ग्राफ बना देता हूं तो यह चयनित पेस्ट रेंज छोड़ देता है, और फिर जब मैं कुछ पंक्तियों के बाद ग्राफ बनाता हूं, तो यह प्लॉट में पहली श्रृंखला के रूप में चयन का उपयोग करता है। मैं श्रृंखला को हटा सकता हूं, लेकिन क्या ऐसा करने का एक और शानदार तरीका है? मैंने

Set selection = nothing 

पर प्रयास किया लेकिन यह मुझे चयन सेट करने नहीं देगा। मैंने चयन की कोशिश भी की। सरल, लेकिन उसने अभी चयनित अंतिम कोशिकाओं को मंजूरी दे दी, और अभी भी साजिश में एक अतिरिक्त श्रृंखला जोड़ा।

Answer 1

Cells(1,1).Select 

यह A1 सेल, जिससे आपके मौजूदा चयन रद्द करने के लिए ले जाएगा।

Answer 2

मुझे नहीं लगता कि यह किया जा सकता है। चिप पियरसन की साइट से कोई संशोधन नहीं होने के साथ यहां कुछ कोड कॉपी किए गए हैं: http://www.cpearson.com/excel/UnSelect.aspx।

UnSelectActiveCell

यह प्रक्रिया चुनाव से सक्रिय सेल निकाल देंगे।

Sub UnSelectActiveCell() 
    Dim R As Range 
    Dim RR As Range 
    For Each R In Selection.Cells 
     If StrComp(R.Address, ActiveCell.Address, vbBinaryCompare) <> 0 Then 
      If RR Is Nothing Then 
       Set RR = R 
      Else 
       Set RR = Application.Union(RR, R) 
      End If 
     End If 
    Next R 
    If Not RR Is Nothing Then 
     RR.Select 
    End If 
End Sub 

UnSelectCurrentArea

यह प्रक्रिया चुनाव से सक्रिय सेल युक्त क्षेत्र को हटा देगा।

Sub UnSelectCurrentArea() 
    Dim Area As Range 
    Dim RR As Range 

    For Each Area In Selection.Areas 
     If Application.Intersect(Area, ActiveCell) Is Nothing Then 
      If RR Is Nothing Then 
       Set RR = Area 
      Else 
       Set RR = Application.Union(RR, Area) 
      End If 
     End If 
    Next Area 
    If Not RR Is Nothing Then 
     RR.Select 
    End If 
End Sub 

Answer 3

आप Application.ScreenUpdating = False सेट कर सकते हैं और एक सेल आउट व्यू का चयन कर सकते हैं और फिर .ScreenUpdating को सत्य पर सेट कर सकते हैं। यह कम से कम वर्तमान दृश्य में किसी भी चयनित कोशिकाओं को नहीं दिखाएगा।

Answer 4

Application.CutCopyMode = False 

Answer 5

Excel 2007 का चयन करें और CutCopyMode संपत्ति का उपयोग कर एक संयोजन में, यह सब चयन रीसेट करने के लिए संभव है। यह मेरे उपयोग के मामले के लिए काम किया।

Application.CutCopyMode = xlCopy 
ActiveSheet.Range("A" & lngRow).Select 

सादर मधुर

Answer 6

कुछ नहीं है कि आपकी समस्या का समाधान का चयन करने के लिए एक तरीका है।

1. एक आकार बनाएँ (एक आयत)
2. नाम यह आकृतियाँ डेटाबेस में >>> उदाहरण के लिए: "तैयार"
3. यह MYDOC.Shapes ("तैयार") को देखें और गलत पर दृश्यता बदलने

जब आप चाहते हैं एक्सेल का चयन कुछ भी यह है कि:

MYDOC.Shapes("Ready").visible=True 
MYDOC.Shapes("Ready").Select 
MYDOC.Shapes("Ready").visible=False 

यह चयन और कुछ भी नहीं अभी भी आप में से चयन किया छिपाने आर विंडो प्लस: शब्द "तैयार" आपके शीट में बाएं शीर्ष पर दिखाया गया है।

Answer 7

बस

SendKeys "{ESC}" का उपयोग

जिससे अपने चयन को रद्द।

Answer 8

किसी भी सेल का चयन करें और कटकोपीमोड बंद करें।

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

Answer 9

Selection(1, 1).Select अपने वर्तमान चयन का केवल ऊपरी बाएं सेल का चयन करेंगे।

Answer 10

एक बटन का उपयोग कर पेस्ट प्रक्रिया कॉल करने के लिए,

कोशिश ऑपरेशन के बाद बटन को सक्रिय। इस सफलतापूर्वक

• छिपा बातें
• अन्य कक्ष
• क्लिपबोर्ड मोड
• को प्रभावित करने वाले (जो वास्तव में क्या कहा गया था के विपरीत है) का चयन के साथ चारों ओर उलझे बिना चयन

  को साफ करता है भागने को दबाए रखने की हैकी विधि है जो हमेशा काम नहीं करती है

एचटीएच

Sub BtnCopypasta_Worksheet_Click() 
    range.copy 
    range.paste 
BtnCopypasta.Activate 
End sub 

HTH

Answer 11

की कोशिश की सभी अपने सुझाव, कोई भाग्य, लेकिन यहाँ एक विचार है कि मेरे लिए काम किया फिर अपने चयन रेंज (माना AAA1000000) के बाहर एक सेल का चयन करें और फिर A1

है

रेंज ("AAA1000000")। सक्रिय

रेंज ("A1")। सक्रिय

लड़का

Answer 12

मुझे एक्सेल 2013 के साथ यह समस्या थी। मेरे पास "फ्रीज पैन" सेट था, जिससे समस्या उत्पन्न हुई। जब मैंने जमे हुए पैन हटा दिए तो समस्या हल हो गई।

Answer 13

आप अंत में इस कोड का उपयोग कर सकते हैं। (गलत उपयोग न करें)

Application.CutCopyMode = True