मुख्य सामग्री पर जाएं

Excel में असंगत सूत्र त्रुटि को कैसे छुपाएं?

लेखक: सिलुविया अंतिम संशोधित: 2020-09-11

जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है, सेल में एक हरे रंग का त्रुटि संकेतक तब दिखाई देगा जब सूत्र उसके पास स्थित अन्य कोशिकाओं के सूत्र पैटर्न से मेल नहीं खाता है। दरअसल, आप इस असंगत सूत्र त्रुटि को छिपा सकते हैं। यह आलेख आपको इसे प्राप्त करने के तरीके दिखाएगा.

त्रुटि को अनदेखा करके एकल असंगत सूत्र त्रुटि छिपाएँ
VBA कोड के साथ चयन में सभी असंगत सूत्र त्रुटियों को छिपाएँ

त्रुटि को अनदेखा करके एकल असंगत सूत्र त्रुटि छिपाएँ

आप Excel में त्रुटि को अनदेखा करके प्रति समय एक असंगत सूत्र त्रुटि को छिपा सकते हैं। कृपया निम्नानुसार करें.

1. उस सेल का चयन करें जिसमें त्रुटि संकेतक है जिसे आप छिपाना चाहते हैं, फिर दिखाने वाले बटन पर क्लिक करें सेल के बगल में. स्क्रीनशॉट देखें:

2। चुनते हैं त्रुटि पर ध्यान न दें नीचे स्क्रीनशॉट में दिखाए अनुसार ड्रॉप डाउन सूची से।

तब त्रुटि सूचक तुरंत छिपा दिया जाएगा.

VBA कोड के साथ चयन में सभी असंगत सूत्र त्रुटियों को छिपाएँ

निम्नलिखित VBA विधि आपकी वर्कशीट में चयन में सभी असंगत सूत्र त्रुटियों को छिपाने में आपकी सहायता कर सकती है। कृपया निम्नानुसार करें.

1. वर्कशीट में, आपको सभी असंगत सूत्र त्रुटियों को छिपाने की आवश्यकता है, दबाएं ऑल्ट + F11 खोलने के लिए एक साथ कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, कृपया क्लिक करें सम्मिलित करें > मॉड्यूल, फिर कोड विंडो में VBA कोड को कॉपी और पेस्ट करें।

वीबीए कोड: वर्कशीट में सभी असंगत सूत्र त्रुटियों को छुपाएं

Sub HideInconsistentFormulaError()
    Dim xRg As Range, xCell As Range
    Dim xError As Byte
    On Error Resume Next
    Set xRg = Application.InputBox("Please select the range:", "KuTools For Excel", ActiveWindow.RangeSelection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        If xCell.Errors(xlInconsistentFormula).Value Then
            xCell.Errors(xlInconsistentFormula).Ignore = True
        End If
    Next
End Sub

3। दबाएं F5 कोड चलाने की कुंजी. पॉप अप में एक्सेल के लिए कुटूल संवाद बॉक्स में, कृपया उस श्रेणी का चयन करें जिसमें आपको सभी असंगत सूत्र त्रुटियों को छिपाने की आवश्यकता है, और फिर क्लिक करें OK बटन। स्क्रीनशॉट देखें:

फिर सभी असंगत सूत्र त्रुटियाँ चयनित सीमा से तुरंत छिपा दी जाती हैं। स्क्रीनशॉट देखें:

सर्वोत्तम कार्यालय उत्पादकता उपकरण

🤖 कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
सुपर लुकअप: एकाधिक मानदंड VLookup  |   मल्टीपल वैल्यू वीलुकअप  |   अनेक शीटों में VLookup   |   फजी लुकअप ....
उन्नत ड्रॉप-डाउन सूची: शीघ्रता से ड्रॉप डाउन सूची बनाएं   |  आश्रित ड्रॉप डाउन सूची   |  बहु-चयन ड्रॉप डाउन सूची ....
स्तम्भ प्रबंधक: कॉलमों की एक विशिष्ट संख्या जोड़ें  |  कॉलम ले जाएँ  |  छिपे हुए कॉलम की दृश्यता स्थिति टॉगल करें  |  रेंज और कॉलम की तुलना करें ...
फीचर्ड फीचर्स: ग्रिड फोकस   |  डिजाइन देखें   |   बड़ा फॉर्मूला बार   |  कार्यपुस्तिका एवं शीट प्रबंधक   |  संसाधन लाइब्रेरी (ऑटो टेक्स्ट)   |  खजूर बीनने वाला   |  कार्यपत्रकों को संयोजित करें   |  एन्क्रिप्ट/डिक्रिप्ट सेल   |  सूची के अनुसार ईमेल भेजें   |  सुपर फ़िल्टर   |   विशेष फ़िल्टर (फ़िल्टर बोल्ड/इटैलिक/स्ट्राइकथ्रू...) ...
शीर्ष 15 टूलसेट:  12 टेक्स्ट टूल्स (पाठ जोड़ें, अक्षर हटाएँ, ...)   |   50 + चार्ट प्रकार (गैन्ट चार्ट, ...)   |   40+ प्रैक्टिकल सूत्र (जन्मदिन के आधार पर आयु की गणना करें, ...)   |   19 निवेशन टूल्स (QR कोड डालें, पथ से चित्र सम्मिलित करें, ...)   |   12 रूपांतरण टूल्स (शब्दों को संख्याएँ, मुद्रा रूपांतरण, ...)   |   7 विलय और विभाजन टूल्स (उन्नत संयोजन पंक्तियाँ, विभाजन कोशिकाओं, ...)   |   ... और अधिक

एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है।  वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...

Description

ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (7)
No ratings yet. Be the first to rate!
speedy
speedy
This comment was minimized by the moderator on the site
Hello Crystal,

thank you very much for the code, its working now :)


