Tecnologia, programação e muito Visual FoxPro.

quinta-feira, 4 de novembro de 2010

Re: ]] XL-mania [[ buka csv di excel tanpa merubah format data

 

membukanya pakai [[tombol buatan sendiri]] saja....
repotnya pak penanya tidak secuil pun mengirimkan file contoh csv yg mau dibuka
(agar tiap cellnya langsung berformaat "0000000")

ya udah kita kerjabhakti membuatkan dulu; sebentar
(lihat file: contoh data bilangan.csv)
sebelumnya menjalankan tommbol (dimana tombolnya)
agar file csv tsb dibuka dengan NotePad, dan perhatikan isinya
lalu buka juga dengan excel, perhatikan isinya

sekarang buka file satunya lagi (BukaCSV_FormatKhusus.xls)
workbook ini berisi makro yg dapat dijalankan dgn gambar tombol
ceklik lah tombolnya, harusnya file csv (yg namanya tertulis di cell E3) akan terbuka
dengan semua data bilangan yg terformat "00000000"


Sub BukaCsvBook()
    Dim FName As String
    FName = ThisWorkbook.Path & "\" & Range("E3").Value
    Workbooks.Open Filename:=FName
    With Cells(1).CurrentRegion
        .NumberFormat = "00000000"
        .Columns.AutoFit
    End With
    Cells(1).Select
End Sub


2010/11/3 Roni Efendi <surya_mukti@yahoo.com>
>
> Yth Para pakar excel di manapun adanya, saya ada masalah neh,
> jika saya buka file csv hasil ekspor dari database, saya mau mengolahnya di excel, kendalanya klo kita buka langsung di excel format tulisan jd general semua tuh, otomatis akan berubah, misal : 0075210 ---- > 75210, yang sayang inginkan file langsung di open di excel semua isi di file csv tersebut mempunyai format tulisan text semua, misal : 0075210 ---- > 0075210. nah begitu permasalahannya.... untuk para pakar excel smua, ada gak yang bisa bantu solusi permasalahannya saya.... klo boleh ada cara paling simpel /cepat, bisa jua pake macro jika ada... trima kasih semuanya....
>
> salam
> suryamukti

__._,_.___
Recent Activity:
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| ada yang mau nyobain ice cream bikinan momods?                    |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
MARKETPLACE

Get great advice about dogs and cats. Visit the Dog & Cat Answers Center.


Hobbies & Activities Zone: Find others who share your passions! Explore new interests.


Stay on top of your group activity without leaving the page you're on - Get the Yahoo! Toolbar now.

.

__,_._,___

Nenhum comentário:

Arquivo do blog