Terima Kasih Miss... dalam hal ini pola data di kolom N bersifat tidak seragam... Terima Kasih... Salam Yoni
--- In [email protected], Jan Raisin <miss.jan.raisin@...> wrote: > > Hai Yan, > > mungkin hal ini berguna.. atau bisa jadi juga tidak berguna xixixixi :D > > pada cell N3 diisi formula > =TEXT(L3,"00")&"0.900-13.6303"&L3 > lalu di copy ke bawah, untuk menampilkan format number seperti contoh > jika regional setting komputer anda adalah Indonesian maka ubah tanda koma > yang dimerahin menjdai titik koma > > jika polanya seragam, maka pada cell C3 juga dapat digunakan cara yang > sama, hanya saja cell rujukkannya diubah menjadi cell D8 > > # sampaikan masalah yang sering anda temui saat menggunakan Excel pada > pooling berikut > http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3 > > Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat > berharga untuk Be-Exceler yang lain > > Wassalam, > > -Miss Jan Raisin- > > *>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan Jan > jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1 > pertanyaan yang diajukan;* > *>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke > [email protected];* > *>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta dengan > orang-orang yang sabar QS 2:153;* > > > Pada 11 Mei 2013 10.10, aji mumpung <pupung1986@...> menulis: > > > ** > > > > > > Hai Yoni, > > > > Excel tidak bisa mengambil properti dari suatu data di satu/lebih cell > > dengan menggunakan formula. > > Hal ini hanya mungkin dilakukan dengan menggunakan VBA. > > > > Coba cara berikut: > > > > 1. Dari lembar kerja, pindah ke VBE (Visual Basic Editor) dengan cara > > sebagai berikut: > > a. tekan tombol Alt F11, atau > > b. klik kanan nama sheet, lalu pilih View Code sehingga muncul tampilan > > seperti ini: > > > > 2. Pada VBA Project, double klik nama sheetnya, dalam hal ini adalah > > sheet1, sehingga kursor berpindah ke lembar putih sebelah kanan > > > > 3. Ubah dropdown General menjadi Workheets > > > > 4. ubah dropdown yang disebelah kanan menjadi Change > > > > 5. Copas script berikut di antara kedua baris yang terbentuk: > > > > Dim rgFind As Range, rgLookUp As Range > > Dim lRow As Long, lData As Long > > > > With Target > > If .Cells.Count = 1 Then > > If .Address = Range("d8").Address Then > > lRow = Cells(Rows.Count, 12).End(xlUp).Row > > Set rgLookUp = Range(Cells(3, 12), Cells(lRow, 12)) > > Set rgFind = rgLookUp.Find(.Value, lookat:=xlWhole) > > lData = rgFind.Row > > Application.EnableEvents = False > > Cells(lData, 14).Copy > > Range("c3").PasteSpecial (xlPasteAllExceptBorders) > > Cells(lData, 15).Copy > > Range("c4").PasteSpecial (xlPasteValuesAndNumberFormats) > > Cells(lData, 13).Copy > > Range("c5").PasteSpecial (xlPasteValuesAndNumberFormats) > > Cells(lData, 16).Copy > > Range("c6").PasteSpecial (xlPasteValuesAndNumberFormats) > > Application.CutCopyMode = False > > Application.EnableEvents = True > > End If > > End If > > > > 6. Pada cell d8 buat sebuah dropdown menggunakan Data Validasi > > untuk tipe nya memilih List > > sumber datanya mengambil nilai dari cell L3 sampai L16 > > > > 7. Simpan workbook dengan tipe macro Enable atau Binary > > > > Contoh file terlampir semoga bermanfaat, jika ada yang kurang jelas > > silakan ditanyakan kembali > > penjelasan dari setiap baris script di atas dapat dilihat pada file > > terlampir. > > > > Wassalam, > > > > -Aji Mumpung- > > > > > > > > > > Pada 11 Mei 2013 05.35, Yoni Patinasaran <yonikriwul@...> menulis: > > > >> ** > >> > >> > >> Terima Kasih Atas perhatian rekan rekan milis, terutama Mr. Kid. yang > >> telah dengan sabar membimbing saya bagaimana cara mengirim pesan ke > >> groups... > >> karena masalah yang saya alamai ini sangat memerlukan penyelesaian, maka > >> saya kirim ulang melalui email saya ( berikut ini permasalahannya ) > >> > >> Salam Semuanya.... > >> Saya mengalami kesulitan dalam hal menyamakan format antara dua cell yang > >> memakai fungsi Vlookup.. > >> sebagai gambaran ada tabel penjualan toko yang berisi no urut, tanggal, > >> no faktur, nama toko, jumlah pejualan. > >> saat pencetakan saya mengubah angka di cell reference dan langsung saya > >> print... > >> permasalahannya, pada cell C3, yang mengambil data dari tabel penjualan > >> pada kolom nomor faktur (kolom N) tidak bisa sekalian mengambil > >> formatnya.... > >> mohon bantuan dari senior senior kiranya dapat membantu permasalahan > >> ini... > >> sebagai contoh saya lampirkan filenya... > >> atas perhatian dan solusinya saya ucapkan terima kasih > >> > >> > >> salam > >> Yoni > >> > >> > > > > >
