[belajar-excel] Digest Number 4160

Milis Belajar Microsoft Excel Group

3 Messages

Digest #4160

1

Format Dari Data Connection by "Heru Safrudin" heru.safrudin

2a

Re: Impor Data Dari text File ke Excel terkait dengan TextFileColumn by "Mr. Kid" nmkid.family@ymail.com

2b

Re: Impor Data Dari text File ke Excel terkait dengan TextFileColumn by "him mah"

Messages

1

Format Dari Data Connection

Mon Apr 17, 2017 8:14 pm (PDT) . Posted by:

"Heru Safrudin" heru.safrudin

Yth. B-Exceller,

Kenapa format data jam (seharusnya hh:mm:ss) yang diambil lewat Data
Connection kok selalu berformat date (dd-mm-yyyy) ??

Mohon penjelasannya, dan apakah harus selalu memformat ulang ketika data
direfresh

Terima kasih

Heru Safarudin

Reply to sender . Reply to group . Reply via Web Post . All Messages (1) . Top ^

2a

Re: Impor Data Dari text File ke Excel terkait dengan TextFileColumn

Mon Apr 17, 2017 10:54 pm (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

hmmm....
Setiap file txt yang dibaca akan di copy menambahkan di sheet tertentu yang
sesuai ya.
Jadi ada 3 txt file :
a.txt akan di-copy menambahkan data di sheet dtA,
b.txt akan di-copy menambahkan data di sheet dtB,
c.txt akan di-copy menambahkan data di sheet dtC.

Tapi nama txt filenya tidak tetap, seperti bulan ini namanya a-Apr17.txt,
b-Apr17.txt, c-Apr17.txt
Jumlah kolom di a.txt berbeda dengan di b.txt dan berbeda dengan c.txt.

Begitu ya ?

2017-04-18 7:18 GMT+07:00 him mah himmah.mlg@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> sebenarnya tujuannya akan dibuat database excel dari beberapa file txt
> jadi untuk file D:\aku.txt
> akan dibuat dinamis sesuai dengan lsit file yang ada di sheet
>
> mungkin ada cara lain pak kid
>
> Pada 17 April 2017 19.35, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com> menulis:
>
>>
>>
>> Boleh tahu kenapa pakai VBA?
>> Bagaimana kalau pakai data connection saja yang tanpa VBA?
>>
>> Regards,
>> Kid
>> Sent from my smart enough phone
>>
>> On Apr 17, 2017, at 13:10, him mah himmah.mlg@gmail.com [belajar-excel] <
>> belajar-excel@yahoogroups.com> wrote:
>>
>>
>>
>> dear all
>>
>> maaf mau tanya lagi terkait dengan
>> impor data dari text file ke excel
>>
>> kalau dari menu record macro
>> terbentuk kode seperti ini
>>
>>
>> With ActiveSheet.QueryTables.Add(Connection:= _
>> "TEXT;" & D:\aku.txt"; _
>> , Destination:=Worksheets("Sheet 1").Range("$A$1"))
>> .Name = "ImportingFileName"
>> .FieldNames = False
>> .RowNumbers = False
>> .FillAdjacentFormulas = False
>> .PreserveFormatting = True
>> .RefreshOnFileOpen = False
>> .RefreshStyle = xlInsertDeleteCells
>> .SavePassword = False
>> .SaveData = True
>> .AdjustColumnWidth = True
>> .RefreshPeriod = 0
>> .TextFilePromptOnRefresh = False
>> .TextFilePlatform = 437
>> .TextFileStartRow = 2
>> .TextFileParseType = xlDelimited
>> .TextFileTextQualifier = xlTextQualifierDoubleQuote
>> .TextFileConsecutiveDelimiter = False
>> .TextFileTabDelimiter = False
>> .TextFileSemicolonDelimiter = False
>> .TextFileCommaDelimiter = True
>> .TextFileSpaceDelimiter = False
>> .TextFileColumnDataTypes = Array(1,1,1,1,1,1,1,1)
>> .TextFileTrailingMinusNumbers = True
>> .Refresh BackgroundQuery:=False
>> End With
>>
>>
>> yang masih menjadi kendala adalah di baris
>>
>> .TextFileColumnDataTypes = Array(2,2,2,2,2,2,2,2)
>>
>> kalau seperti yang diatas kan jumlah kolomnya ada 8
>> misal kita tidak tahu jumlah kolomnya ada berapa
>> bisa 8 bisa lebih kecil atau bisa lebih besar
>>
>> kira-kira untuk
>>
>> baris tersebut modifikasi seperti apa ya
>>
>>
>> terima kasih
>>
>>
>>
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (5) . Top ^

2b

Re: Impor Data Dari text File ke Excel terkait dengan TextFileColumn

Tue Apr 18, 2017 12:25 am (PDT) . Posted by:

"him mah"

Seperti itu pak kid. Cuma sheet hasilnya cuma satu. Data akan ditambahkan
dibaris selanjutnya.

Yang jadi masalah adalah jumlah kolom yang ada di text file

Pada tanggal 18 Apr 2017 12:54, "'Mr. Kid' mr.nmkid@gmail.com
[belajar-excel]" <belajar-excel@yahoogroups.com> menulis:

>
>
> hmmm....
> Setiap file txt yang dibaca akan di copy menambahkan di sheet tertentu
> yang sesuai ya.
> Jadi ada 3 txt file :
> a.txt akan di-copy menambahkan data di sheet dtA,
> b.txt akan di-copy menambahkan data di sheet dtB,
> c.txt akan di-copy menambahkan data di sheet dtC.
>
> Tapi nama txt filenya tidak tetap, seperti bulan ini namanya a-Apr17.txt,
> b-Apr17.txt, c-Apr17.txt
> Jumlah kolom di a.txt berbeda dengan di b.txt dan berbeda dengan c.txt.
>
> Begitu ya ?
>
>
> 2017-04-18 7:18 GMT+07:00 him mah himmah.mlg@gmail.com [belajar-excel] <
> belajar-excel@yahoogroups.com>:
>
>>
>>
>> sebenarnya tujuannya akan dibuat database excel dari beberapa file txt
>> jadi untuk file D:\aku.txt
>> akan dibuat dinamis sesuai dengan lsit file yang ada di sheet
>>
>> mungkin ada cara lain pak kid
>>
>> Pada 17 April 2017 19.35, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
>> belajar-excel@yahoogroups.com> menulis:
>>
>>>
>>>
>>> Boleh tahu kenapa pakai VBA?
>>> Bagaimana kalau pakai data connection saja yang tanpa VBA?
>>>
>>> Regards,
>>> Kid
>>> Sent from my smart enough phone
>>>
>>> On Apr 17, 2017, at 13:10, him mah himmah.mlg@gmail.com [belajar-excel]
>>> <belajar-excel@yahoogroups.com> wrote:
>>>
>>>
>>>
>>> dear all
>>>
>>> maaf mau tanya lagi terkait dengan
>>> impor data dari text file ke excel
>>>
>>> kalau dari menu record macro
>>> terbentuk kode seperti ini
>>>
>>>
>>> With ActiveSheet.QueryTables.Add(Connection:= _
>>> "TEXT;" & D:\aku.txt"; _
>>> , Destination:=Worksheets("Sheet 1").Range("$A$1"))
>>> .Name = "ImportingFileName"
>>> .FieldNames = False
>>> .RowNumbers = False
>>> .FillAdjacentFormulas = False
>>> .PreserveFormatting = True
>>> .RefreshOnFileOpen = False
>>> .RefreshStyle = xlInsertDeleteCells
>>> .SavePassword = False
>>> .SaveData = True
>>> .AdjustColumnWidth = True
>>> .RefreshPeriod = 0
>>> .TextFilePromptOnRefresh = False
>>> .TextFilePlatform = 437
>>> .TextFileStartRow = 2
>>> .TextFileParseType = xlDelimited
>>> .TextFileTextQualifier = xlTextQualifierDoubleQuote
>>> .TextFileConsecutiveDelimiter = False
>>> .TextFileTabDelimiter = False
>>> .TextFileSemicolonDelimiter = False
>>> .TextFileCommaDelimiter = True
>>> .TextFileSpaceDelimiter = False
>>> .TextFileColumnDataTypes = Array(1,1,1,1,1,1,1,1)
>>> .TextFileTrailingMinusNumbers = True
>>> .Refresh BackgroundQuery:=False
>>> End With
>>>
>>>
>>> yang masih menjadi kendala adalah di baris
>>>
>>> .TextFileColumnDataTypes = Array(2,2,2,2,2,2,2,2)
>>>
>>> kalau seperti yang diatas kan jumlah kolomnya ada 8
>>> misal kita tidak tahu jumlah kolomnya ada berapa
>>> bisa 8 bisa lebih kecil atau bisa lebih besar
>>>
>>> kira-kira untuk
>>>
>>> baris tersebut modifikasi seperti apa ya
>>>
>>>
>>> terima kasih
>>>
>>>
>>>
>>
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (5) . Top ^

============================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
bergabung ke milis (subscribe), kirim mail kosong ke: belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke: belajar-excel@yahoogroups.com
berkunjung ke web milis : http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran : http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di : http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe), kirim mail kosong ke : belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

Visit Your Group

• New Members 3

• Privacy • Unsubscribe • Terms of Use