तालिका पुन: डिजाइनर

सामग्रीहरू

यो कुनै गोप्य कुरा छैन कि धेरै एक्सेल प्रयोगकर्ताहरू, पानाहरूमा तालिकाहरू सिर्जना गर्दा, उनीहरूको आफ्नै आराम र सुविधाको बारेमा सोच्नुहोस्। यसरी जटिल "हेडरहरू" भएका सुन्दर, रंगीन र बोझिल तालिकाहरू जन्मिन्छन्, जुन, एकै समयमा, फिल्टर वा क्रमबद्ध गर्न सकिँदैन, र पिभोट तालिकाको साथ स्वचालित रिपोर्टको बारेमा सोच्नु राम्रो हुँदैन।

चाँडै वा पछि, यस्तो तालिकाको प्रयोगकर्ता निष्कर्षमा पुग्छ कि "यो यति सुन्दर नहुन सक्छ, तर यसले काम गर्न सक्छ" र आफ्नो तालिकाको डिजाइनलाई सरल बनाउन थाल्छ, यसलाई क्लासिक सिफारिसहरूको साथमा ल्याउँछ:

  • एक साधारण एक-लाइन हेडर, जहाँ प्रत्येक स्तम्भको आफ्नै अद्वितीय नाम (फिल्ड नाम) हुनेछ।
  • एक लाइन - एक पूरा सञ्चालन (सौदा, बिक्री, पोस्टिंग, परियोजना, आदि)
  • मर्ज गरिएका कक्षहरू छैनन्
  • खाली पङ्क्ति र स्तम्भहरूको रूपमा ब्रेक बिना

तर यदि तपाइँ बहु-स्तरको एकबाट एक-लाइन हेडर बनाउनुहुन्छ वा एक स्तम्भ धेरैमा विभाजित गर्नुहुन्छ, यो एकदम सरल छ, त्यसपछि तालिका पुनर्निर्माणले धेरै समय लिन सक्छ (विशेष गरी ठूलो आकारमा)। यसको अर्थ निम्न अवस्था हो:

Of     तालिका पुन: डिजाइनर   do     तालिका पुन: डिजाइनर  

डाटाबेसको सन्दर्भमा, दायाँ तालिकालाई सामान्यतया समतल (फ्ल्याट) भनिन्छ - यो त्यस्ता तालिकाहरू अनुसार हो कि पिभोट तालिकाहरू (पिभोट तालिकाहरू) को रिपोर्टहरू निर्माण गर्न र विश्लेषणहरू सञ्चालन गर्न उत्तम हुन्छ।

तपाईं साधारण म्याक्रो प्रयोग गरेर दुई-आयामी तालिकालाई समतल तालिकामा रूपान्तरण गर्न सक्नुहुन्छ। ट्याब मार्फत भिजुअल बेसिक सम्पादक खोल्नुहोस् विकासकर्ता - भिजुअल बेसिक (विकासकर्ता - भिजुअल बेसिक सम्पादक) वा किबोर्ड सर्टकट alt+F11। नयाँ मोड्युल घुसाउनुहोस् (घुसाउनुहोस् - मोड्युल) र त्यहाँ यो म्याक्रोको पाठ प्रतिलिपि गर्नुहोस्:

Sub Redesigner() Dim i as long dim hc integer को रूपमा, hr integer dim ns as Worksheet hr = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько столбцов)? False i = 1 सेट inpdata = चयन सेट ns = Worksheets। r = (hr + 1) को लागि inpdata.Rows.Count for c = (hc + 1) inpdata.Columns.Count for j = 1 hc ns को लागि थप्नुहोस्। कक्षहरू(i, j) = inpdata।Cells(r, j) अर्को j को लागि k = 1 देखि hr ns। कक्षहरू(i, j + k - 1) = inpdata।Cells(k, c) अर्को k ns.Cells( i, j + k - 1) = inpdata.Cells(r, c) i = i + 1 अर्को c अर्को r अन्त्य उप  

त्यसपछि तपाइँ VBA सम्पादक बन्द गर्न सक्नुहुन्छ र एक्सेलमा फर्कन सक्नुहुन्छ। अब हामी मूल तालिका चयन गर्न सक्छौं (पूर्ण रूपमा, हेडरको साथ र महिनाहरूको साथ पहिलो स्तम्भ) र हाम्रो म्याक्रो मार्फत चलाउन सक्छौं। विकासकर्ता - म्याक्रो (विकासकर्ता - म्याक्रो) वा संयोजन थिच्नुहोस् alt+F8.

म्याक्रोले पुस्तकमा नयाँ पाना घुसाउनेछ र चयन गरिएको तालिकाको नयाँ, पुनर्निर्माण गरिएको संस्करण सिर्जना गर्नेछ। तपाईं यस्तो तालिकाको साथ "पूर्ण रूपमा" काम गर्न सक्नुहुन्छ, एक्सेल उपकरणहरूको सम्पूर्ण शस्त्रागार प्रयोग गरेर ठूला सूचीहरू प्रशोधन र विश्लेषण गर्न।

  • म्याक्रोहरू के हुन्, VBA मा म्याक्रो कोड कहाँ घुसाउने, कसरी प्रयोग गर्ने
  • PivotTables को साथ रिपोर्टहरू सिर्जना गर्दै
  • PLEX एड-अनबाट फ्ल्याटमा XNUMXD तालिकाहरू पुन: डिजाइन गर्न उपकरण

 

जवाफ छाड्नुस्