4 New Messages
Digest #2350
2a
Bls: Bls: [belajar-excel] Memsihkan nama yang sama dengan 2 kategori by "Shenly" shenly_excelmania
Messages
Sat Jun 15, 2013 3:01 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Terima kasih Mr. De Premor atas VB yang singkat dan lugas pada bagian loopingnya.
Saya coba ganti bagian looping For Next nya menjadi :
For Each i In sKata1
'IsExist = False
For Each j In sKata2
If LCase(i) <> LCase(j) Then IsExist = False
Next
If IsExist Then Mana = Mana & " " & i
Next
Kelihatannya, secara logika (saya), benar tapi setelah saya coba hasilnya kosong.
Pertanyaan saya :
Apakah If Not IsExist merupakan default (dari sononya) sehingga tidak bisa diganti dengan IsExist saja ?
Terima kasih.
Salam,
HK
----------------------------------------------------------
Function Mana(Kata1 As String, Kata2 As String) As String
Dim sKata1, sKata2, i, j
Dim IsExist As Boolean
sKata1 = Split(Kata1, " ")
sKata2 = Split(Kata2, " ")
For Each i In sKata1
IsExist = False
For Each j In sKata2
If LCase(i) = LCase(j) Then IsExist = True
Next
If Not IsExist Then Mana = Mana & " " & i
Next
End Function
----- Forwarded Message -----
From: De Premor <de@premor.net>
To: belajar-excel@yahoogroups.com
Sent: Saturday, 15 June 2013, 13:54
Subject: Re: [belajar-excel] Fw: Iseng2 bermain UDF
Saya coba tulis sebuah code yang fungsinya sama seperti dimaksud, semoga bisa jadi bahan referensi
Rgds,
[dp]
On 15/06/2013 13:14, hendrik karnadi wrote:
>Maaf, lampirannya ketinggalan.
>
>
>----- Forwarded Message -----
>From: hendrik karnadi <hendrikkarnadi@yahoo.com >
>To: "belajar-excel@yahoogroups.com " <belajar-excel@yahoogroups.com >
>Sent: Saturday, 15 June 2013, 13:11
>Subject: Iseng2 bermain UDF
>
>
>
>Rekan2 Be-Exceler,
>
>
>Untuk mengisi hari libur tidak ada salahnya kita bermain UDF (User Defined Function)
>Berbekal pertanyaan seorang member milis dari negeri seberang, saya coba utak atik UDF warisan si Mbak yang sudah mendahului kita.
>
>
>Pertanyaa dari member tsb adalah:
>Bagaimana membandingkan kata2 yang ada pada kolom A dengan yang ada pada kolom B ?
>
>
>UDF yang sudah saya modifikasi adalah seperti ini :
>
>
>Option Explicit
>
>
>Function IsSimilar(Dat1, Dat2) As Variant
> ' coded by: siti Vi / Jakarta, 07 Jun 2011
> ' updated by hk 15 juni 2013
>
'-----------------------------------------
>
> Dim i As Integer, j As Integer
> Dim Notsame
> Dim ArD1, ArD2
> ArD1 = Split(LCase(Dat1), " ")
> ArD2 = Split(LCase(Dat2), " ")
> For i = LBound(ArD1) To UBound(ArD1)
> For j = LBound(ArD2) To UBound(ArD2)
> If ArD1(i) = ArD2(j) Then
> GoTo 10
> Else
> Notsame = Notsame & " " & ArD1(i)
> End If
> j = j + 1
> Next j
> i = i + 1
>10 Next i
> IsSimilar = Notsame
>
>
>End Function
>
>
>Hasilnya (belum sesuai dengan keinginan) ada dalam file terlampir.
>
>
>Pertanyaan saya adalah bagaimana memperbaiki UDF tsb ?
>
>
>Terima kasih.
>
>
>Salam,
>HK
>
>
>
>
>
>
--
Deny Premordianto
________________________________
ICT Department - Network & Infrastructure Division
Technical Support Wilayah 4
0821-5701-1683 | de@premor.net | 2811084A
Matematika Hidup adalah mengalikan sukacita, mengurangi kesedihan, menambahkan semangat, membagi kebahagiaan, dan menguadratkan kasih sayang antar sesama
Saya coba ganti bagian looping For Next nya menjadi :
For Each i In sKata1
'IsExist = False
For Each j In sKata2
If LCase(i) <> LCase(j) Then IsExist = False
Next
If IsExist Then Mana = Mana & " " & i
Next
Kelihatannya, secara logika (saya), benar tapi setelah saya coba hasilnya kosong.
Pertanyaan saya :
Apakah If Not IsExist merupakan default (dari sononya) sehingga tidak bisa diganti dengan IsExist saja ?
Terima kasih.
Salam,
HK
------------
Function Mana(Kata1 As String, Kata2 As String) As String
Dim sKata1, sKata2, i, j
Dim IsExist As Boolean
sKata1 = Split(Kata1, " ")
sKata2 = Split(Kata2, " ")
For Each i In sKata1
IsExist = False
For Each j In sKata2
If LCase(i) = LCase(j) Then IsExist = True
Next
If Not IsExist Then Mana = Mana & " " & i
Next
End Function
----- Forwarded Message -----
From: De Premor <de@premor.net>
To: belajar-excel@
Sent: Saturday, 15 June 2013, 13:54
Subject: Re: [belajar-excel] Fw: Iseng2 bermain UDF
Saya coba tulis sebuah code yang fungsinya sama seperti dimaksud, semoga bisa jadi bahan referensi
Rgds,
[dp]
On 15/06/2013 13:14, hendrik karnadi wrote:
>Maaf, lampirannya ketinggalan.
>
>
>----- Forwarded Message -----
>From: hendrik karnadi <hendrikkarnadi@
>To: "belajar-excel@
>Sent: Saturday, 15 June 2013, 13:11
>Subject: Iseng2 bermain UDF
>
>
>
>Rekan2 Be-Exceler,
>
>
>Untuk mengisi hari libur tidak ada salahnya kita bermain UDF (User Defined Function)
>Berbekal pertanyaan seorang member milis dari negeri seberang, saya coba utak atik UDF warisan si Mbak yang sudah mendahului kita.
>
>
>Pertanyaa dari member tsb adalah:
>Bagaimana membandingkan kata2 yang ada pada kolom A dengan yang ada pada kolom B ?
>
>
>UDF yang sudah saya modifikasi adalah seperti ini :
>
>
>Option Explicit
>
>
>Function IsSimilar(Dat1, Dat2) As Variant
> ' coded by: siti Vi / Jakarta, 07 Jun 2011
> ' updated by hk 15 juni 2013
>
'-------
>
> Dim i As Integer, j As Integer
> Dim Notsame
> Dim ArD1, ArD2
> ArD1 = Split(LCase(
> ArD2 = Split(LCase(
> For i = LBound(ArD1) To UBound(ArD1)
> For j = LBound(ArD2) To UBound(ArD2)
> If ArD1(i) = ArD2(j) Then
> GoTo 10
> Else
> Notsame = Notsame & " " & ArD1(i)
> End If
> j = j + 1
> Next j
> i = i + 1
>10 Next i
> IsSimilar = Notsame
>
>
>End Function
>
>
>Hasilnya (belum sesuai dengan keinginan) ada dalam file terlampir.
>
>
>Pertanyaan saya adalah bagaimana memperbaiki UDF tsb ?
>
>
>Terima kasih.
>
>
>Salam,
>HK
>
>
>
>
>
>
--
Deny Premordianto
____________
ICT Department - Network & Infrastructure Division
Technical Support Wilayah 4
0821-5701-1683 | de@premor.net | 2811084A
Matematika Hidup adalah mengalikan sukacita, mengurangi kesedihan, menambahkan semangat, membagi kebahagiaan, dan menguadratkan kasih sayang antar sesama
Sat Jun 15, 2013 5:33 am (PDT) . Posted by:
"De Premor"
IsExist dalam function tersebut hanyalan sebuah variable boolean dan
bisa diganti dengan variable "JikaAda"
perlu diketahui, jika pada deklarasi Dim IsExist as boolean, IsExist
akan bernilai FALSE pada awalnya
Selanjutnya kepada Looping yang mas Hendrik Buat
kita perhatikan pada statement *If IsExist *dimana maksudnya adalah
*Jika *Nilai *IsExist *bernilai *benar*
sedangkan pada perulangan yang dibuat tidak ada satupun statement yang
menyebutkan untuk mengganti /men-set nilai IsExist menjadi benar
"*IsExist = True*", maka dari awal sampai akhir perulangan Nilai IsExist
selalu bernilai False, jadi memang sudah sekarusnya jika variable *Mana*
tidak pernah dicolek2 sama codenya.
lebih lanjutnya coba dilihat di lampiran
Rgds,
[dp]
Pada 15/06/2013 17:01, hendrik karnadi menulis:
> Terima kasih Mr. De Premor atas VB yang singkat dan lugas pada bagian
> loopingnya.
> Saya coba ganti bagian looping For Next nya menjadi :
> For Each i In sKata1
> 'IsExist = False
> For Each j In sKata2
> If LCase(i) <> LCase(j) Then IsExist = False
> Next
> If IsExist Then Mana = Mana & " " & i
> Next
>
> Kelihatannya, secara logika (saya), benar tapi setelah saya coba
> hasilnya kosong.
>
> Pertanyaan saya :
> Apakah If Not IsExist merupakan default (dari sononya) sehingga tidak
> bisa diganti dengan IsExist saja ?
>
> Terima kasih.
>
> Salam,
> HK
> ----------------------------------------------------------
>
>
> Function Mana(Kata1 As String, Kata2 As String) As String
> Dim sKata1, sKata2, i, j
> Dim IsExist As Boolean
> sKata1 = Split(Kata1, " ")
> sKata2 = Split(Kata2, " ")
> For Each i In sKata1
> IsExist = False
> For Each j In sKata2
> If LCase(i) = LCase(j) Then IsExist = True
> Next
> If Not IsExist Then Mana = Mana & " " & i
> Next
> End Function
>
>
>
>
> ----- Forwarded Message -----
> *From:* De Premor <de@premor.net>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Saturday, 15 June 2013, 13:54
> *Subject:* Re: [belajar-excel] Fw: Iseng2 bermain UDF
>
> Saya coba tulis sebuah code yang fungsinya sama seperti dimaksud,
> semoga bisa jadi bahan referensi
>
> Rgds,
> [dp]
>
> On 15/06/2013 13:14, hendrik karnadi wrote:
>> Maaf, lampirannya ketinggalan.
>>
>> ----- Forwarded Message -----
>> *From:* hendrik karnadi <hendrikkarnadi@yahoo.com >
>> *To:* "belajar-excel@yahoogroups.com " <belajar-excel@yahoogroups.com >
>> *Sent:* Saturday, 15 June 2013, 13:11
>> *Subject:* Iseng2 bermain UDF
>>
>> Rekan2 Be-Exceler,
>>
>> Untuk mengisi hari libur tidak ada salahnya kita bermain UDF (User
>> Defined Function)
>> Berbekal pertanyaan seorang member milis dari negeri seberang, saya
>> coba utak atik UDF warisan si Mbak yang sudah mendahului kita.
>>
>> Pertanyaa dari member tsb adalah:
>> Bagaimana membandingkan kata2 yang ada pada kolom A dengan yang ada
>> pada kolom B ?
>>
>> UDF yang sudah saya modifikasi adalah seperti ini :
>>
>> Option Explicit
>>
>> Function IsSimilar(Dat1, Dat2) As Variant
>> ' coded by: siti Vi / Jakarta, 07 Jun 2011
>> ' updated by hk 15 juni 2013
>> '-----------------------------------------
>> Dim i As Integer, j As Integer
>> Dim Notsame
>> Dim ArD1, ArD2
>> ArD1 = Split(LCase(Dat1), " ")
>> ArD2 = Split(LCase(Dat2), " ")
>> For i = LBound(ArD1) To UBound(ArD1)
>> For j = LBound(ArD2) To UBound(ArD2)
>> If ArD1(i) = ArD2(j) Then
>> GoTo 10
>> Else
>> Notsame = Notsame & " " & ArD1(i)
>> End If
>> j = j + 1
>> Next j
>> i = i + 1
>> 10 Next i
>> IsSimilar = Notsame
>>
>> End Function
>>
>> Hasilnya (belum sesuai dengan keinginan) ada dalam file terlampir.
>>
>> Pertanyaan saya adalah bagaimana memperbaiki UDF tsb ?
>>
>> Terima kasih.
>>
>> Salam,
>> HK
>>
>>
>>
>>
>
> --
> *Deny Premordianto
> ----------------------------------------------------------
> ICT Department - Network & Infrastructure Division
> Technical Support Wilayah 4
> * 0821-5701-1683 | de@premor.net | 2811084A
> Matematika Hidup adalah mengalikan sukacita, mengurangi kesedihan,
> menambahkan semangat, membagi kebahagiaan, dan menguadratkan kasih
> sayang antar sesama
>
>
>
bisa diganti dengan variable "JikaAda"
perlu diketahui, jika pada deklarasi Dim IsExist as boolean, IsExist
akan bernilai FALSE pada awalnya
Selanjutnya kepada Looping yang mas Hendrik Buat
kita perhatikan pada statement *If IsExist *dimana maksudnya adalah
*Jika *Nilai *IsExist *bernilai *benar*
sedangkan pada perulangan yang dibuat tidak ada satupun statement yang
menyebutkan untuk mengganti /men-set nilai IsExist menjadi benar
"*IsExist = True*", maka dari awal sampai akhir perulangan Nilai IsExist
selalu bernilai False, jadi memang sudah sekarusnya jika variable *Mana*
tidak pernah dicolek2 sama codenya.
lebih lanjutnya coba dilihat di lampiran
Rgds,
[dp]
Pada 15/06/2013 17:01, hendrik karnadi menulis:
> Terima kasih Mr. De Premor atas VB yang singkat dan lugas pada bagian
> loopingnya.
> Saya coba ganti bagian looping For Next nya menjadi :
> For Each i In sKata1
> 'IsExist = False
> For Each j In sKata2
> If LCase(i) <> LCase(j) Then IsExist = False
> Next
> If IsExist Then Mana = Mana & " " & i
> Next
>
> Kelihatannya, secara logika (saya), benar tapi setelah saya coba
> hasilnya kosong.
>
> Pertanyaan saya :
> Apakah If Not IsExist merupakan default (dari sononya) sehingga tidak
> bisa diganti dengan IsExist saja ?
>
> Terima kasih.
>
> Salam,
> HK
> ------------
>
>
> Function Mana(Kata1 As String, Kata2 As String) As String
> Dim sKata1, sKata2, i, j
> Dim IsExist As Boolean
> sKata1 = Split(Kata1, " ")
> sKata2 = Split(Kata2, " ")
> For Each i In sKata1
> IsExist = False
> For Each j In sKata2
> If LCase(i) = LCase(j) Then IsExist = True
> Next
> If Not IsExist Then Mana = Mana & " " & i
> Next
> End Function
>
>
>
>
> ----- Forwarded Message -----
> *From:* De Premor <de@premor.net>
> *To:* belajar-excel@
> *Sent:* Saturday, 15 June 2013, 13:54
> *Subject:* Re: [belajar-excel] Fw: Iseng2 bermain UDF
>
> Saya coba tulis sebuah code yang fungsinya sama seperti dimaksud,
> semoga bisa jadi bahan referensi
>
> Rgds,
> [dp]
>
> On 15/06/2013 13:14, hendrik karnadi wrote:
>> Maaf, lampirannya ketinggalan.
>>
>> ----- Forwarded Message -----
>> *From:* hendrik karnadi <hendrikkarnadi@
>> *To:* "belajar-excel@
>> *Sent:* Saturday, 15 June 2013, 13:11
>> *Subject:* Iseng2 bermain UDF
>>
>> Rekan2 Be-Exceler,
>>
>> Untuk mengisi hari libur tidak ada salahnya kita bermain UDF (User
>> Defined Function)
>> Berbekal pertanyaan seorang member milis dari negeri seberang, saya
>> coba utak atik UDF warisan si Mbak yang sudah mendahului kita.
>>
>> Pertanyaa dari member tsb adalah:
>> Bagaimana membandingkan kata2 yang ada pada kolom A dengan yang ada
>> pada kolom B ?
>>
>> UDF yang sudah saya modifikasi adalah seperti ini :
>>
>> Option Explicit
>>
>> Function IsSimilar(Dat1, Dat2) As Variant
>> ' coded by: siti Vi / Jakarta, 07 Jun 2011
>> ' updated by hk 15 juni 2013
>> '-------
>> Dim i As Integer, j As Integer
>> Dim Notsame
>> Dim ArD1, ArD2
>> ArD1 = Split(LCase(
>> ArD2 = Split(LCase(
>> For i = LBound(ArD1) To UBound(ArD1)
>> For j = LBound(ArD2) To UBound(ArD2)
>> If ArD1(i) = ArD2(j) Then
>> GoTo 10
>> Else
>> Notsame = Notsame & " " & ArD1(i)
>> End If
>> j = j + 1
>> Next j
>> i = i + 1
>> 10 Next i
>> IsSimilar = Notsame
>>
>> End Function
>>
>> Hasilnya (belum sesuai dengan keinginan) ada dalam file terlampir.
>>
>> Pertanyaan saya adalah bagaimana memperbaiki UDF tsb ?
>>
>> Terima kasih.
>>
>> Salam,
>> HK
>>
>>
>>
>>
>
> --
> *Deny Premordianto
> ------------
> ICT Department - Network & Infrastructure Division
> Technical Support Wilayah 4
> * 0821-5701-1683 | de@premor.net | 2811084A
> Matematika Hidup adalah mengalikan sukacita, mengurangi kesedihan,
> menambahkan semangat, membagi kebahagiaan, dan menguadratkan kasih
> sayang antar sesama
>
>
>
Sat Jun 15, 2013 5:33 am (PDT) . Posted by:
"Shenly" shenly_excelmania
Terima kasih banyak untuk Mr.kid dan De Premor buat solusinya....banyak sekali pertanyaan untuk anda2 ber 2 dari solusi yang teleh diberikan...
tapi pertama saya mau bertanya ke De Premor dulu....solusi yang anda berikan bagus tapi ada sedikit pertanyaan.. tambahan
jika saya ingin memindahkan scrip macro trsb apa bisa hanya dengan copy paste ke file saya???
terus kalo ga salah rang untuk tabelnya yang anda buat dimacron hanya untuk 5 rang tabel yah?? sedangkan di file saya untuk rang tabelnya ada 10 tabel dan itu pn bisa bertambah
kira2 kalo saya tambah rang (rDate2 As Range, rDate3 As Range, rDate4 As Range, rDate5 As Range) sampai ( rDate20 As Range) apa tidak masalah???
soalnya saya soal mencoba memindahkan scrip macro trsbt ke file saya dan saya tambah rangnya samapi ( rDate20 As Range) tapi hasilnya malah erro...
mohon penjelasannya kembali ....
terima kasih
Salam
Shenly ^^*
________________________________
Dari: De Premor <de@premor.net>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Sabtu, 15 Juni 2013 13:35
Judul: Re: Bls: [belajar-excel] Memsihkan nama yang sama dengan 2 kategori tanggal?????
Dh,
Improvement untuk percepatan waktu kalkulasi,pada data 999 baris x 5
tabel dengan penggunaan formula UDF pada 999 Cells
dikomputer jadoel saya (Core i3-2120, 3.3Ghz) memerlukan waktu 4
menit 45 detik, selisih 30 detik'an lebih cepat dari UDF sebelumnya.
dan kurang dari 2 detik jika diaplikasikan pada source data yang
sama, untuk penggunaan pada 100'an cells hasil (100 user unik)
±3 detik pada 200 cells hasil, ±9 detik pada 300 cells hasil dan
terus meningkat secara signifikan pada penggunaan UDF yang lebih
banyak
Solusi, misal secara total anda punya 200 user pada database user,
maka cukup gunakan secara bijak UDF nya hanya pada 200 cells saja,
tidak perlu sampai 1000 Cells diisi formula yang sudah jelas-jelas
mulai cell ke 201 s/d 1000 tidak akan ada isinya karena kita tau
didatabase hanya ada 200 user unik saja, karena hanya akan membuang
waktu dan resource sia-sia.
Demikian disampaikan, terima kasih.
Rgds,
[dp]
On 14/06/2013 23:35, De Premor wrote:
>Coba sumbang solusi alternatif dalam bentuk macro UDF
>
>Rgds,
>[dp]
tapi pertama saya mau bertanya ke De Premor dulu....solusi yang anda berikan bagus tapi ada sedikit pertanyaan.. tambahan
jika saya ingin memindahkan scrip macro trsb apa bisa hanya dengan copy paste ke file saya???
terus kalo ga salah rang untuk tabelnya yang anda buat dimacron hanya untuk 5 rang tabel yah?? sedangkan di file saya untuk rang tabelnya ada 10 tabel dan itu pn bisa bertambah
kira2 kalo saya tambah rang (rDate2 As Range, rDate3 As Range, rDate4 As Range, rDate5 As Range) sampai ( rDate20 As Range) apa tidak masalah???
soalnya saya soal mencoba memindahkan scrip macro trsbt ke file saya dan saya tambah rangnya samapi ( rDate20 As Range) tapi hasilnya malah erro...
mohon penjelasannya kembali ....
terima kasih
Salam
Shenly ^^*
____________
Dari: De Premor <de@premor.net>
Kepada: belajar-excel@
Dikirim: Sabtu, 15 Juni 2013 13:35
Judul: Re: Bls: [belajar-excel] Memsihkan nama yang sama dengan 2 kategori tanggal?????
Dh,
Improvement untuk percepatan waktu kalkulasi,pada data 999 baris x 5
tabel dengan penggunaan formula UDF pada 999 Cells
dikomputer jadoel saya (Core i3-2120, 3.3Ghz) memerlukan waktu 4
menit 45 detik, selisih 30 detik'an lebih cepat dari UDF sebelumnya.
dan kurang dari 2 detik jika diaplikasikan pada source data yang
sama, untuk penggunaan pada 100'an cells hasil (100 user unik)
±3 detik pada 200 cells hasil, ±9 detik pada 300 cells hasil dan
terus meningkat secara signifikan pada penggunaan UDF yang lebih
banyak
Solusi, misal secara total anda punya 200 user pada database user,
maka cukup gunakan secara bijak UDF nya hanya pada 200 cells saja,
tidak perlu sampai 1000 Cells diisi formula yang sudah jelas-jelas
mulai cell ke 201 s/d 1000 tidak akan ada isinya karena kita tau
didatabase hanya ada 200 user unik saja, karena hanya akan membuang
waktu dan resource sia-sia.
Demikian disampaikan, terima kasih.
Rgds,
[dp]
On 14/06/2013 23:35, De Premor wrote:
>Coba sumbang solusi alternatif dalam bentuk macro UDF
>
>Rgds,
>[dp]
Sat Jun 15, 2013 5:33 am (PDT) . Posted by:
"Titis Ardiyana Wulandari" tiez_2289
terimakasih banyak atas sarannya, akan saya pelajari satu persatu dengan seksama agar ilmunya masuk ke otak..
________________________________
From: Mr. Kid <mr.nmkid@gmail.com >
To: BeExcel <belajar-excel@yahoogroups.com >
Sent: Friday, June 14, 2013 6:10 AM
Subject: Re: [belajar-excel] Belajar Macro
ops sorry, bagian :
Setelah 2 tutorial di atas (total 5 page), maka coba ke link berikut ini :
http://www.vbtutor.net/vb6/vbtutor.html
dan cukup pelajari Lesson 4 sampai 13, kemudian lompat ke lesson 16.
harusnya :
Setelah 2 tutorial di atas (total 5 page), maka coba ke link berikut ini :
http://www.vbtutor.net/vb6/vbtutor.html
dan cukup pelajari Lesson 5 sampai 13, kemudian lompat ke lesson 16.
supaya ndak bingung dalam mempelajarinya.
Jangan lupa untuk mencobanya dikomputer sendiri setiap bagiannya.
Wassalam,
Kid.
2013/6/14 Mr. Kid <mr.nmkid@gmail.com >
Wa'alaikumussalam Wr. Wb.
>
>
>Pertama, coba ke link ini :
>http://www.excel-vba.com/vba-prog-1-1-editor.htm
>
>Link di atas akan membosankan untuk dibaca dan dipelajari, tetapi bagian ini adalah pengenalan lingkungan untuk membangun suatu program. Mulai dari lesson 1 sampai lesson 3. Pada lesson 2 bagian akhir yang ada userform-nya, abaikan dulu.
>
>
>Lanjutkan dengan jalan-jalan ke :
>http://www.anthony-vba.kefra.com/vba/vbabasic1.htm
>mulai dari Tutorial 1 dan Tutorial 2, bersabarlah agar ndak bingung dengan tidak membuka tutorial 3.
>
>ndak perlu buru-buru pengen segera kelar.
>baca satu bagian (bukan satu page), coba sendiri di komputer Anda sampai berhasil (tidak error).
>
>Kemudian ubah sedikit bagian sana sini dari hasil coba Anda. Lalu Run dan revisi sampai tidak error.
>
>Setelah itu berlanjut ke bagian berikutnya sampai ke page tutorial berikutnya.
>
>Minimal, pada tutorial 1, Anda bisa tahu apa itu prosedur dan bloknya. Bagaimana cara run sebuah prosedur. Cara menambah sebuah module (lembar menulis script).
>
>Pada page selanjutnya, akan mulai mengenal object dasar dalam Excel, seperti range, worksheet, cells, dan sebagainya.
>
>Pada bagian ini, jangan jengah dan terburu-buru. Jika tidak bisa paham bagian ini, maka akan repot ketika sudah masuk ke hal-hal yang menyangkut bahasa VB itu sendiri. Artinya, kenali Excel lebih dulu baru mulai belajar pemrograman untuk otomasi Excel Anda.
>
>
>Jika Anda tidak mengenal isi rumah Anda, bagaimana Anda akan membuat sebuah robot yang bisa menata rumah Anda ?
>
>
>Setelah 2 tutorial di atas (total 5 page), maka coba ke link berikut ini :
>http://www.vbtutor.net/vb6/vbtutor.html
>
>dan cukup pelajari Lesson 4 sampai 13, kemudian lompat ke lesson 16.
>
>
>Jika sudah mulai lancar dengan hal-hal diatas, nanti beranjak ke pelajaran tentang UserForm dan control
>
>Kalau sudah tamat, kabari ya, sehingga bisa disusun alur untuk mempelajari UserForm dan Control.
>
>
>Selamat belajar.
>
>
>Wassalamu'alaikum Wr. Wb.
>Kid.
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>2013/6/14 Titis Ardiyana Wulandari <tiez_2289@yahoo.com >
>
>
>>
>>Assalamu'alaikum wr wb.
>>
>>
>>bagaimana cara memulai belajar makro excel yg baik dan benar agar bisa mengerti dengan benar bahasa pemrogramannya pula??
>>
>>
>>terimakasih,
>>Wassalamu'alaikum wr wb.
>>
>>
>
____________
From: Mr. Kid <mr.nmkid@gmail.
To: BeExcel <belajar-excel@
Sent: Friday, June 14, 2013 6:10 AM
Subject: Re: [belajar-excel] Belajar Macro
ops sorry, bagian :
Setelah 2 tutorial di atas (total 5 page), maka coba ke link berikut ini :
http://www.vbtutor.
dan cukup pelajari Lesson 4 sampai 13, kemudian lompat ke lesson 16.
harusnya :
Setelah 2 tutorial di atas (total 5 page), maka coba ke link berikut ini :
http://www.vbtutor.
dan cukup pelajari Lesson 5 sampai 13, kemudian lompat ke lesson 16.
supaya ndak bingung dalam mempelajarinya.
Jangan lupa untuk mencobanya dikomputer sendiri setiap bagiannya.
Wassalam,
Kid.
2013/6/14 Mr. Kid <mr.nmkid@gmail.
Wa'alaikumussal
>
>
>Pertama, coba ke link ini :
>http://www.excel-
>
>Link di atas akan membosankan untuk dibaca dan dipelajari, tetapi bagian ini adalah pengenalan lingkungan untuk membangun suatu program. Mulai dari lesson 1 sampai lesson 3. Pada lesson 2 bagian akhir yang ada userform-nya, abaikan dulu.
>
>
>Lanjutkan dengan jalan-jalan ke :
>http://www.anthony-
>mulai dari Tutorial 1 dan Tutorial 2, bersabarlah agar ndak bingung dengan tidak membuka tutorial 3.
>
>ndak perlu buru-buru pengen segera kelar.
>baca satu bagian (bukan satu page), coba sendiri di komputer Anda sampai berhasil (tidak error).
>
>Kemudian ubah sedikit bagian sana sini dari hasil coba Anda. Lalu Run dan revisi sampai tidak error.
>
>Setelah itu berlanjut ke bagian berikutnya sampai ke page tutorial berikutnya.
>
>Minimal, pada tutorial 1, Anda bisa tahu apa itu prosedur dan bloknya. Bagaimana cara run sebuah prosedur. Cara menambah sebuah module (lembar menulis script).
>
>Pada page selanjutnya, akan mulai mengenal object dasar dalam Excel, seperti range, worksheet, cells, dan sebagainya.
>
>Pada bagian ini, jangan jengah dan terburu-buru. Jika tidak bisa paham bagian ini, maka akan repot ketika sudah masuk ke hal-hal yang menyangkut bahasa VB itu sendiri. Artinya, kenali Excel lebih dulu baru mulai belajar pemrograman untuk otomasi Excel Anda.
>
>
>Jika Anda tidak mengenal isi rumah Anda, bagaimana Anda akan membuat sebuah robot yang bisa menata rumah Anda ?
>
>
>Setelah 2 tutorial di atas (total 5 page), maka coba ke link berikut ini :
>http://www.vbtutor.
>
>dan cukup pelajari Lesson 4 sampai 13, kemudian lompat ke lesson 16.
>
>
>Jika sudah mulai lancar dengan hal-hal diatas, nanti beranjak ke pelajaran tentang UserForm dan control
>
>Kalau sudah tamat, kabari ya, sehingga bisa disusun alur untuk mempelajari UserForm dan Control.
>
>
>Selamat belajar.
>
>
>Wassalamu&#
>Kid.
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>2013/6/14 Titis Ardiyana Wulandari <tiez_2289@yahoo.
>
>
>>
>>Assalamu&#
>>
>>
>>bagaimana cara memulai belajar makro excel yg baik dan benar agar bisa mengerti dengan benar bahasa pemrogramannya pula??
>>
>>
>>terimakasih
>>Wassalamu&#
>>
>>
>
GROUP FOOTER MESSAGE
=====================================================================
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
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
---------------------------------------------------------------------
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
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
---------------------------------------------------------------------
Tidak ada komentar:
Posting Komentar