EXCEL VBA to find duplicate rows and sum rows -

-

छवि दर्ज करें यहाँ विवरण

यहां छवि विवरण दर्ज करें

विक्रेता और विक्रेता भुगतान जानकारी के साथ 10,000+ पंक्तियाँ यदि स्तंभ, ए, सी, डी, एफ, जी, एच में फ़ील्ड के आधार पर डुप्लिकेट हैं, तो मैं कॉलम के और एल में राशि की राशि जोड़ना चाहता हूं और इसके लिए 1 एंट्री / पंक्ति रखना है।

नीचे की तस्वीर का नतीजा है।

मैं यदि संभव हो तो शब्दकोश स्क्रिप्ट का उपयोग करना चाहता हूं लेकिन मैं इसका उपयोग कैसे नहीं कर पाता यह सिर्फ कुशल लगता है, यदि नहीं, तो अलग विधि भी ठीक है। कोई भी सहायता कर सकता है ????? मैं बहुत सराहना करता हूं !!

यह एक मजेदार है, इसलिए मैंने इसे लिखा है। मूलतः यह स्क्रिप्ट आपके wsFROM का इलाज करती है जैसे कि यह एक डेटाबेस तालिका थी, तो यह आपके लिए क्या आवश्यक करने के लिए एसक्यूएल कथन पर लागू होगा और परिणाम वसूली के लिए निकाल देगा यह बहुत जल्दी चलना चाहिए, हालांकि यह 20000 रिकॉर्ड है विकल्प चादर में हर पंक्ति के माध्यम से पाश के लिए होगा और फिर यह देखना है कि क्या ऐसा दूसरों है और परिणाम जोड़ें। यह उन 20 मिनटों में से एक होगा जो दुःस्वप्न वाले वीबीए कार्यक्रमों में से एक है, जहां यह कुछ दर्जन सेकंड में चलना चाहिए।

