15 Messages
Digest #2878
Messages
Wed Apr 16, 2014 6:15 pm (PDT) . Posted by:
"ryan" ryandirhamsyah
Dear Master,
Saya ada kebutuhan untuk custom view kolom pada pivot tabel. Lengkapnya ada pada file terlampir dan secara singkat output yg diinginkan adalah view standard pada pivot (kolom A - G) view-nya diubah menjadi seperti yg ada pada sheet pivot kolom I - O. Apakah pada excel memungkinkan untuk melakukan perubahan tersebut atau tidak ya? Terlampir filenya dan terima kasih banyak atas perhatian serta bantuannya.
BestRegards,
Moch. Ryan D
Saya ada kebutuhan untuk custom view kolom pada pivot tabel. Lengkapnya ada pada file terlampir dan secara singkat output yg diinginkan adalah view standard pada pivot (kolom A - G) view-nya diubah menjadi seperti yg ada pada sheet pivot kolom I - O. Apakah pada excel memungkinkan untuk melakukan perubahan tersebut atau tidak ya? Terlampir filenya dan terima kasih banyak atas perhatian serta bantuannya.
BestRegards,
Moch. Ryan D
Wed Apr 16, 2014 8:14 pm (PDT) . Posted by:
"Jan Raisin"
Hai Ryan,
Excel memungkinkan tampilan Pivot table seperti yang anda harapkan, hanya
saja perlu melakukan sedikit modifikasi pada tabel data dan Pivot tablenya
1. pada sheet "Data" tambahkan 1 buah kolom, headernya "Total Kebutuhan"
diisi dengan formula CountIf
2. buat sebuah Pivot Table dengan bentuk tabular, hilangkan Sub Total
dan set Grand Total hanya on pada kolom saja
3. pada Group Row diisi dengan Buah dan Total Kebutuhan
4. pada Group Column diisi dengan Tanggal Beli
5. pada Group Values diisi dengan Sudah Beli, set perhitungan menjadi
Count
6. klik header Blank pada tanggal, klik kanan, move, pilih to Beginning
7. ganti heaader kolom Blank menjadi "Kekurangan"
silakan ikuti langkah-langkah di atas.. semoga sesuai dengan yang
diharapkan..
kalo sudah pas atau ada yang kurang jelas, tolong kabari lagi ya..
Wassalam,
-Miss Jan Raisin-
Pada 16 April 2014 22.32, ryan <ryandirhamsyah@yahoo.com> menulis:
>
>
> Dear Master,
>
> Saya ada kebutuhan untuk custom view kolom pada pivot tabel. Lengkapnya
> ada pada file terlampir dan secara singkat output yg diinginkan adalah view
> standard pada pivot (kolom A - G) view-nya diubah menjadi seperti yg ada
> pada sheet pivot kolom I - O. Apakah pada excel memungkinkan untuk
> melakukan perubahan tersebut atau tidak ya? Terlampir filenya dan terima
> kasih banyak atas perhatian serta bantuannya.
>
> BestRegards,
> Moch. Ryan D
>
>
>
Excel memungkinkan tampilan Pivot table seperti yang anda harapkan, hanya
saja perlu melakukan sedikit modifikasi pada tabel data dan Pivot tablenya
1. pada sheet "Data" tambahkan 1 buah kolom, headernya "Total Kebutuhan"
diisi dengan formula CountIf
2. buat sebuah Pivot Table dengan bentuk tabular, hilangkan Sub Total
dan set Grand Total hanya on pada kolom saja
3. pada Group Row diisi dengan Buah dan Total Kebutuhan
4. pada Group Column diisi dengan Tanggal Beli
5. pada Group Values diisi dengan Sudah Beli, set perhitungan menjadi
Count
6. klik header Blank pada tanggal, klik kanan, move, pilih to Beginning
7. ganti heaader kolom Blank menjadi "Kekurangan"
silakan ikuti langkah-langkah di atas.. semoga sesuai dengan yang
diharapkan..
kalo sudah pas atau ada yang kurang jelas, tolong kabari lagi ya..
Wassalam,
-Miss Jan Raisin-
Pada 16 April 2014 22.32, ryan <ryandirhamsyah@yahoo.com> menulis:
>
>
> Dear Master,
>
> Saya ada kebutuhan untuk custom view kolom pada pivot tabel. Lengkapnya
> ada pada file terlampir dan secara singkat output yg diinginkan adalah view
> standard pada pivot (kolom A - G) view-nya diubah menjadi seperti yg ada
> pada sheet pivot kolom I - O. Apakah pada excel memungkinkan untuk
> melakukan perubahan tersebut atau tidak ya? Terlampir filenya dan terima
> kasih banyak atas perhatian serta bantuannya.
>
> BestRegards,
> Moch. Ryan D
>
>
>
Wed Apr 16, 2014 6:33 pm (PDT) . Posted by:
"Jan Raisin"
baru liat lagi..
script dari pak de mantap.. penampakan 10 baris x 10 kolomnya mirip dengan
kasus yang diberikan..
penjelasan jalannya script juga jelas..
ini cuma opini Jan pribadi ya.. semoga tidak mempengaruhi opini moderator
^_^
2 jempol tangan + 2 jempol kaki untuk pak De xixixi ^_^ [image: Gambar
sisip 1][image: Gambar sisip 2]
kalo kurang nanti Jan pinjam jempol orang yang di sebelah Jan deh
Terima kasih untuk sharing ilmunya
Wassalam,
-Miss Jan Raisin-
Pada 16 April 2014 16.14, De Premor <de@premor.net> menulis:
> Selamat sore semuanya, baru bisa konek lagi nih
>
> Setelah lama nga nengokin ternyata ada celengan nya yak ! ikutan boleh ?
>
> Sub Gradasi_Catur()
> 'Definisi Pemakaian Variable, di Office2010 definisi baris cukup LONG
> saja karena jumlah baris di excel 2010 hanya 2^20
> Dim xRow As Long, MaxRow As Long
>
> 'Untuk Colom, menggunakan Integer saja, karena cuman perlu 2^14
> Dim xCol As Integer, MaxCol As Integer
>
> 'berinteraksi dengan user
> MaxRow = InputBox("Masukan Jumlah Baris ?", "Gradasi Catur", 10)
> MaxCol = InputBox("Masukan Jumlah Kolom ?", "Gradasi Catur", 10)
>
> 'kosongin hasil sebelumnya (kalau ada)
> Cells.Clear
>
> 'Lakukan perulangan sesuai jumlah baris yang diinginkan user
> For xRow = 1 To MaxRow
> 'Lakukan perulangan sesuai jumlah kolom yang diinginkan user
> For xCol = 1 To MaxCol
> 'Untuk memilih cell
> With Cells(xRow, xCol).Interior
> 'Untuk membuat pewarnaan zigzag
> 'Jika sisa pembagian 2 pada nilai baris masih menyisakan 1
> (Bilangan Ganjil), maka :
> If xRow Mod 2 = 1 Then
> 'Jika ketemu baris ganjil, maka kasih warna mulai
> kolom kedua
> 'Pewarnaan menggunakan metode RGB ( RED, GREEN, BLUE )
> maksimal nilai masing2 warna adalah 255, dimulai dari 0
> 'Maka kita buat steping berdasar maksimal jumlah baris
> dan kolom yang diminta user untuk
> 'menghasilkan efek gradasi dengan marna sesuai contoh
> soal
> If xCol Mod 2 = 0 Then .Color = RGB((255 / MaxRow) *
> xRow, (255 / MaxCol) * xCol, 10)
> Else
> 'Jika ketemu baris ganjil, maka kasih warna mulai
> kolom pertama
> If xCol Mod 2 = 1 Then .Color = RGB((255 / MaxRow) *
> xRow, (255 / MaxCol) * xCol, 10)
> End If
> End With
>
> Next
> Next
> End Sub
>
> Selesai deh
>
> Rgds,
> [dp]
>
>
>
>
>
script dari pak de mantap.. penampakan 10 baris x 10 kolomnya mirip dengan
kasus yang diberikan..
penjelasan jalannya script juga jelas..
ini cuma opini Jan pribadi ya.. semoga tidak mempengaruhi opini moderator
^_^
2 jempol tangan + 2 jempol kaki untuk pak De xixixi ^_^ [image: Gambar
sisip 1][image: Gambar sisip 2]
kalo kurang nanti Jan pinjam jempol orang yang di sebelah Jan deh
Terima kasih untuk sharing ilmunya
Wassalam,
-Miss Jan Raisin-
Pada 16 April 2014 16.14, De Premor <de@premor.net> menulis:
> Selamat sore semuanya, baru bisa konek lagi nih
>
> Setelah lama nga nengokin ternyata ada celengan nya yak ! ikutan boleh ?
>
> Sub Gradasi_Catur(
> 'Definisi Pemakaian Variable, di Office2010 definisi baris cukup LONG
> saja karena jumlah baris di excel 2010 hanya 2^20
> Dim xRow As Long, MaxRow As Long
>
> 'Untuk Colom, menggunakan Integer saja, karena cuman perlu 2^14
> Dim xCol As Integer, MaxCol As Integer
>
> 'berinteraksi dengan user
> MaxRow = InputBox("
> MaxCol = InputBox("
>
> 'kosongin hasil sebelumnya (kalau ada)
> Cells.Clear
>
> 'Lakukan perulangan sesuai jumlah baris yang diinginkan user
> For xRow = 1 To MaxRow
> 'Lakukan perulangan sesuai jumlah kolom yang diinginkan user
> For xCol = 1 To MaxCol
> 'Untuk memilih cell
> With Cells(xRow, xCol).Interior
> 'Untuk membuat pewarnaan zigzag
> 'Jika sisa pembagian 2 pada nilai baris masih menyisakan 1
> (Bilangan Ganjil), maka :
> If xRow Mod 2 = 1 Then
> 'Jika ketemu baris ganjil, maka kasih warna mulai
> kolom kedua
> 'Pewarnaan menggunakan metode RGB ( RED, GREEN, BLUE )
> maksimal nilai masing2 warna adalah 255, dimulai dari 0
> 'Maka kita buat steping berdasar maksimal jumlah baris
> dan kolom yang diminta user untuk
> 'menghasilkan efek gradasi dengan marna sesuai contoh
> soal
> If xCol Mod 2 = 0 Then .Color = RGB((255 / MaxRow) *
> xRow, (255 / MaxCol) * xCol, 10)
> Else
> 'Jika ketemu baris ganjil, maka kasih warna mulai
> kolom pertama
> If xCol Mod 2 = 1 Then .Color = RGB((255 / MaxRow) *
> xRow, (255 / MaxCol) * xCol, 10)
> End If
> End With
>
> Next
> Next
> End Sub
>
> Selesai deh
>
> Rgds,
> [dp]
>
>
>
>
>
Wed Apr 16, 2014 6:56 pm (PDT) . Posted by:
"Bagus" bagus4bls
Pak Dwint;
"Biar adil, Moderator dan Miss Jan Raisin tidak boleh mengikuti challenge ini, selain itu semua BeExceller dipersilakan mengikuti challenge ini."
kalau menurut saya pribadi sih baik itu moderator maupun miss jan, boleh2 saja mengikuti celeng ini... (walaupun pada nantinya file yg mereka kirim tidak masuk penilaian.. hehehe...).
tujuannya biar bisa memperkaya / menjadi bahan pembelajaran be-exceller yg lain (terutama saya yg masih 0 besar soal vba excel)
Wassalam
~ Bagus ~
----- Original Message -----
From: dwint ruswanto
To: belajar-excel@yahoogroups.com
Sent: Wednesday, April 16, 2014 10:45 AM
Subject: [belajar-excel] Challenge VBA: Membuat warna pada cell
Assalamu'alaikum wr. wb.,
Berdasarkan permintaan dari pak Heri yang lagi semangat belajar VBA, saya mewakili moderator ingin memberikan sedikit challange kepada BeExceller.
Kasusnya seperti gambar di bawah ini:
Yang diminta adalah:
Membuat warna interior cel seperti di atas dengan pola seperti papan catur menggunakan VBA, jenis warna bebas asal tidak putih semua hehehehe :)
Boleh menggunakan scipt apa saja, penilaian pemenang akan ditentukan oleh moderator dan keputusan moderator tidak bisa diganggu gugat hehehehe :)
Biar adil, Moderator dan Miss Jan Raisin tidak boleh mengikuti challenge ini, selain itu semua BeExceller dipersilakan mengikuti challenge ini.
Peserta selain harus menyertakan workbook <= 250 KB juga harus menerangkan jalannya script itu di body email, hal ini untuk melatih BeExceller berbagi ilmu dan menerangkannya kepada member yang lain.
Buat menambah semangat, ada 2 buah buku sebagai hadiah untuk 2 pemenang, tetapi bukan buku mengenai Excel atau VBA karena millis belum memiliki buku sendiri. Pemenang akan diminta mengirimkan alamat pengiriman ke email owner (bukan email milis) beserta telepon yang bisa dihubungi setelah challenge ini ditutup dan diperoleh 2 orang pemenang.
Batas waktu challenge 7 hari mulai sekarang, dan akan ditutup pada hari Rabu tanggal 23 April 2014 jam 12:00 WIB.
Tujuan dari challenge ini bukan untuk mengejar hadiahnya, tetapi sekedar untuk melatih kemampuan mengajarkan ilmu kepada yang lain.
Selamat berkreasi.
Wassalam,
-dwint-
"Biar adil, Moderator dan Miss Jan Raisin tidak boleh mengikuti challenge ini, selain itu semua BeExceller dipersilakan mengikuti challenge ini."
kalau menurut saya pribadi sih baik itu moderator maupun miss jan, boleh2 saja mengikuti celeng ini... (walaupun pada nantinya file yg mereka kirim tidak masuk penilaian.. hehehe...).
tujuannya biar bisa memperkaya / menjadi bahan pembelajaran be-exceller yg lain (terutama saya yg masih 0 besar soal vba excel)
Wassalam
~ Bagus ~
----- Original Message -----
From: dwint ruswanto
To: belajar-excel@yahoogroups.com
Sent: Wednesday, April 16, 2014 10:45 AM
Subject: [belajar-excel] Challenge VBA: Membuat warna pada cell
Assalamu'
Berdasarkan permintaan dari pak Heri yang lagi semangat belajar VBA, saya mewakili moderator ingin memberikan sedikit challange kepada BeExceller.
Kasusnya seperti gambar di bawah ini:
Yang diminta adalah:
Membuat warna interior cel seperti di atas dengan pola seperti papan catur menggunakan VBA, jenis warna bebas asal tidak putih semua hehehehe :)
Boleh menggunakan scipt apa saja, penilaian pemenang akan ditentukan oleh moderator dan keputusan moderator tidak bisa diganggu gugat hehehehe :)
Biar adil, Moderator dan Miss Jan Raisin tidak boleh mengikuti challenge ini, selain itu semua BeExceller dipersilakan mengikuti challenge ini.
Peserta selain harus menyertakan workbook <= 250 KB juga harus menerangkan jalannya script itu di body email, hal ini untuk melatih BeExceller berbagi ilmu dan menerangkannya kepada member yang lain.
Buat menambah semangat, ada 2 buah buku sebagai hadiah untuk 2 pemenang, tetapi bukan buku mengenai Excel atau VBA karena millis belum memiliki buku sendiri. Pemenang akan diminta mengirimkan alamat pengiriman ke email owner (bukan email milis) beserta telepon yang bisa dihubungi setelah challenge ini ditutup dan diperoleh 2 orang pemenang.
Batas waktu challenge 7 hari mulai sekarang, dan akan ditutup pada hari Rabu tanggal 23 April 2014 jam 12:00 WIB.
Tujuan dari challenge ini bukan untuk mengejar hadiahnya, tetapi sekedar untuk melatih kemampuan mengajarkan ilmu kepada yang lain.
Selamat berkreasi.
Wassalam,
-dwint-
Wed Apr 16, 2014 7:27 pm (PDT) . Posted by:
"Ferry Alexander"
Setuju dengan Miss Jan, oke banget memang Pak De saya sudah coba scriptnya, simple tapi mantap, saya jadi minder nih...hehehe...
btw mohon sharenya untuk website tempat belajar pivot table dongs, kalo bisa sekalian yg ada workbook untuk latihannya. trims
rgds,
Ferry
Pada Kamis, 17 April 2014 8:56, Bagus <bagus@kingjim.co.id> menulis:
Pak Dwint;
"Biar adil, Moderator dan Miss Jan Raisin tidak boleh
mengikuti challenge ini, selain itu semua BeExceller dipersilakan mengikuti
challenge ini."
kalau menurut saya pribadi sih baik
itu moderator maupun miss jan, boleh2 saja mengikuti celeng ini... (walaupun pada nantinya file yg mereka kirim tidak masuk
penilaian.. hehehe...).
tujuannya biar bisa memperkaya / menjadi bahan
pembelajaran be-exceller yg lain (terutama saya yg masih 0 besar soal vba
excel)
Wassalam
~
Bagus ~
----- Original Message -----
>From: dwint ruswanto
>To: belajar-excel@yahoogroups.com
>Sent: Wednesday, April 16, 2014 10:45 AM
>Subject: [belajar-excel] Challenge VBA: Membuat warna pada cell
>
>
>Assalamu39;alaikum wr. wb.,
>
>Berdasarkan permintaan dari pak Heri yang lagi semangat belajar VBA, saya mewakili moderator ingin memberikan sedikit challange kepada BeExceller.
>
>Kasusnya seperti gambar di bawah ini:
>
>
>Yang diminta adalah:
>Membuat warna interior cel seperti di atas dengan pola seperti papan catur menggunakan VBA, jenis warna bebas asal tidak putih semua hehehehe :)
>
>Boleh menggunakan scipt apa saja, penilaian pemenang akan ditentukan oleh moderator dan keputusan moderator tidak bisa diganggu gugat hehehehe :)
>
>
>Biar adil, Moderator dan Miss Jan Raisin tidak boleh mengikuti challenge ini, selain itu semua BeExceller dipersilakan mengikuti challenge ini.
>
>
>Peserta selain harus menyertakan workbook <= 250 KB juga harus menerangkan jalannya script itu di body email, hal ini untuk melatih BeExceller berbagi ilmu dan menerangkannya kepada member yang lain.
>
>
>Buat menambah semangat, ada 2 buah buku sebagai hadiah untuk 2 pemenang, tetapi bukan buku mengenai Excel atau VBA karena millis belum memiliki buku sendiri. Pemenang akan diminta mengirimkan alamat pengiriman ke email owner (bukan email milis) beserta telepon yang bisa dihubungi setelah challenge ini ditutup dan diperoleh 2 orang pemenang.
>
>
>Batas waktu challenge 7 hari mulai sekarang, dan akan ditutup pada hari Rabu tanggal 23 April 2014 jam 12:00 WIB.
>
>
>Tujuan dari challenge ini bukan untuk mengejar hadiahnya, tetapi sekedar untuk melatih kemampuan mengajarkan ilmu kepada yang lain.
>
>
>Selamat berkreasi.
>
>
>Wassalam,
>
>
>-dwint-
>
btw mohon sharenya untuk website tempat belajar pivot table dongs, kalo bisa sekalian yg ada workbook untuk latihannya. trims
rgds,
Ferry
Pada Kamis, 17 April 2014 8:56, Bagus <bagus@kingjim.co.id> menulis:
Pak Dwint;
"Biar adil, Moderator dan Miss Jan Raisin tidak boleh
mengikuti challenge ini, selain itu semua BeExceller dipersilakan mengikuti
challenge ini."
kalau menurut saya pribadi sih baik
itu moderator maupun miss jan, boleh2 saja mengikuti celeng ini... (walaupun pada nantinya file yg mereka kirim tidak masuk
penilaian.. hehehe...).
tujuannya biar bisa memperkaya / menjadi bahan
pembelajaran be-exceller yg lain (terutama saya yg masih 0 besar soal vba
excel)
Wassalam
~
Bagus ~
----- Original Message -----
>From: dwint ruswanto
>To: belajar-excel@yahoogroups.com
>Sent: Wednesday, April 16, 2014 10:45 AM
>Subject: [belajar-excel] Challenge VBA: Membuat warna pada cell
>
>
>Assalamu
>
>Berdasarkan permintaan dari pak Heri yang lagi semangat belajar VBA, saya mewakili moderator ingin memberikan sedikit challange kepada BeExceller.
>
>Kasusnya seperti gambar di bawah ini:
>
>
>Yang diminta adalah:
>Membuat warna interior cel seperti di atas dengan pola seperti papan catur menggunakan VBA, jenis warna bebas asal tidak putih semua hehehehe :)
>
>Boleh menggunakan scipt apa saja, penilaian pemenang akan ditentukan oleh moderator dan keputusan moderator tidak bisa diganggu gugat hehehehe :)
>
>
>Biar adil, Moderator dan Miss Jan Raisin tidak boleh mengikuti challenge ini, selain itu semua BeExceller dipersilakan mengikuti challenge ini.
>
>
>Peserta selain harus menyertakan workbook <= 250 KB juga harus menerangkan jalannya script itu di body email, hal ini untuk melatih BeExceller berbagi ilmu dan menerangkannya kepada member yang lain.
>
>
>Buat menambah semangat, ada 2 buah buku sebagai hadiah untuk 2 pemenang, tetapi bukan buku mengenai Excel atau VBA karena millis belum memiliki buku sendiri. Pemenang akan diminta mengirimkan alamat pengiriman ke email owner (bukan email milis) beserta telepon yang bisa dihubungi setelah challenge ini ditutup dan diperoleh 2 orang pemenang.
>
>
>Batas waktu challenge 7 hari mulai sekarang, dan akan ditutup pada hari Rabu tanggal 23 April 2014 jam 12:00 WIB.
>
>
>Tujuan dari challenge ini bukan untuk mengejar hadiahnya, tetapi sekedar untuk melatih kemampuan mengajarkan ilmu kepada yang lain.
>
>
>Selamat berkreasi.
>
>
>Wassalam,
>
>
>-dwint-
>
Wed Apr 16, 2014 9:34 pm (PDT) . Posted by:
"nangAgus" nangagoez
Dear Moderator,
Saya seorang pemula dalam VBA, bisanya hanya rekam makro, jadi masih
banyak yang tidak sesuai, mohon rekan-rekan be Excel dapat memberi
masukan untuk perbaikan script ini!
Private Sub Warnai_Click()
'Mendefinisikan variabel yang diperlukan
Dim baris As Integer
Dim kolom As Integer
Dim b As Integer
Dim k As Integer
Dim a As Integer
Dim WERNA As Double
'Mengambil banyaknya baris dan kolom dari userform Warnai
'(TextBox untuk baris dinamakan barise)
'(TextBox untuk kolom dinamakan kolome)
baris = barise.Value
kolom = kolome.Value
'Mulai perulangan menghitung kolom
For k = 1 To kolom
'Agar kolomnya bisa berselang-seling tiap baris genap selalu
dimulai dari 2
If k Mod 2 = 1 Then a = 1 Else a = 2
'Mulai menghitung perulangan baris
For b = a To baris
'Memilih cell baris ke b dan kolm ke k (pertama kali kolom 1
baris 1)
Cells(b, k).Select
With Selection.Interior
'Menghitung nilai warna
'(angka yang ada di sini dapat diubah untuk menentukan
warna sesuai selera.
'silahkan dicoba untuk mengganti angka 5 dan 15000000)
WERNA = (b - 1) * 5 + k * (15000000 / baris)
'Memerintah memberi warna
.Color = WERNA
'untuk pembelajaran, cell yang diwarnai diperintahkan
juga untuk menulis kode warnanya
Cells(b, k).Value = WERNA
Selection.NumberFormat = "#,##0"
End With
'nilai barisnya ditambah satu agar dapat berpindah lompat satu baris
selanjutnya kemudian balik ke atas (for b)
b = b + 1
Next b
'kembali ke perulangan k
Next k
'diperintah untuk menyembunyikan UserForm
Me.Hide
End Sub
Salam
NangAgus
On 16/04/2014 10:45, dwint ruswanto wrote:
> Assalamu'alaikum wr. wb.,
>
> Berdasarkan permintaan dari pak Heri yang lagi semangat belajar VBA,
> saya mewakili moderator ingin memberikan sedikit challange kepada
> BeExceller.
>
> Kasusnya seperti gambar di bawah ini:
>
>
> Yang diminta adalah:
> Membuat warna interior cel seperti di atas dengan pola seperti papan
> catur menggunakan VBA, jenis warna bebas asal tidak putih semua
> hehehehe :)
>
> Boleh menggunakan scipt apa saja, penilaian pemenang akan ditentukan
> oleh moderator dan keputusan moderator tidak bisa diganggu gugat
> hehehehe :)
>
> Biar adil, Moderator dan Miss Jan Raisin tidak boleh mengikuti
> challenge ini, selain itu semua BeExceller dipersilakan mengikuti
> challenge ini.
>
> Peserta selain harus menyertakan workbook <= 250 KB juga harus
> menerangkan jalannya script itu di body email, hal ini untuk melatih
> BeExceller berbagi ilmu dan menerangkannya kepada member yang lain.
>
> Buat menambah semangat, ada 2 buah buku sebagai hadiah untuk 2
> pemenang, tetapi bukan buku mengenai Excel atau VBA karena millis
> belum memiliki buku sendiri. Pemenang akan diminta mengirimkan alamat
> pengiriman ke email owner (bukan email milis) beserta telepon yang
> bisa dihubungi setelah challenge ini ditutup dan diperoleh 2 orang
> pemenang.
>
> Batas waktu challenge 7 hari mulai sekarang, dan akan ditutup pada
> hari Rabu tanggal 23 April 2014 jam 12:00 WIB.
>
> Tujuan dari challenge ini bukan untuk mengejar hadiahnya, tetapi
> sekedar untuk melatih kemampuan mengajarkan ilmu kepada yang lain.
>
> Selamat berkreasi.
>
> Wassalam,
>
> -dwint-
>
Saya seorang pemula dalam VBA, bisanya hanya rekam makro, jadi masih
banyak yang tidak sesuai, mohon rekan-rekan be Excel dapat memberi
masukan untuk perbaikan script ini!
Private Sub Warnai_Click(
'Mendefinisikan variabel yang diperlukan
Dim baris As Integer
Dim kolom As Integer
Dim b As Integer
Dim k As Integer
Dim a As Integer
Dim WERNA As Double
'Mengambil banyaknya baris dan kolom dari userform Warnai
'(TextBox untuk baris dinamakan barise)
'(TextBox untuk kolom dinamakan kolome)
baris = barise.Value
kolom = kolome.Value
'Mulai perulangan menghitung kolom
For k = 1 To kolom
'Agar kolomnya bisa berselang-seling tiap baris genap selalu
dimulai dari 2
If k Mod 2 = 1 Then a = 1 Else a = 2
'Mulai menghitung perulangan baris
For b = a To baris
'Memilih cell baris ke b dan kolm ke k (pertama kali kolom 1
baris 1)
Cells(b, k).Select
With Selection.Interior
'Menghitung nilai warna
'(angka yang ada di sini dapat diubah untuk menentukan
warna sesuai selera.
'silahkan dicoba untuk mengganti angka 5 dan 15000000)
WERNA = (b - 1) * 5 + k * (15000000 / baris)
'Memerintah memberi warna
.Color = WERNA
'untuk pembelajaran, cell yang diwarnai diperintahkan
juga untuk menulis kode warnanya
Cells(b, k).Value = WERNA
Selection.NumberFor
End With
'nilai barisnya ditambah satu agar dapat berpindah lompat satu baris
selanjutnya kemudian balik ke atas (for b)
b = b + 1
Next b
'kembali ke perulangan k
Next k
'diperintah untuk menyembunyikan UserForm
Me.Hide
End Sub
Salam
NangAgus
On 16/04/2014 10:45, dwint ruswanto wrote:
> Assalamu'
>
> Berdasarkan permintaan dari pak Heri yang lagi semangat belajar VBA,
> saya mewakili moderator ingin memberikan sedikit challange kepada
> BeExceller.
>
> Kasusnya seperti gambar di bawah ini:
>
>
> Yang diminta adalah:
> Membuat warna interior cel seperti di atas dengan pola seperti papan
> catur menggunakan VBA, jenis warna bebas asal tidak putih semua
> hehehehe :)
>
> Boleh menggunakan scipt apa saja, penilaian pemenang akan ditentukan
> oleh moderator dan keputusan moderator tidak bisa diganggu gugat
> hehehehe :)
>
> Biar adil, Moderator dan Miss Jan Raisin tidak boleh mengikuti
> challenge ini, selain itu semua BeExceller dipersilakan mengikuti
> challenge ini.
>
> Peserta selain harus menyertakan workbook <= 250 KB juga harus
> menerangkan jalannya script itu di body email, hal ini untuk melatih
> BeExceller berbagi ilmu dan menerangkannya kepada member yang lain.
>
> Buat menambah semangat, ada 2 buah buku sebagai hadiah untuk 2
> pemenang, tetapi bukan buku mengenai Excel atau VBA karena millis
> belum memiliki buku sendiri. Pemenang akan diminta mengirimkan alamat
> pengiriman ke email owner (bukan email milis) beserta telepon yang
> bisa dihubungi setelah challenge ini ditutup dan diperoleh 2 orang
> pemenang.
>
> Batas waktu challenge 7 hari mulai sekarang, dan akan ditutup pada
> hari Rabu tanggal 23 April 2014 jam 12:00 WIB.
>
> Tujuan dari challenge ini bukan untuk mengejar hadiahnya, tetapi
> sekedar untuk melatih kemampuan mengajarkan ilmu kepada yang lain.
>
> Selamat berkreasi.
>
> Wassalam,
>
> -dwint-
>
Wed Apr 16, 2014 7:24 pm (PDT) . Posted by:
"Lazuardi Biru" lazuardi_biru84
dh
salam be excelent.
seperti pertanyaan saya yag lalu.
rumus mengikuti data di sebelahnya.
kali ini saya sudah coba edit2 macro yang ada di milis.
tapi masih kurang pas.
mohon bantuan para master
skripnya seperti ini.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
End If
End Sub
ketika saya ketik di B3 di C3 akan terisi formula =VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)
tapi masalahnya ketika saya ketik di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di atas belum sesuai. mohon petunjuk dari master.
file terlampir
maksih sebelumnya.
salam
lb
salam be excelent.
seperti pertanyaan saya yag lalu.
rumus mengikuti data di sebelahnya.
kali ini saya sudah coba edit2 macro yang ada di milis.
tapi masih kurang pas.
mohon bantuan para master
skripnya seperti ini.
Private Sub Worksheet_Change(
If Not Intersect(Target, Range("
Target.Offset(
End If
End Sub
ketika saya ketik di B3 di C3 akan terisi formula =VLOOKUP(B3,
tapi masalahnya ketika saya ketik di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di atas belum sesuai. mohon petunjuk dari master.
file terlampir
maksih sebelumnya.
salam
lb
Wed Apr 16, 2014 7:49 pm (PDT) . Posted by:
"Bagus" bagus4bls
Hai Biru;
coba pada baris ini:
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
dirubah menjadi:
Target.Offset(, 1).Formula = "=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
Wassalam
~ Bagus ~
----- Original Message -----
From: Lazuardi Biru
To: belajar-excel@yahoogroups.com
Sent: Thursday, April 17, 2014 9:24 AM
Subject: [belajar-excel] vlookup - formula dinamis [1 Attachment]
dh
salam be excelent.
seperti pertanyaan saya yag lalu.
rumus mengikuti data di sebelahnya.
kali ini saya sudah coba edit2 macro yang ada di milis.
tapi masih kurang pas.
mohon bantuan para master
skripnya seperti ini.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
End If
End Sub
ketika saya ketik di B3 di C3 akan terisi formula =VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)
tapi masalahnya ketika saya ketik di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di atas belum sesuai. mohon petunjuk dari master.
file terlampir
maksih sebelumnya.
salam
lb
coba pada baris ini:
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
dirubah menjadi:
Target.Offset(, 1).Formula = "=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
Wassalam
~ Bagus ~
----- Original Message -----
From: Lazuardi Biru
To: belajar-excel@yahoogroups.com
Sent: Thursday, April 17, 2014 9:24 AM
Subject: [belajar-excel] vlookup - formula dinamis [1 Attachment]
dh
salam be excelent.
seperti pertanyaan saya yag lalu.
rumus mengikuti data di sebelahnya.
kali ini saya sudah coba edit2 macro yang ada di milis.
tapi masih kurang pas.
mohon bantuan para master
skripnya seperti ini.
Private Sub Worksheet_Change(
If Not Intersect(Target, Range("
Target.Offset(
End If
End Sub
ketika saya ketik di B3 di C3 akan terisi formula =VLOOKUP(B3,
tapi masalahnya ketika saya ketik di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di atas belum sesuai. mohon petunjuk dari master.
file terlampir
maksih sebelumnya.
salam
lb
Wed Apr 16, 2014 8:04 pm (PDT) . Posted by:
"Lazuardi Biru" lazuardi_biru84
pak bagus..
makasih pak..
kalau gak B3:B10 memungkinkan gak ya pak..
salam
lb
Pada Kamis, 17 April 2014 9:50, Bagus <bagus@kingjim.co.id> menulis:
Hai Biru;
coba pada baris ini:
Target.Offset(, 1).Formula =
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
dirubah menjadi:
Target.Offset(, 1).Formula =
"=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
Wassalam
~
Bagus ~
----- Original Message -----
>From: Lazuardi Biru
>To: belajar-excel@yahoogroups.com
>Sent: Thursday, April 17, 2014 9:24 AM
>Subject: [belajar-excel] vlookup - formula dinamis [1 Attachment]
>
>
>dh
>salam be excelent.
>seperti pertanyaan saya yag lalu.
>rumus mengikuti data di sebelahnya.
>kali ini
saya sudah coba edit2 macro yang ada di milis.
>tapi masih kurang
pas.
>
>mohon bantuan para master
>
>skripnya seperti
ini.
>
>
>Private Sub Worksheet_Change(
Range)
> If Not Intersect(Target, Range("
Nothing Then
> Target.Offset(
1).Formula = "=VLOOKUP(
> End
If
>End Sub
>
>ketika saya ketik di B3 di C3 akan terisi formula
=VLOOKUP(B3,
>
>tapi masalahnya ketika saya ketik
di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di
atas belum sesuai. mohon petunjuk dari master.
>
>
>file terlampir
>
>maksih
sebelumnya.
>
>salam
>
>lb
>
Wed Apr 16, 2014 8:11 pm (PDT) . Posted by:
"Jan Raisin"
Pak Lazuardi,
ini adalah script asli dari pak Lazuardi:
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
sekarang kita fokuskan hanya kepada script di sebalah kanan tanda = saja,
yaitu script yang ini:
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
script di atas ingin dibuat dinamis mengikuti nomer baris kolom target yang
diberi warna merah, nah.. tau kan cara mengambil nomer baris kolom
targetnya?
tetapi sebelumnya script di atas harus dipisah-pisah menjadi beberapa
bagian untuk memisahkan nomer barisnya, dan setiap bagian harus ditulis di
dalam 2 buah tanda kutip dua, dan untuk menggabungkan setiap bagian selalu
menggunakan tanda ampersand atau &
"=VLOOKUP(B" & 3 & ",data!$A$4:$B$10,2,FALSE)"
bagian 1: "=VLOOKUP(B"
bagian 2: 3
bagian 3: ",data!$A$4:$B$10,2,FALSE)"
nah.. yang ingin dibuat dinamis adalah bagian 2 yang berwarna merah, dibuat
mengikuti nomer baris target.. kira2 gimana ya cara mengambil nomer baris
targetnya? kasih tau Jan ya.. karena Jan belum tau nih,,
kalo sudah.. script tadi disusun lagi menjadi
"=VLOOKUP(B" & script_ambil_nomer_baris_target & ",data!$A$4:$B$10,2,FALSE)"
kalo kira-kira kolomnya yang dinamis gimana? dengan cara yang sama.. maka
harus dilakukan pemecahan script untuk memisahkan kolomnya dulu..
kalo kolom dan barisnya dinamis? berarti harus dilakukan pemisahan kolom
dan barisnya..
kalo udah dapat script yang warna merah tolong kasih tau Jan ya..
Wassalam,
-Miss Jan Raisin-
Pada 17 April 2014 10.09, Bagus <bagus@kingjim.co.id> menulis:
>
>
> Hai Biru;
>
> coba pada baris ini:
> Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>
> dirubah menjadi:
> Target.Offset(, 1).Formula = "=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
>
>
>
> Wassalam
>
> ~ Bagus ~
>
>
>
> ----- Original Message -----
> *From:* Lazuardi Biru <lazuardi_biru84@yahoo.com>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Thursday, April 17, 2014 9:24 AM
> *Subject:* [belajar-excel] vlookup - formula dinamis [1 Attachment]
>
>
>
> dh
> salam be excelent.
> seperti pertanyaan saya yag lalu.
> rumus mengikuti data di sebelahnya.
> kali ini saya sudah coba edit2 macro yang ada di milis.
> tapi masih kurang pas.
>
> mohon bantuan para master
>
> skripnya seperti ini.
>
>
> Private Sub Worksheet_Change(ByVal Target As Range)
> If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
> Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
> End If
> End Sub
>
> ketika saya ketik di B3 di C3 akan terisi formula
> =VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)
>
> tapi masalahnya ketika saya ketik di b4 formula yang di inginkan lookup
> valuenya juga di B4. tapi untuk skrip di atas belum sesuai. mohon petunjuk
> dari master.
>
> file terlampir
>
> maksih sebelumnya.
>
> salam
>
> lb
>
> _
>
ini adalah script asli dari pak Lazuardi:
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
sekarang kita fokuskan hanya kepada script di sebalah kanan tanda = saja,
yaitu script yang ini:
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
script di atas ingin dibuat dinamis mengikuti nomer baris kolom target yang
diberi warna merah, nah.. tau kan cara mengambil nomer baris kolom
targetnya?
tetapi sebelumnya script di atas harus dipisah-pisah menjadi beberapa
bagian untuk memisahkan nomer barisnya, dan setiap bagian harus ditulis di
dalam 2 buah tanda kutip dua, dan untuk menggabungkan setiap bagian selalu
menggunakan tanda ampersand atau &
"=VLOOKUP(B" & 3 & ",data!$A$4:$B$10,2,FALSE)"
bagian 1: "=VLOOKUP(B"
bagian 2: 3
bagian 3: ",data!$A$4:$B$10,2,FALSE)"
nah.. yang ingin dibuat dinamis adalah bagian 2 yang berwarna merah, dibuat
mengikuti nomer baris target.. kira2 gimana ya cara mengambil nomer baris
targetnya? kasih tau Jan ya.. karena Jan belum tau nih,,
kalo sudah.. script tadi disusun lagi menjadi
"=VLOOKUP(B" & script_ambil_nomer_baris_target & ",data!$A$4:$B$10,2,FALSE)"
kalo kira-kira kolomnya yang dinamis gimana? dengan cara yang sama.. maka
harus dilakukan pemecahan script untuk memisahkan kolomnya dulu..
kalo kolom dan barisnya dinamis? berarti harus dilakukan pemisahan kolom
dan barisnya..
kalo udah dapat script yang warna merah tolong kasih tau Jan ya..
Wassalam,
-Miss Jan Raisin-
Pada 17 April 2014 10.09, Bagus <bagus@kingjim.co.id> menulis:
>
>
> Hai Biru;
>
> coba pada baris ini:
> Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>
> dirubah menjadi:
> Target.Offset(, 1).Formula = "=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
>
>
>
> Wassalam
>
> ~ Bagus ~
>
>
>
> ----- Original Message -----
> *From:* Lazuardi Biru <lazuardi_biru84@yahoo.com>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Thursday, April 17, 2014 9:24 AM
> *Subject:* [belajar-excel] vlookup - formula dinamis [1 Attachment]
>
>
>
> dh
> salam be excelent.
> seperti pertanyaan saya yag lalu.
> rumus mengikuti data di sebelahnya.
> kali ini saya sudah coba edit2 macro yang ada di milis.
> tapi masih kurang pas.
>
> mohon bantuan para master
>
> skripnya seperti ini.
>
>
> Private Sub Worksheet_Change(
> If Not Intersect(Target, Range("
> Target.Offset(
> End If
> End Sub
>
> ketika saya ketik di B3 di C3 akan terisi formula
> =VLOOKUP(B3,
>
> tapi masalahnya ketika saya ketik di b4 formula yang di inginkan lookup
> valuenya juga di B4. tapi untuk skrip di atas belum sesuai. mohon petunjuk
> dari master.
>
> file terlampir
>
> maksih sebelumnya.
>
> salam
>
> lb
>
> _
>
Wed Apr 16, 2014 8:26 pm (PDT) . Posted by:
"Lazuardi Biru" lazuardi_biru84
mis jan
wah mis jan bikin teka teki.. hehehe saya coba dulu mis..
nanti kalo mentok saya kasih tanda S.O.S
kasih klu nya juga boleh mis.. hehehe
salam
lb
Pada Kamis, 17 April 2014 10:12, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
Pak Lazuardi,
ini adalah script asli dari pak Lazuardi:
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
sekarang kita fokuskan hanya kepada script di sebalah kanan tanda = saja, yaitu script yang ini:
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
script di atas ingin dibuat dinamis mengikuti nomer baris kolom target yang diberi warna merah, nah.. tau kan cara mengambil nomer baris kolom targetnya?
tetapi sebelumnya script di atas harus dipisah-pisah menjadi beberapa bagian untuk memisahkan nomer barisnya, dan setiap bagian harus ditulis di dalam 2 buah tanda kutip dua, dan untuk menggabungkan setiap bagian selalu menggunakan tanda ampersand atau &
"=VLOOKUP(B" &3&",data!$A$4:$B$10,2,FALSE)"
bagian 1: "=VLOOKUP(B"
bagian 2: 3
bagian 3: ",data!$A$4:$B$10,2,FALSE)"
nah.. yang ingin dibuat dinamis adalah bagian 2 yang berwarna merah, dibuat mengikuti nomer baris target.. kira2 gimana ya cara mengambil nomer baris targetnya? kasih tau Jan ya.. karena Jan belum tau nih,,
kalo sudah.. script tadi disusun lagi menjadi
"=VLOOKUP(B" & script_ambil_nomer_baris_target &",data!$A$4:$B$10,2,FALSE)"
kalo kira-kira kolomnya yang dinamis gimana? dengan cara yang sama.. maka harus dilakukan pemecahan script untuk memisahkan kolomnya dulu..
kalo kolom dan barisnya dinamis? berarti harus dilakukan pemisahan kolom dan barisnya..
kalo udah dapat script yang warna merah tolong kasih tau Jan ya..
Wassalam,
-Miss Jan Raisin-
Pada 17 April 2014 10.09, Bagus <bagus@kingjim.co.id> menulis:
>
>
>Hai Biru;
>
>coba pada baris ini:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>
>dirubah menjadi:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
>
>
>Wassalam
>~
Bagus ~
>
>----- Original Message -----
>>From: Lazuardi Biru
>>To: belajar-excel@yahoogroups.com
>>Sent: Thursday, April 17, 2014 9:24 AM
>>Subject: [belajar-excel] vlookup - formula dinamis [1 Attachment]
>>
>>
>>dh
>>salam be excelent.
>>seperti pertanyaan saya yag lalu.
>>rumus mengikuti data di sebelahnya.
>>kali ini
saya sudah coba edit2 macro yang ada di milis.
>>tapi masih kurang
pas.
>>
>>mohon bantuan para master
>>
>>skripnya seperti
ini.
>>
>>
>>Private Sub Worksheet_Change(ByVal Target As
Range)
>> If Not Intersect(Target, Range("b3:b10")) Is
Nothing Then
>> Target.Offset(,
1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>> End
If
>>End Sub
>>
>>ketika saya ketik di B3 di C3 akan terisi formula
=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)
>>
>>tapi masalahnya ketika saya ketik
di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di
atas belum sesuai. mohon petunjuk dari master.
>>
>>
>>file terlampir
>>
>>maksih
sebelumnya.
>>
>>salam
>>
>>lb
>>
>_
wah mis jan bikin teka teki.. hehehe saya coba dulu mis..
nanti kalo mentok saya kasih tanda S.O.S
kasih klu nya juga boleh mis.. hehehe
salam
lb
Pada Kamis, 17 April 2014 10:12, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
Pak Lazuardi,
ini adalah script asli dari pak Lazuardi:
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
sekarang kita fokuskan hanya kepada script di sebalah kanan tanda = saja, yaitu script yang ini:
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
script di atas ingin dibuat dinamis mengikuti nomer baris kolom target yang diberi warna merah, nah.. tau kan cara mengambil nomer baris kolom targetnya?
tetapi sebelumnya script di atas harus dipisah-pisah menjadi beberapa bagian untuk memisahkan nomer barisnya, dan setiap bagian harus ditulis di dalam 2 buah tanda kutip dua, dan untuk menggabungkan setiap bagian selalu menggunakan tanda ampersand atau &
"=VLOOKUP(B" &3&",data!$A$4:$B$10,2,FALSE)"
bagian 1: "=VLOOKUP(B"
bagian 2: 3
bagian 3: ",data!$A$4:$B$10,2,FALSE)"
nah.. yang ingin dibuat dinamis adalah bagian 2 yang berwarna merah, dibuat mengikuti nomer baris target.. kira2 gimana ya cara mengambil nomer baris targetnya? kasih tau Jan ya.. karena Jan belum tau nih,,
kalo sudah.. script tadi disusun lagi menjadi
"=VLOOKUP(B" & script_ambil_nomer_baris_target &",data!$A$4:$B$10,2,FALSE)"
kalo kira-kira kolomnya yang dinamis gimana? dengan cara yang sama.. maka harus dilakukan pemecahan script untuk memisahkan kolomnya dulu..
kalo kolom dan barisnya dinamis? berarti harus dilakukan pemisahan kolom dan barisnya..
kalo udah dapat script yang warna merah tolong kasih tau Jan ya..
Wassalam,
-Miss Jan Raisin-
Pada 17 April 2014 10.09, Bagus <bagus@kingjim.co.id> menulis:
>
>
>Hai Biru;
>
>coba pada baris ini:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>
>dirubah menjadi:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
>
>
>Wassalam
>~
Bagus ~
>
>----- Original Message -----
>>From: Lazuardi Biru
>>To: belajar-excel@yahoogroups.com
>>Sent: Thursday, April 17, 2014 9:24 AM
>>Subject: [belajar-excel] vlookup - formula dinamis [1 Attachment]
>>
>>
>>dh
>>salam be excelent.
>>seperti pertanyaan saya yag lalu.
>>rumus mengikuti data di sebelahnya.
>>kali ini
saya sudah coba edit2 macro yang ada di milis.
>>tapi masih kurang
pas.
>>
>>mohon bantuan para master
>>
>>skripnya seperti
ini.
>>
>>
>>Private Sub Worksheet_Change(
Range)
>> If Not Intersect(Target, Range("
Nothing Then
>> Target.Offset(
1).Formula = "=VLOOKUP(
>> End
If
>>End Sub
>>
>>ketika saya ketik di B3 di C3 akan terisi formula
=VLOOKUP(B3,
>>
>>tapi masalahnya ketika saya ketik
di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di
atas belum sesuai. mohon petunjuk dari master.
>>
>>
>>file terlampir
>>
>>maksih
sebelumnya.
>>
>>salam
>>
>>lb
>>
>_
Wed Apr 16, 2014 8:53 pm (PDT) . Posted by:
"Lazuardi Biru" lazuardi_biru84
mis jan
begini mis..
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
Target.Offset(, 1).Formula = "=VLOOKUP(B" & Target.Row & ",data!$A$4:$B$10,2,FALSE)"
End If
End Sub
teng kyu ya mis.. saranya..
salam
lb
Pada Kamis, 17 April 2014 10:26, Lazuardi Biru <lazuardi_biru84@yahoo.com> menulis:
mis jan
wah mis jan bikin teka teki.. hehehe saya coba dulu mis..
nanti kalo mentok saya kasih tanda S.O.S
kasih klu nya juga boleh mis.. hehehe
salam
lb
Pada Kamis, 17 April 2014 10:12, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
Pak Lazuardi,
ini adalah script asli dari pak Lazuardi:
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
sekarang kita fokuskan hanya kepada script di sebalah kanan tanda = saja, yaitu script yang ini:
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
script di atas ingin dibuat dinamis mengikuti nomer baris kolom target yang diberi warna merah, nah.. tau kan cara mengambil nomer baris kolom targetnya?
tetapi sebelumnya script di atas harus dipisah-pisah menjadi beberapa bagian untuk memisahkan nomer barisnya, dan setiap bagian harus ditulis di dalam 2 buah tanda kutip dua, dan untuk menggabungkan setiap bagian selalu menggunakan tanda ampersand atau &
"=VLOOKUP(B" &3&",data!$A$4:$B$10,2,FALSE)"
bagian 1: "=VLOOKUP(B"
bagian 2: 3
bagian 3: ",data!$A$4:$B$10,2,FALSE)"
nah.. yang ingin dibuat dinamis adalah bagian 2 yang berwarna merah, dibuat mengikuti nomer baris target.. kira2 gimana ya cara mengambil nomer baris targetnya? kasih tau Jan ya.. karena Jan belum tau nih,,
kalo sudah.. script tadi disusun lagi menjadi
"=VLOOKUP(B" & script_ambil_nomer_baris_target &",data!$A$4:$B$10,2,FALSE)"
kalo kira-kira kolomnya yang dinamis gimana? dengan cara yang sama.. maka harus dilakukan pemecahan script untuk memisahkan kolomnya dulu..
kalo kolom dan barisnya dinamis? berarti harus dilakukan pemisahan kolom dan barisnya..
kalo udah dapat script yang warna merah tolong kasih tau Jan ya..
Wassalam,
-Miss Jan Raisin-
Pada 17 April 2014 10.09, Bagus <bagus@kingjim.co.id> menulis:
>
>
>Hai Biru;
>
>coba pada baris ini:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>
>dirubah menjadi:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
>
>
>Wassalam
>~
Bagus ~
>
>----- Original Message -----
>>From: Lazuardi Biru
>>To: belajar-excel@yahoogroups.com
>>Sent: Thursday, April 17, 2014 9:24 AM
>>Subject: [belajar-excel] vlookup - formula dinamis [1 Attachment]
>>
>>
>>dh
>>salam be excelent.
>>seperti pertanyaan saya yag lalu.
>>rumus mengikuti data di sebelahnya.
>>kali ini
saya sudah coba edit2 macro yang ada di milis.
>>tapi masih kurang
pas.
>>
>>mohon bantuan para master
>>
>>skripnya seperti
ini.
>>
>>
>>Private Sub Worksheet_Change(ByVal Target As
Range)
>> If Not Intersect(Target, Range("b3:b10")) Is
Nothing Then
>> Target.Offset(,
1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>> End
If
>>End Sub
>>
>>ketika saya ketik di B3 di C3 akan terisi formula
=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)
>>
>>tapi masalahnya ketika saya ketik
di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di
atas belum sesuai. mohon petunjuk dari master.
>>
>>
>>file terlampir
>>
>>maksih
sebelumnya.
>>
>>salam
>>
>>lb
>>
>_
begini mis..
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
Target.Offset(, 1).Formula = "=VLOOKUP(B" & Target.Row & ",data!$A$4:$B$10,2,FALSE)"
End If
End Sub
teng kyu ya mis.. saranya..
salam
lb
Pada Kamis, 17 April 2014 10:26, Lazuardi Biru <lazuardi_biru84@yahoo.com> menulis:
mis jan
wah mis jan bikin teka teki.. hehehe saya coba dulu mis..
nanti kalo mentok saya kasih tanda S.O.S
kasih klu nya juga boleh mis.. hehehe
salam
lb
Pada Kamis, 17 April 2014 10:12, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
Pak Lazuardi,
ini adalah script asli dari pak Lazuardi:
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
sekarang kita fokuskan hanya kepada script di sebalah kanan tanda = saja, yaitu script yang ini:
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
script di atas ingin dibuat dinamis mengikuti nomer baris kolom target yang diberi warna merah, nah.. tau kan cara mengambil nomer baris kolom targetnya?
tetapi sebelumnya script di atas harus dipisah-pisah menjadi beberapa bagian untuk memisahkan nomer barisnya, dan setiap bagian harus ditulis di dalam 2 buah tanda kutip dua, dan untuk menggabungkan setiap bagian selalu menggunakan tanda ampersand atau &
"=VLOOKUP(B" &3&",data!$A$4:$B$10,2,FALSE)"
bagian 1: "=VLOOKUP(B"
bagian 2: 3
bagian 3: ",data!$A$4:$B$10,2,FALSE)"
nah.. yang ingin dibuat dinamis adalah bagian 2 yang berwarna merah, dibuat mengikuti nomer baris target.. kira2 gimana ya cara mengambil nomer baris targetnya? kasih tau Jan ya.. karena Jan belum tau nih,,
kalo sudah.. script tadi disusun lagi menjadi
"=VLOOKUP(B" & script_ambil_nomer_baris_target &",data!$A$4:$B$10,2,FALSE)"
kalo kira-kira kolomnya yang dinamis gimana? dengan cara yang sama.. maka harus dilakukan pemecahan script untuk memisahkan kolomnya dulu..
kalo kolom dan barisnya dinamis? berarti harus dilakukan pemisahan kolom dan barisnya..
kalo udah dapat script yang warna merah tolong kasih tau Jan ya..
Wassalam,
-Miss Jan Raisin-
Pada 17 April 2014 10.09, Bagus <bagus@kingjim.co.id> menulis:
>
>
>Hai Biru;
>
>coba pada baris ini:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>
>dirubah menjadi:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
>
>
>Wassalam
>~
Bagus ~
>
>----- Original Message -----
>>From: Lazuardi Biru
>>To: belajar-excel@yahoogroups.com
>>Sent: Thursday, April 17, 2014 9:24 AM
>>Subject: [belajar-excel] vlookup - formula dinamis [1 Attachment]
>>
>>
>>dh
>>salam be excelent.
>>seperti pertanyaan saya yag lalu.
>>rumus mengikuti data di sebelahnya.
>>kali ini
saya sudah coba edit2 macro yang ada di milis.
>>tapi masih kurang
pas.
>>
>>mohon bantuan para master
>>
>>skripnya seperti
ini.
>>
>>
>>Private Sub Worksheet_Change(
Range)
>> If Not Intersect(Target, Range("
Nothing Then
>> Target.Offset(
1).Formula = "=VLOOKUP(
>> End
If
>>End Sub
>>
>>ketika saya ketik di B3 di C3 akan terisi formula
=VLOOKUP(B3,
>>
>>tapi masalahnya ketika saya ketik
di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di
atas belum sesuai. mohon petunjuk dari master.
>>
>>
>>file terlampir
>>
>>maksih
sebelumnya.
>>
>>salam
>>
>>lb
>>
>_
Wed Apr 16, 2014 9:46 pm (PDT) . Posted by:
"Lazuardi Biru" lazuardi_biru84
mis jan..
kalau skrip saya tambah fungsi gini kok nggak jalan ya..
apa kira2 masalahnya
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
Target.Offset(, 1).Formula = "=VLOOKUP(B" & Target.Row & ",data!$A$4:$B$10,2,FALSE)"
End If
If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
Target.Offset(, 4).Formula = "=EDATE(D"&target.Row&",E"&target.Row&")"
End If
End Sub
salam
lb
Pada Kamis, 17 April 2014 10:53, Lazuardi Biru <lazuardi_biru84@yahoo.com> menulis:
mis jan
begini mis..
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
Target.Offset(, 1).Formula = "=VLOOKUP(B" & Target.Row & ",data!$A$4:$B$10,2,FALSE)"
End If
End Sub
teng kyu ya mis.. saranya..
salam
lb
Pada Kamis, 17 April 2014 10:26, Lazuardi Biru <lazuardi_biru84@yahoo.com> menulis:
mis jan
wah mis jan bikin teka teki.. hehehe saya coba dulu mis..
nanti kalo mentok saya kasih tanda S.O.S
kasih klu nya juga boleh mis.. hehehe
salam
lb
Pada Kamis, 17 April 2014 10:12, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
Pak Lazuardi,
ini adalah script asli dari pak Lazuardi:
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
sekarang kita fokuskan hanya kepada script di sebalah kanan tanda = saja, yaitu script yang ini:
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
script di atas ingin dibuat dinamis mengikuti nomer baris kolom target yang diberi warna merah, nah.. tau kan cara mengambil nomer baris kolom targetnya?
tetapi sebelumnya script di atas harus dipisah-pisah menjadi beberapa bagian untuk memisahkan nomer barisnya, dan setiap bagian harus ditulis di dalam 2 buah tanda kutip dua, dan untuk menggabungkan setiap bagian selalu menggunakan tanda ampersand atau &
"=VLOOKUP(B" &3&",data!$A$4:$B$10,2,FALSE)"
bagian 1: "=VLOOKUP(B"
bagian 2: 3
bagian 3: ",data!$A$4:$B$10,2,FALSE)"
nah.. yang ingin dibuat dinamis adalah bagian 2 yang berwarna merah, dibuat mengikuti nomer baris target.. kira2 gimana ya cara mengambil nomer baris targetnya? kasih tau Jan ya.. karena Jan belum tau nih,,
kalo sudah.. script tadi disusun lagi menjadi
"=VLOOKUP(B" & script_ambil_nomer_baris_target &",data!$A$4:$B$10,2,FALSE)"
kalo kira-kira kolomnya yang dinamis gimana? dengan cara yang sama.. maka harus dilakukan pemecahan script untuk memisahkan kolomnya dulu..
kalo kolom dan barisnya dinamis? berarti harus dilakukan pemisahan kolom dan barisnya..
kalo udah dapat script yang warna merah tolong kasih tau Jan ya..
Wassalam,
-Miss Jan Raisin-
Pada 17 April 2014 10.09, Bagus <bagus@kingjim.co.id> menulis:
>Hai Biru;
>
>coba pada baris ini:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>
>dirubah menjadi:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
>
>
>Wassalam
>~
Bagus ~
>
>----- Original Message -----
>>From: Lazuardi Biru
>>To: belajar-excel@yahoogroups.com
>>Sent: Thursday, April 17, 2014 9:24 AM
>>Subject: [belajar-excel] vlookup - formula dinamis [1 Attachment]
>>
>>
>>dh
>>salam be excelent.
>>seperti pertanyaan saya yag lalu.
>>rumus mengikuti data di sebelahnya.
>>kali ini
saya sudah coba edit2 macro yang ada di milis.
>>tapi masih kurang
pas.
>>
>>mohon bantuan para master
>>
>>skripnya seperti
ini.
>>
>>
>>Private Sub Worksheet_Change(ByVal Target As
Range)
>> If Not Intersect(Target, Range("b3:b10")) Is
Nothing Then
>> Target.Offset(,
1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>> End
If
>>End Sub
>>
>>ketika saya ketik di B3 di C3 akan terisi formula
=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)
>>
>>tapi masalahnya ketika saya ketik
di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di
atas belum sesuai. mohon petunjuk dari master.
>>
>>
>>file terlampir
>>
>>maksih
sebelumnya.
>>
>>salam
>>
>>lb
>>
>_
kalau skrip saya tambah fungsi gini kok nggak jalan ya..
apa kira2 masalahnya
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
Target.Offset(, 1).Formula = "=VLOOKUP(B" & Target.Row & ",data!$A$4:$B$10,2,FALSE)"
End If
If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
Target.Offset(, 4).Formula = "=EDATE(D"&target.Row&",E"&target.Row&")"
End If
End Sub
salam
lb
Pada Kamis, 17 April 2014 10:53, Lazuardi Biru <lazuardi_biru84@yahoo.com> menulis:
mis jan
begini mis..
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("b3:b10")) Is Nothing Then
Target.Offset(, 1).Formula = "=VLOOKUP(B" & Target.Row & ",data!$A$4:$B$10,2,FALSE)"
End If
End Sub
teng kyu ya mis.. saranya..
salam
lb
Pada Kamis, 17 April 2014 10:26, Lazuardi Biru <lazuardi_biru84@yahoo.com> menulis:
mis jan
wah mis jan bikin teka teki.. hehehe saya coba dulu mis..
nanti kalo mentok saya kasih tanda S.O.S
kasih klu nya juga boleh mis.. hehehe
salam
lb
Pada Kamis, 17 April 2014 10:12, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
Pak Lazuardi,
ini adalah script asli dari pak Lazuardi:
Target.Offset(, 1).Formula = "=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
sekarang kita fokuskan hanya kepada script di sebalah kanan tanda = saja, yaitu script yang ini:
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
script di atas ingin dibuat dinamis mengikuti nomer baris kolom target yang diberi warna merah, nah.. tau kan cara mengambil nomer baris kolom targetnya?
tetapi sebelumnya script di atas harus dipisah-pisah menjadi beberapa bagian untuk memisahkan nomer barisnya, dan setiap bagian harus ditulis di dalam 2 buah tanda kutip dua, dan untuk menggabungkan setiap bagian selalu menggunakan tanda ampersand atau &
"=VLOOKUP(B" &3&",data!$A$4:$B$10,2,FALSE)"
bagian 1: "=VLOOKUP(B"
bagian 2: 3
bagian 3: ",data!$A$4:$B$10,2,FALSE)"
nah.. yang ingin dibuat dinamis adalah bagian 2 yang berwarna merah, dibuat mengikuti nomer baris target.. kira2 gimana ya cara mengambil nomer baris targetnya? kasih tau Jan ya.. karena Jan belum tau nih,,
kalo sudah.. script tadi disusun lagi menjadi
"=VLOOKUP(B" & script_ambil_nomer_baris_target &",data!$A$4:$B$10,2,FALSE)"
kalo kira-kira kolomnya yang dinamis gimana? dengan cara yang sama.. maka harus dilakukan pemecahan script untuk memisahkan kolomnya dulu..
kalo kolom dan barisnya dinamis? berarti harus dilakukan pemisahan kolom dan barisnya..
kalo udah dapat script yang warna merah tolong kasih tau Jan ya..
Wassalam,
-Miss Jan Raisin-
Pada 17 April 2014 10.09, Bagus <bagus@kingjim.co.id> menulis:
>Hai Biru;
>
>coba pada baris ini:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3,data!$A$4:$B$10,2,FALSE)"
>
>dirubah menjadi:
>Target.Offset(, 1).Formula =
"=VLOOKUP(B3:B10,data!$A$4:$B$10,2,FALSE)"
>
>
>Wassalam
>~
Bagus ~
>
>----- Original Message -----
>>From: Lazuardi Biru
>>To: belajar-excel@yahoogroups.com
>>Sent: Thursday, April 17, 2014 9:24 AM
>>Subject: [belajar-excel] vlookup - formula dinamis [1 Attachment]
>>
>>
>>dh
>>salam be excelent.
>>seperti pertanyaan saya yag lalu.
>>rumus mengikuti data di sebelahnya.
>>kali ini
saya sudah coba edit2 macro yang ada di milis.
>>tapi masih kurang
pas.
>>
>>mohon bantuan para master
>>
>>skripnya seperti
ini.
>>
>>
>>Private Sub Worksheet_Change(
Range)
>> If Not Intersect(Target, Range("
Nothing Then
>> Target.Offset(
1).Formula = "=VLOOKUP(
>> End
If
>>End Sub
>>
>>ketika saya ketik di B3 di C3 akan terisi formula
=VLOOKUP(B3,
>>
>>tapi masalahnya ketika saya ketik
di b4 formula yang di inginkan lookup valuenya juga di B4. tapi untuk skrip di
atas belum sesuai. mohon petunjuk dari master.
>>
>>
>>file terlampir
>>
>>maksih
sebelumnya.
>>
>>salam
>>
>>lb
>>
>_
Wed Apr 16, 2014 8:57 pm (PDT) . Posted by:
"Emi" emilestariklcc
Teman
BeExcel
Mohon bantuan,
Kenapa
return value nya 1903 dan bukan 2013?
=DATE(RIGHT(
Terima
kasih.
-Emi
04.07.2013 04/07/1903
21.06.2013 21/06/1903
22.06.2013 22/06/1903
18.06.2013 18/06/1903
19.06.2013 19/06/1903
25.06.2013 25/06/1903
25.06.2013 25/06/1903
13.07.2013 13/07/1903
12.07.2013 12/07/1903
10.07.2013 10/07/1903
Wed Apr 16, 2014 9:01 pm (PDT) . Posted by:
"Heri Pamungkas ( Gmail )" dchoosen88
السَّÙ„َامُ عَÙ„َÙŠْÙƒُÙ…ْ ÙˆَرَØْÙ…َØ©ُ اللهِ ÙˆَبَرَÙƒَاتُÙ‡ُ
Semangat pagi,.
hmm,... itu karena ada Karakter setelah Tahun
di data awalnya.
Coba ditambahkan Trim di Tahunnya.
=DATE(RIGHT(
ÙˆَالسَّÙ„َامُ عَÙ„َÙŠْÙƒُÙ…ْ ÙˆَرَØْÙ…َØ©ُ اللهِ ÙˆَبَرَÙƒَاتُÙ‡ُ
Warm Regards,
On 17/04/2014 10:39, Emi wrote:
>
>
> Teman BeExcel
> Mohon bantuan,
> Kenapa return value nya 1903 dan bukan 2013?
>
> =DATE(RIGHT(
> Terima kasih.
> -Emi
>
> 04.07.2013
> 04/07/1903
>
>
>
>
>
>
>
>
> 21.06.2013 21/06/1903
>
>
>
>
>
>
> 22.06.2013 22/06/1903
>
>
>
>
>
>
> 18.06.2013 18/06/1903
>
>
>
>
>
>
> 19.06.2013 19/06/1903
>
>
>
>
>
>
> 25.06.2013 25/06/1903
>
>
>
>
>
>
> 25.06.2013 25/06/1903
>
>
>
>
>
>
> 13.07.2013 13/07/1903
>
>
>
>
>
>
> 12.07.2013 12/07/1903
>
>
>
>
>
>
> 10.07.2013 10/07/1903
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
=====================================================================
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