2013-01-18 10 views
6

धोने से स्पष्ट मूल्य के लिए वीबीए मेरे पास ए 1: जेड 50 से डेटा है, लेकिन मैं वीबीए का उपयोग करके केवल ए 5: एक्स 50 को हटाना चाहता हूं (मुझे लगता है कि यह बहुत तेज़ होगा पूरे सेल को खींचना या clickA5+shift+clickX50+delete का उपयोग करना)। मैं यह कैसे कर सकता हूं?सेल और संरक्षित सेल की विशिष्ट श्रेणी में स्पष्ट मूल्य के लिए वीबीए फॉर्मूला

और फिर, सेल को लॉक करने के लिए इसे कैसे ठीक या साफ़ करने से रोकने के लिए?

+3

आपका प्रश्न अस्पष्ट है। कृपया निर्दिष्ट करें कि "मैं फॉर्मूला को साफ़ करने से कैसे रोकूं" – brettdj

+0

हां मैं इसे जोड़ दूंगा, पहले मैं केवल हटा देना चाहता हूं लेकिन अब मुझे लगता है कि मेरा फॉर्मूला भी चला गया है: डी – eathapeking

उत्तर

12

उपयोग कर सकते हैं आप एक मैक्रो निम्नलिखित कोड शामिल हों निर्धारित कर सकते हैं:

Sub DeleteA5X50() 
    Range("A5:X50").Select 
    Selection.ClearContents 
end sub 

मैक्रो चल रेंज ए 5 का चयन करेंगे: सक्रिय वर्कशीट पर x50 और उस सीमा के भीतर कोशिकाओं की सभी सामग्री साफ़ करें।

अपने सूत्रों बरकरार उपयोग छोड़ने के लिए बजाय निम्नलिखित:

Sub DeleteA5X50() 
    Range("A5:X50").Select 
    Selection.SpecialCells(xlCellTypeConstants, 23).Select 
    Selection.ClearContents 
end sub 

यह पहली कोशिकाओं के समग्र सीमा का चयन करेंगे आप से सामग्री को साफ करने में रुचि रखते हैं और फिर आगे चयन सीमित करने के लिए केवल कोशिकाओं शामिल होंगे जो इसमें 'एक्स्टेंट' होने का क्या उत्कृष्ट विचार है।

आप इसे 'गो टू' संवाद बॉक्स लाने के लिए 'एफ 5' मारकर और 'स्पेशल' बटन पर क्लिक करके 'कॉन्स्टेंट्स' विकल्प चुनने और क्लिक करने के लिए 'f5' मारकर एक्सेल में मैन्युअल रूप से एक्सेल में कर सकते हैं। 'ठीक'।

+0

यह सूत्र को भी सही करने जा रहा है: डी मैं फॉर्मूला को साफ़ करने से कैसे रोकूं: 3 या नहीं रास्ता – eathapeking

+5

@Glenn आपको इसे साफ़ करने के लिए चयन करने की आवश्यकता नहीं है :) 'शीट्स (1) .ेंज (" ए 5: एक्स 50 ")। ClearContents' करेगा। – bonCodigo

+0

हर किसी के लिए हर किसी के लिए बहुत बहुत धन्यवाद – eathapeking

3

प्रयास करें इस

Sheets("your sheetname").range("A5:X50").Value = "" 

तुम भी

ActiveSheet.range 
+0

बस इसे बदलें खाली सेल और activesheet.range पर इसका क्या मतलब है: डी – eathapeking

+0

तुम भी ActiveSheet.range उपयोग कर सकते हैं। ("ए 5: X50") मूल्य = "" तुम क्या चाहते हो? इसे हटाएं या खाली करें? – Niklas

+0

मैं अब यह समझ: 3 धन्यवाद है यह वाला सेल रंग और पृष्ठभूमि को धो और फॉर्मूला हो सकता है कि इस रेंज कोशिश सेल – eathapeking

2
नहीं

यकीन है कि अपनी तेजी से VBA के साथ - सामान्य एक्सेल programm में यह करने के लिए सबसे तेज़ तरीका होगा:

  1. Ctrl-G
  2. A1:X50 Enter
  3. Delete

जब तक आप के लिए है ऐसा अक्सर करें, वीबीएकोड में प्रवेश करना और फिर ट्रिगर करना अधिक प्रयास है।

और यदि आप केवल सूत्र या मानों को हटाना चाहते हैं, तो आप गोटो स्पेशल का चयन करने के लिए Ctrl-G, Alt-S डाल सकते हैं और यहां फ़ॉर्मूला या मान चुनें।

संबंधित मुद्दे