Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte aplikáciu Microsoft Excel 2007 .
2
Stlačte " Alt " a " F11 " tlačidlá súčasne otvoriť editor VBA .
3
Kliknite na " Vložiť " možnosť na hornom navigačnom paneli a potom kliknite na tlačidlo " modul " .
4
Type ( alebo skopírovať a vložiť ) pod skript do editora VBA . sub CSVQuotes ( )
Dim SrcRange Ako RangeDim CurrRow Ako RangeDim CurrCell Ako RangeDim CurrTextStr Ako StringDim ListSeparator Ako StringDim fileName As Variant
filename = Application.GetSaveAsFilename ( " " , " CSV súboru ( * . csv ) , * . csv " )
ListSeparator = Application.International ( xlListSeparator ) Ak Selection.Cells.Count > 1 ThenSet SrcRange = SelectionElseSet SrcRange = ActiveSheet.UsedRangeEnd IfOpen FileName výstup ako # 1pre každý CurrRow V SrcRange.RowsCurrTextStr = ìîFor každý CurrCell V CurrRow.CellsCurrTextStr = CurrTextStr & " " " " & CurrCell.Value & " " " " & ListSeparatorNextWhile Right ( CurrTextStr , 1 ) = ListSeparatorCurrTextStr = Left ( CurrTextStr , Ľan ( CurrTextStr ) - 1 ) WendPrint # 1 , CurrTextStrNextClose # 1
End Sub
5
Zatvorte editor VBA kliknutím na " X " v v pravom hornom rohu . Makro je uložené .
6
Kliknite na " Nástroje " voľbu na hornom navigačnom paneli , a potom kliknite na " makro " .
7
Vyberte možnosť " makrá " . Nové makro , s názvom " CSVQuotes , " je teraz k dispozícii .
8
Otvorte súbor programu Excel exportovať do CSV s citáciami . Vykonajte požadované úpravy pripraviť tabuľku pre export do súboru formátu CSV .
9
Stlačte " Alt " a " F8 " kľúča súčasne otvoriť existujúci zoznam makier .
10
Kliknite na možnosť " spustiť " vedľa " CSVQuotes " makro spustiť skript . Otvorí súbor Uložiť box .
11
Zadajte názov pre súbor CSV do " Názov súboru " pole .
12
Kliknite na tlačidlo " Uložiť " . CSV súbor je exportovaný , s citáciami .
Copyright © počítačové znalosti Všetky práva vyhradené