कैसे चयनित कॉलम को सीएसवी फ़ाइल में निर्यात करें


24

मैं एक्सेल से .csv फ़ाइल में विशिष्ट संख्या में कॉलम निर्यात करना चाहता हूं। मैं की तरह चारों ओर 10 कॉलम हैं lname, fname, phone, address, emailऔर इतने पर। क्या मैं की तरह केवल कुछ स्तंभों निर्यात करने के लिए क्या करना चाहिए lname, email, और इतने पर?

जवाबों:


23

बस सरल तरीके से करें: -

  1. 10 कॉलम के लिए कॉन्टेक्टेशन लागू करें

    =CONCATENATE(A1,",",B1,",",C1,",",D1,",",E1,",",F1,",",G1,",",H1,",",I1,",",J1)
    
  2. अपनी अंतिम पंक्ति की सूची अंत खींचें

  3. परिणाम कॉलम कॉपी करें
  4. इसे नोटपैड में पेस्ट करें
  5. इसे .csvफ़ाइल स्वरूप के रूप में सहेजें

CONCATENATE ने मेरे लिए वास्तव में बहुत अच्छा काम किया। आपका बहुत बहुत धन्यवाद।
नेदिम Julabić

3
सरल ... जब तक कि आपके किसी भी कॉलम में एक डबल उद्धरण नहीं मिल सकता है ...
बिशप

क्या आपके पास एक अर्धविराम के साथ अलग-अलग तत्व नहीं हैं? = CONCATENATE (A1, ",", बी 1, ""; सी 1, ""; डी 1, ""; ई 1, ""; एफ 1, ""; G1, ",", एच 1, "" ; I1; ","; J1)
mabho

9

पहले कॉलम को चुनें जिसे आप चाहते हैं। फिर, नीचे पकड़े हुए <Ctrl>, शेष कॉलम चुनें जो आप चाहते हैं। अपने चयन की प्रतिलिपि बनाएँ और इसे एक नई कार्यपुस्तिका में पेस्ट करें। नई कार्यपुस्तिका को एक .csv फ़ाइल के रूप में सहेजें।

यदि आप अक्सर ऐसा करने जा रहे हैं, तो अपने चरणों का मैक्रो रिकॉर्ड करें। यहाँ मेरे परीक्षण से रिकॉर्ड किया गया मैक्रो है। मेरे उदाहरण में, कॉलम A नाम है और स्तंभ E ईमेल है। मैंने मैक्रो को भी संशोधित किया है इसलिए SaveAs फ़ाइल नाम में वर्तमान दिनांक शामिल है।


मैं एक उदाहरण मैक्रो दिखाने जा रहा था, लेकिन जो भी कारण से, जब मैं संपादन संपादन पर क्लिक करता हूं तो सुपरयुजर त्रुटियां करता है। मैं बाद में फिर से कोशिश करूँगा।


4

यहाँ एक कम तकनीक समाधान है:

  1. .Csv के रूप में अपनी पूरी शीट की एक प्रति सहेजें।
  2. एक्सेल में अभी भी खुला है, आप जो कॉलम नहीं चाहते हैं, उसे हटा दें।
  3. बचाना।

3

मैंने ऐड-इन के रूप में इसका अपना VBA समाधान लिखा; यह GitHub पर यहां उपलब्ध है।

उदाहरण दृश्य (बड़े संस्करण के लिए छवि पर क्लिक करें):

टूल फॉर्म का स्क्रीनशॉट

उपयोग के लिए कदम हैं:

  • ऐड-इन स्थापित करें
  • प्रपत्र लोड ( Ctrl+ Shift+ Cवर्तमान रूप को दिखाने के लिए असाइन किया गया)
  • उस श्रेणी को हाइलाइट करें जिसे आप निर्यात करना चाहते हैं
  • निर्यात फ़ोल्डर का चयन करें
  • वांछित फ़ाइल नाम, संख्या प्रारूप और विभाजक दर्ज करें
  • चुनें कि क्या अपील या अधिलेखित करें
  • 'निर्यात' पर क्लिक करें

फ़ॉर्म मॉडल रहित है, इसलिए आप विभिन्न श्रेणियों का चयन करते समय या शीट-टू-शीट या वर्कबुक-टू-वर्कबुक को नेविगेट करते हुए इसे खुला छोड़ सकते हैं। ध्यान दें, "प्रतीक पर" ( @) इस तरह के आउटपुट संचालन के लिए एक्सेल के 'जनरल' नंबर प्रारूप के प्रतिनिधित्व के रूप में कार्य करता है।

