एक्सेल - सूत्रों को रखते हुए पंक्ति में डेटा हटाने के लिए VBA कोड

मुद्दा

मैं एक स्प्रेडशीट पर काम कर रहा हूं जहां मुझे एक नई शीट पर डेटा कॉपी करना है। एक बार डेटा कॉपी हो जाने के बाद, मैं फॉर्मूला खोए बिना मूल शीट से पंक्ति में डेटा हटाना चाहता हूं। इसे VBA में कैसे लागू किया जा सकता है?

उपाय

एक बार जब आप नीचे दिए गए कोड को लागू कर लेते हैं, तो उस पंक्ति से एक सेल चुनें जिसे आप सूत्र से रखना चाहते हैं और कोड को चलाना चाहते हैं।

 उप रख-रखाव () मंद sRow, lCol As Integer sRow = ActiveCell.Row lCol = Cells (sRow, Columns.Count) .End (xlToLeft)। प्रत्येक श्रेणी के लिए सेल में सेल (sRow, 1), कक्ष (sRow, lRol) )) यदि सेल। हसफर्मुला = गलत तब सेल। क्लियरकंट्स अगला सेल एंड सब 

इस टिप के लिए MSL को धन्यवाद।