सुनिश्चित करें कि आप SET wsFROM ... और सेट करें wsTO ... अपने कार्यपत्रकों के लिए लाइनें इसके अलावा, मेरा मानना ​​है कि यह आपके डेटा के साथ काम करना चाहिए जैसा है। 

  उप एक्सेल एसक्यूएल () 'चर ऑब्जेक्ट डिम आरएस के रूप में ऑब्जेक्ट दीम स्ट्रफाइल के रूप में स्ट्रिंग के रूप में, strsQL स्ट्रिंग के रूप में, strConn as स्ट्रिंग मंद wsFrom वर्कशीट के रूप में, wsTo के रूप में वर्कशीट 'डेटा और वर्कशीट के साथ कार्यपत्रक को सेट करने के लिए सेट करें' सेट करें wsFrom = वर्कशीट्स ("शीट 1") सेट करें wsTo = कार्यपत्रक ("शीट 2") '_tmp' के साथ एक नई फाइल बनाएं यह एक ही फ़ोल्डर में strFileName = ThisWorkbook.Path और amp; "/" & Amp; ThisWorkbook.Name strFileName = बदलें (strFileName, ".xls", "_tmp.xls") ThisWorkbook.SaveCopyAs strFileName 'फैंसी ADODB सामान .. अनिवार्य रूप से उस प्रतिलिपि को खोलें जो हम बस सहेजते हैं जैसे कि यह डेटाबेस सेट किया गया था objConn = CreateObject (" ADODB.Connection ") strConn =" प्रदाता = Microsoft.ACE.OLEDB.12.0; डेटा स्रोत = "& amp; स्ट्रफाइलनाम & amp; "; विस्तारित गुण =" "एक्सेल 12.0 एक्सएमएल; एचडीआर = हाँ," "ओजजॉन। ओपन स्ट्रकॉन 'यह एसक्यूएल स्ट्रिंग है जिसे हम एक्सेल / डेटाबेस से पूछते हैं। फ़ील्ड के नाम, पत्रक के पंक्ति 1 में दिए गए नाम हैं, एसआरएसक्यूएल = "SELECT [संख्या], [NAME], [ऊपर / नीचे], [एफवाईई], [जीएल_एसीएनजीआरजीआर], [जीएल_एसईजीसीडी], [एसीसीटीसी], [CODE] , [क्षेत्र], योग (राशि 1), योग (राशि 2) से ["& amp; wsFrom.Name & amp; "संख्या], [NAME], [ऊपर / नीचे], [एफवाईई], [जीएल_एसीएनजीआरजीआर], [जीएल_एसईजीसीडीडीए], [एसीसीटी #], [CODE], [क्षेत्र];" 'एक्सेल / डाटाबेस सेट एसएसएल कथन को लागू करने के लिए फैंसी एडीडीबी चीज आरएस = ऑब्जेक्ट सेट करें ("एडीओडीबी। रेकॉसेसेट") आर.एस.एस.एस.एस.एस.एस.एस.एल.एस.एल., ओजीसीएन' ऑब्जेक्ट डिम हैडर के रूप में ऑब्जेक्ट डिम हैडरकॉल पूर्णांक हेडरकॉल = 1 'फ़ील्ड के माध्यम से लूप रिकॉर्ड्स प्रत्येक प्रत्येक हेडर के लिए rs.fields 'उन्हें 1 पंक्ति (1, headerCol) में चिपकाएं। मूल्य = header.name' अगला कॉलम हैडरसीएल = हैदरकॉल + 1 अगला हेडर 'एसक्यूएल स्टेटमेंट के परिणाम कॉपी करें, रिकॉर्डसेट में संग्रहीत , करने के लिए शीट wsTo.Range ("ए 2") में। CopyFromRecordset रु 'इसे बंद करो। बंद करो objConn.Close' कि टीएमपी कार्यपुस्तिका को निकालें strfileName अंत उप

Comments

Post a Comment

Popular posts from this blog

php - PDO bindParam() fatal error -

-
I am trying to learn PDO, now I have written this small code, but it gives me a serious error: < P> Fatal error: Call a member function at a non-object dot () ... $ con = new mysqli ("127.0.0.1", "root", "", "csvdangercheck"); $ Query = $ con- & gt; ("Id,` var1`, `var2`) values ​​(" id,: var1,: var2) ";); $ query- & gt; bypass pattern (': id', $ id); $ query- & gt; BindParam (': var1', $ VAL1); $ Query- & gt; bindParam (': var2', $ val2); $ Query-> Executed (); I Trying to use print_r ($ con-> errorInfo ()) but Fatal error: Undefined method mysqli :: errorInfo ( ) ... can someone tell me what am I missing? Flaffeh said, you have PDO Missing Mysqy, try it: $ con = new PDO ('mysql: host = 127.0.0.1; dbname = csvdangercheck', 'root', '');
Read more

logging - How can I log both the Request.InputStream and Response.OutputStream traffic in my ASP.NET MVC3 Application for specific Actions? -

-
For a specific set of tasks, I need to log in to the incoming request inputstream as well as outgoing response. is. I am using an ActionFilterAttribute for this and overriding the OnActionExecuted and OnResultExecuted methods. So I'm starting with this idea ... Public category ActionLoggerAttribute: ActionFilterArrbit {Public Override Zero On-Offed Execution (ActionActioned Contact Filter Filter) {base.OnActionAxecuted (FilterContext); HttpRequestBase request = filterContext.HttpContext.Request; // TODO: Log the request. InputStream} Public Override Zero OnResultExecuted (ResultExecutedContext FilterContext) {base.OnResultExecuted (filterContext); HTTPRPSPointBase Response = FilterContacts Hpptex response; // TODO: Log on Response.OutputStream}} Ideally I'll hook it up with enterprise library logging because I'm already using it for error logging. Am I reaching the input and output stream at the right time? Can I easily use the Enterprise Library to log i
Read more

java - Why my included JSP file won't get processed correctly? -

-
I am trying to create Java web framework (and learning), and on the basis of 'Code Generator In the process of making the material view of the database in the process of development, I stumbled into a difficulty, which I do not know how to solve it. First of all, I want the following index.jsp : & lt; Body & gt; Use all pages to be created. & Lt;% @ include file = "header.jsp"% & gt; & Lt; Hours / & gt; & Lt;% @ included file = "body.jsp"%> & Lt; Hours / & gt; & Lt;% @ include file = "footer.jsp"% & gt; & Lt; / Body & gt; And, in body.jsp , I should have it like this: & lt; Jsp: include page = "$ {Application_modul}"%> Where application_modul is an attribute defined in its controller: request.setAttribute ("application_modul", "USER_ACCOUNT \\ ' View_user_account.jsp "); This file can be found properly, but the processed JSP does
Read more