C:\test.csvउपरोक्त उदाहरण से सामग्री :

13,14,15
14,15,16
15,16,17

2
Sub ExportSelectionAsCSV()
    ' MS Excel 2007
    ' Visual Basic for Applications
    '
    ' Copies the selected rows & columns
    ' to a new Excel Workbook. Saves the new 
    ' Workbook as Comma Separated Value (text) file.
    '
    ' The active workbook (the 'invoking' workbook - the 
    ' one that is active when this subroutine is called) 
    ' is unaffected.
    '
    ' Before returning from the subroutine, the invoking workbook
    ' is "set back to" (restored as) the active workbook.
    '
    ' Note: target filename is hard coded (code is simpler that way)

    ' Suspends screen updating (until ready to return)
    ' Warning: ScreenUpdating MUST be re-enabled before
    ' returning from this subroutine.
    '
    ' Note: Step through this subroutine line-by-line to prove
    ' to yourself that it is performing as promised.
    ' (Please step through the code at least once - use F8)
    Application.ScreenUpdating = False

    ' Gets the name of *this (the invoking) workbook
    ' so *this workbook can again be set active
    ' at the end of this subroutine.
    Dim CurrentFileName As String
    CurrentFileName = ActiveWorkbook.Name
    Debug.Print "Active File: " + CurrentFileName

    ' Copies the selected cells (to the clipboard).
    ' Precondition: Cells must be selected before 
    ' calling this subroutine.
    Selection.Copy

    ' Instantiates a (new) object instance of type Excel workbook.
    ' Side-effect: The new workbook instance is now
    ' the 'active' workbook. 
    Workbooks.Add Template:="Workbook"

    ' Selects the first cell of the 
    ' first worksheet of the new workbook.
    Range("A1").Select

    ' Pastes the clipboard contents to the new worksheet
    ' (of the new workbook)
    ActiveSheet.Paste

    ' Writes the new (active) Excel workbook to file.
    ' The format is Comma Separated Value
    ActiveWorkbook.SaveAs Filename:= _
    "C:\temp\data.csv" _
    , FileFormat:=xlCSV, _
    CreateBackup:=False

    ' Gets the filename of the new (active) workbook
    ' so the name can be logged.
    Dim NewFileName As String
    NewFileName = ActiveWorkbook.Name
    Debug.Print "Active File: " + NewFileName

    ' Closes the new CSV file
    Application.DisplayAlerts = False
    ActiveWorkbook.Close
    Application.DisplayAlerts = True

    ' Clears the clipboard contents.
    Application.CutCopyMode = False

    ' Restores the invoking workbook as the active
    ' Excel workbook. 
    Workbooks(CurrentFileName).Activate
    Range("A1").Select

    ' Re-Enables Excel screen display.
    Application.ScreenUpdating = True
End Sub

1

आप इसे PowerShell स्क्रिप्ट के साथ आसानी से कर सकते हैं। आप इस PowerShell स्निपेट में Get-ExcelData फ़ंक्शन का उपयोग कर सकते हैं और चयन-ऑब्जेक्ट के माध्यम से और अंत में Export-Csv पर परिणाम को पाइप कर सकते हैं ।


1

यदि आप रॉन के संपादक में फ़ाइल खोलते हैं, तो आप अपने इच्छित कॉलम को छिपा सकते हैं, फिर परिणामी 'दृश्य' को एक्सेल फ़ाइल या किसी अन्य प्रारूप के रूप में निर्यात करें। बेहतर अभी तक आप भविष्य के उपयोग के लिए दृश्य बचा सकते हैं। बहुत जल्दी, बहुत आसान।


1

अभी तक एक और समाधान:

  1. उन कोशिकाओं का चयन करें जिन्हें आप निर्यात करना चाहते हैं
  2. कक्षों के चारों ओर एक टेबल लपेटें (उदाहरण के लिए, विंडोज पर कंट्रोल + टी दबाएं)
  3. ExportTable मैक्रो चलाएँ

सक्रिय पत्रक पर तालिका को नए CSV के रूप में सहेजता है (नई कार्यपुस्तिका खोलकर और फ़ाइल नाम के रूप में तालिका नाम का उपयोग करके वहां से बचत करता है)।

हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.