Greets

speedy
Reply
0
0
speedy
speedy
This comment was minimized by the moderator on the site
Hello Crystal,

thank you for your testing time.

Do you use a basic old school (user formatted table) only or is it a table with a excel design and filter function in column head ?
Like shown here:
https://support.microsoft.com/de-de/office/%C3%BCbersicht-zu-excel-tabellen-7ab0bb7d-3a9e-4b56-a3c9-6c94334e492c

Latest is what I am using.

I can´t share my "programm" - its a financial tool for personal use.
The cells are with this content:
=HYPERLINK("https://www.domain.de/abc.html";"www")

Because each row has a another link, I´m getting the inconsistent errors.
I can hide it manually, but not with VBA.

I don´t know if your vba just works for a few seconds and then the errors appear again.
Reply
0
0
crystal
crystal     speedy
This comment was minimized by the moderator on the site
Hi speedy,
Many thanks for your feedback. The original code did not take into account the Table format data. The code has been updated as follows, please give it a try.

Sub HideInconsistentFormulaError()
'Updated by Extendoffice 20220902
    Dim xRg As Range, xCell As Range
    Dim xError As Byte
    On Error Resume Next
   Set xRg = Application.InputBox("Please select the range:", "KuTools For Excel", ActiveWindow.RangeSelection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        If xCell.Errors(xlEmptyCellReferences).Value Then
            xCell.Errors(xlEmptyCellReferences).Ignore = True
        ElseIf xCell.Errors(xlEvaluateToError).Value Then
            xCell.Errors(xlEvaluateToError).Ignore = True
        ElseIf xCell.Errors(xlInconsistentFormula).Value Then
            xCell.Errors(xlInconsistentFormula).Ignore = True
        ElseIf xCell.Errors(xlInconsistentListFormula).Value Then
            xCell.Errors(xlInconsistentListFormula).Ignore = True
        ElseIf xCell.Errors(xlListDataValidation).Value Then
           xCell.Errors(xlListDataValidation).Ignore = True
        ElseIf xCell.Errors(xlNumberAsText).Value Then
            xCell.Errors(xlNumberAsText).Ignore = True
        ElseIf xCell.Errors(xlOmittedCells).Value Then
            xCell.Errors(xlOmittedCells).Ignore = True
        ElseIf xCell.Errors(xlTextDate).Value Then
            xCell.Errors(xlTextDate).Ignore = True
        ElseIf xCell.Errors(xlUnlockedFormulaCells).Value Then
            xCell.Errors(xlUnlockedFormulaCells).Ignore = True
        End If
    Next
End Sub
Reply
Report
0
0
speedy
speedy
This comment was minimized by the moderator on the site
Hello Crystal,

The newest Excel 365 Version 2207 (Build 15427.20210)
Reply
0
0
crystal
crystal     speedy
This comment was minimized by the moderator on the site
Hi speedy,
I have tested the code in the same version (2207 (Build 15425.20210)) and it stil works.
Can you upload a sample file of your data here?
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/365_version.png
Reply
Report
0
0
speedy
speedy
This comment was minimized by the moderator on the site
Hello,

thank you for sharing your solution, but its not working in newest Excel 365
No VBA-Errors, but Excel still shows the inconsistent errors
Reply
0
0
crystal
crystal     speedy
This comment was minimized by the moderator on the site
Hi speedy,
Can you tell me the version of your Excel 365 you have?
I have tested the code in Excel 365 and it works well. so the problem cannot be reproduced.
Reply
Report
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations