Jumat, 31 Juli 2015

[belajar-excel] Digest Number 3522

3 Messages

Digest #3522
1a
Bls: [belajar-excel] Mencari Jumlah Data by "Prodev SIMPLE PB" prodev_simple
2
import efaktur keluaran by "Andrie -" sioean2
3a
Re: Cara Membuat Jendela Find by "ris ha" har1sn.excel

Messages

Thu Jul 30, 2015 3:36 am (PDT) . Posted by:

"Prodev SIMPLE PB" prodev_simple

Terima kasih banyak Pak Nang Agus dan Mr. Kid atas penyempurnaannya.
 - prodev simple -


Pada Kamis, 30 Juli 2015 9:21, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:


  ikut nimbrung dikit...

dari formula mas Nang yang berbunyi :
=IF(A1=0;"-";LEN(A1)-LEN(SUBSTITUTE(A1;",";""))+1)

bagian A1=0 bisa diganti dengan bunyi Len(A1)=0 menjadi :
=IF(Len(A1)=0;"-";LEN(A1)-LEN(SUBSTITUTE(A1;",";""))+1)
atau jika sedikit diputar, menjadi :
=IF(Len(A1);LEN(A1)-LEN(SUBSTITUTE(A1;",";""))+1;"-")
untuk mengantisipasi data A1 yang berisi bunyi teks 0 atau nullstring

Jika ada kemungkinan bahwa data A1 berisi spasi saja (catatan : spasi dengan ASCII 32), maka tambahkan fungsi Trim menjadi :
=IF(Len(Trim(A1))=0;"-";LEN(A1)-LEN(SUBSTITUTE(A1;",";""))+1)
atau jika sedikit diputar, menjadi :
=IF(Len(Trim(A1));LEN(A1)-LEN(SUBSTITUTE(A1;",";""))+1;"-")

Wassalam,
Kid

On Thu, Jul 30, 2015 at 8:17 AM, Nang Agus nangagus@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote:

  Coba tambahkan if di depannya, sehingga menjadi:

=IF(A1=0;"-";LEN(A1)-LEN(SUBSTITUTE(A1;",";""))+1)

On 7/29/15, Prodev SIMPLE PB prodev_simple@yahoo.com [belajar-excel]
<belajar-excel@yahoogroups.com> wrote:
> Maaf Pak Nang Agus....
> Jika di A1 tidak ada data tanggal, maka revisi rumusnya bagaimana ya supaya
> di B1 tetap tertulis (-) atau kosong.Karena dengan rumus berikut,
> =LEN(A1)-LEN(SUBSTITUTE(A1;",";""))+1maka ketika di A1 tidaka ada data, di
> B1 tertulis "1".Apakah harus kombinasi dengan rumus "IF"?
>
>
> Mohon pencerahannya.Terima kasih.
>  - prodev simple -
>
>
>
>
>
> Pada Sabtu, 25 Juli 2015 19:18, "Prodev SIMPLE PB
> prodev_simple@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com>
> menulis:
>
>
>
>   Terima kasih banyak Pak HK dan Pak Nang Agus.Mohon maaf baru balas. -
> prodev simple -
>
>
>
>
>
> Pada Minggu, 5 Juli 2015 9:28, "Nang Agus nangagus@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> menulis:
>
>
>
>   Waalaikumsalam warahmatullah.
> Dear Prodev simple
> coba gunakan formula di B1:
>
> =LEN(A1)-LEN(SUBSTITUTE(A1,",",""))+1
> jika komputer anda regional settingnya indonesia, formula menjadi:
>
>
> =LEN(A1)-LEN(SUBSTITUTE(A1;",";""))+1
>
>
> wasalam
> Nang Agus
>
>
>
>
> 2015-07-03 11:15 GMT+07:00 Prodev SIMPLE PB prodev_simple@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
>   Assalamu'alaikum Wr. Wb.
> Master, numpang tanya...Bagaimana formulasinya untuk bisa menghitung jumlah
> data (tanggal) yang dipisahkan oleh koma.Misal :A1 : Data tanggal 1, 2, 4,
> 10,31B1 : Jumlah = 5
> Terima kasih atas pencerahannya.
> Wassalam. - prodev simple -
>
>
>
>
>
>
> #yiv2128389622 #yiv2128389622 -- #yiv2128389622ygrp-mkp {border:1px
> solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv2128389622
> #yiv2128389622ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv2128389622
> #yiv2128389622ygrp-mkp #yiv2128389622hd
> {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
> 0;}#yiv2128389622 #yiv2128389622ygrp-mkp #yiv2128389622ads
> {margin-bottom:10px;}#yiv2128389622 #yiv2128389622ygrp-mkp .yiv2128389622ad
> {padding:0 0;}#yiv2128389622 #yiv2128389622ygrp-mkp .yiv2128389622ad p
> {margin:0;}#yiv2128389622 #yiv2128389622ygrp-mkp .yiv2128389622ad a
> {color:#0000ff;text-decoration:none;}#yiv2128389622
> #yiv2128389622ygrp-sponsor #yiv2128389622ygrp-lc
> {font-family:Arial;}#yiv2128389622 #yiv2128389622ygrp-sponsor
> #yiv2128389622ygrp-lc #yiv2128389622hd {margin:10px
> 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv2128389622
> #yiv2128389622ygrp-sponsor #yiv2128389622ygrp-lc .yiv2128389622ad
> {margin-bottom:10px;padding:0 0;}#yiv2128389622 #yiv2128389622actions
> {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv2128389622
> #yiv2128389622activity
> {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv2128389622
> #yiv2128389622activity span {font-weight:700;}#yiv2128389622
> #yiv2128389622activity span:first-child
> {text-transform:uppercase;}#yiv2128389622 #yiv2128389622activity span a
> {color:#5085b6;text-decoration:none;}#yiv2128389622 #yiv2128389622activity
> span span {color:#ff7900;}#yiv2128389622 #yiv2128389622activity span
> .yiv2128389622underline {text-decoration:underline;}#yiv2128389622
> .yiv2128389622attach
> {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
> 0;width:400px;}#yiv2128389622 .yiv2128389622attach div a
> {text-decoration:none;}#yiv2128389622 .yiv2128389622attach img
> {border:none;padding-right:5px;}#yiv2128389622 .yiv2128389622attach label
> {display:block;margin-bottom:5px;}#yiv2128389622 .yiv2128389622attach label
> a {text-decoration:none;}#yiv2128389622 blockquote {margin:0 0 0
> 4px;}#yiv2128389622 .yiv2128389622bold
> {font-family:Arial;font-size:13px;font-weight:700;}#yiv2128389622
> .yiv2128389622bold a {text-decoration:none;}#yiv2128389622

> dd.yiv2128389622last p a
> {font-family:Verdana;font-weight:700;}#yiv2128389622 dd.yiv2128389622last p
> span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv2128389622
> dd.yiv2128389622last p span.yiv2128389622yshortcuts
> {margin-right:0;}#yiv2128389622 div.yiv2128389622attach-table div div a
> {text-decoration:none;}#yiv2128389622 div.yiv2128389622attach-table
> {width:400px;}#yiv2128389622 div.yiv2128389622file-title a, #yiv2128389622
> div.yiv2128389622file-title a:active, #yiv2128389622
> div.yiv2128389622file-title a:hover, #yiv2128389622
> div.yiv2128389622file-title a:visited {text-decoration:none;}#yiv2128389622
> div.yiv2128389622photo-title a, #yiv2128389622 div.yiv2128389622photo-title
> a:active, #yiv2128389622 div.yiv2128389622photo-title a:hover,
> #yiv2128389622 div.yiv2128389622photo-title a:visited
> {text-decoration:none;}#yiv2128389622 div#yiv2128389622ygrp-mlmsg
> #yiv2128389622ygrp-msg p a span.yiv2128389622yshortcuts
> {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv2128389622
> .yiv2128389622green {color:#628c2a;}#yiv2128389622 .yiv2128389622MsoNormal
> {margin:0 0 0 0;}#yiv2128389622 o {font-size:0;}#yiv2128389622
> #yiv2128389622photos div {float:left;width:72px;}#yiv2128389622
> #yiv2128389622photos div div {border:1px solid
> #666666;height:62px;overflow:hidden;width:62px;}#yiv2128389622
> #yiv2128389622photos div label
> {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv2128389622
> #yiv2128389622reco-category {font-size:77%;}#yiv2128389622
> #yiv2128389622reco-desc {font-size:77%;}#yiv2128389622 .yiv2128389622replbq
> {margin:4px;}#yiv2128389622 #yiv2128389622ygrp-actbar div a:first-child
> {margin-right:2px;padding-right:5px;}#yiv2128389622 #yiv2128389622ygrp-mlmsg
> {font-size:13px;font-family:Arial, helvetica, clean,
> sans-serif;}#yiv2128389622 #yiv2128389622ygrp-mlmsg table
> {font-size:inherit;font:100%;}#yiv2128389622 #yiv2128389622ygrp-mlmsg
> select, #yiv2128389622 input, #yiv2128389622 textarea {font:99% Arial,
> Helvetica, clean, sans-serif;}#yiv2128389622 #yiv2128389622ygrp-mlmsg pre,
> #yiv2128389622 code {font:115% monospace;}#yiv2128389622
> #yiv2128389622ygrp-mlmsg * {line-height:1.22em;}#yiv2128389622
> #yiv2128389622ygrp-mlmsg #yiv2128389622logo
> {padding-bottom:10px;}#yiv2128389622 #yiv2128389622ygrp-msg p a
> {font-family:Verdana;}#yiv2128389622 #yiv2128389622ygrp-msg
> p#yiv2128389622attach-count span
> {color:#1E66AE;font-weight:700;}#yiv2128389622 #yiv2128389622ygrp-reco
> #yiv2128389622reco-head {color:#ff7900;font-weight:700;}#yiv2128389622
> #yiv2128389622ygrp-reco {margin-bottom:20px;padding:0px;}#yiv2128389622
> #yiv2128389622ygrp-sponsor #yiv2128389622ov li a
> {font-size:130%;text-decoration:none;}#yiv2128389622
> #yiv2128389622ygrp-sponsor #yiv2128389622ov li
> {font-size:77%;list-style-type:square;padding:6px 0;}#yiv2128389622
> #yiv2128389622ygrp-sponsor #yiv2128389622ov ul {margin:0;padding:0 0 0
> 8px;}#yiv2128389622 #yiv2128389622ygrp-text
> {font-family:Georgia;}#yiv2128389622 #yiv2128389622ygrp-text p {margin:0 0
> 1em 0;}#yiv2128389622 #yiv2128389622ygrp-text tt
> {font-size:120%;}#yiv2128389622 #yiv2128389622ygrp-vital ul li:last-child
> {border-right:none !important;}#yiv2128389622
>
>
>


#yiv7009120441 #yiv7009120441 -- #yiv7009120441ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv7009120441 #yiv7009120441ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv7009120441 #yiv7009120441ygrp-mkp #yiv7009120441hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv7009120441 #yiv7009120441ygrp-mkp #yiv7009120441ads {margin-bottom:10px;}#yiv7009120441 #yiv7009120441ygrp-mkp .yiv7009120441ad {padding:0 0;}#yiv7009120441 #yiv7009120441ygrp-mkp .yiv7009120441ad p {margin:0;}#yiv7009120441 #yiv7009120441ygrp-mkp .yiv7009120441ad a {color:#0000ff;text-decoration:none;}#yiv7009120441 #yiv7009120441ygrp-sponsor #yiv7009120441ygrp-lc {font-family:Arial;}#yiv7009120441 #yiv7009120441ygrp-sponsor #yiv7009120441ygrp-lc #yiv7009120441hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv7009120441 #yiv7009120441ygrp-sponsor #yiv7009120441ygrp-lc .yiv7009120441ad {margin-bottom:10px;padding:0 0;}#yiv7009120441 #yiv7009120441actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv7009120441 #yiv7009120441activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv7009120441 #yiv7009120441activity span {font-weight:700;}#yiv7009120441 #yiv7009120441activity span:first-child {text-transform:uppercase;}#yiv7009120441 #yiv7009120441activity span a {color:#5085b6;text-decoration:none;}#yiv7009120441 #yiv7009120441activity span span {color:#ff7900;}#yiv7009120441 #yiv7009120441activity span .yiv7009120441underline {text-decoration:underline;}#yiv7009120441 .yiv7009120441attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv7009120441 .yiv7009120441attach div a {text-decoration:none;}#yiv7009120441 .yiv7009120441attach img {border:none;padding-right:5px;}#yiv7009120441 .yiv7009120441attach label {display:block;margin-bottom:5px;}#yiv7009120441 .yiv7009120441attach label a {text-decoration:none;}#yiv7009120441 blockquote {margin:0 0 0 4px;}#yiv7009120441 .yiv7009120441bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv7009120441 .yiv7009120441bold a {text-decoration:none;}#yiv7009120441 dd.yiv7009120441last p a {font-family:Verdana;font-weight:700;}#yiv7009120441 dd.yiv7009120441last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv7009120441 dd.yiv7009120441last p span.yiv7009120441yshortcuts {margin-right:0;}#yiv7009120441 div.yiv7009120441attach-table div div a {text-decoration:none;}#yiv7009120441 div.yiv7009120441attach-table {width:400px;}#yiv7009120441 div.yiv7009120441file-title a, #yiv7009120441 div.yiv7009120441file-title a:active, #yiv7009120441 div.yiv7009120441file-title a:hover, #yiv7009120441 div.yiv7009120441file-title a:visited {text-decoration:none;}#yiv7009120441 div.yiv7009120441photo-title a, #yiv7009120441 div.yiv7009120441photo-title a:active, #yiv7009120441 div.yiv7009120441photo-title a:hover, #yiv7009120441 div.yiv7009120441photo-title a:visited {text-decoration:none;}#yiv7009120441 div#yiv7009120441ygrp-mlmsg #yiv7009120441ygrp-msg p a span.yiv7009120441yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv7009120441 .yiv7009120441green {color:#628c2a;}#yiv7009120441 .yiv7009120441MsoNormal {margin:0 0 0 0;}#yiv7009120441 o {font-size:0;}#yiv7009120441 #yiv7009120441photos div {float:left;width:72px;}#yiv7009120441 #yiv7009120441photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv7009120441 #yiv7009120441photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv7009120441 #yiv7009120441reco-category {font-size:77%;}#yiv7009120441 #yiv7009120441reco-desc {font-size:77%;}#yiv7009120441 .yiv7009120441replbq {margin:4px;}#yiv7009120441 #yiv7009120441ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv7009120441 #yiv7009120441ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv7009120441 #yiv7009120441ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv7009120441 #yiv7009120441ygrp-mlmsg select, #yiv7009120441 input, #yiv7009120441 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv7009120441 #yiv7009120441ygrp-mlmsg pre, #yiv7009120441 code {font:115% monospace;}#yiv7009120441 #yiv7009120441ygrp-mlmsg * {line-height:1.22em;}#yiv7009120441 #yiv7009120441ygrp-mlmsg #yiv7009120441logo {padding-bottom:10px;}#yiv7009120441 #yiv7009120441ygrp-msg p a {font-family:Verdana;}#yiv7009120441 #yiv7009120441ygrp-msg p#yiv7009120441attach-count span {color:#1E66AE;font-weight:700;}#yiv7009120441 #yiv7009120441ygrp-reco #yiv7009120441reco-head {color:#ff7900;font-weight:700;}#yiv7009120441 #yiv7009120441ygrp-reco {margin-bottom:20px;padding:0px;}#yiv7009120441 #yiv7009120441ygrp-sponsor #yiv7009120441ov li a {font-size:130%;text-decoration:none;}#yiv7009120441 #yiv7009120441ygrp-sponsor #yiv7009120441ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv7009120441 #yiv7009120441ygrp-sponsor #yiv7009120441ov ul {margin:0;padding:0 0 0 8px;}#yiv7009120441 #yiv7009120441ygrp-text {font-family:Georgia;}#yiv7009120441 #yiv7009120441ygrp-text p {margin:0 0 1em 0;}#yiv7009120441 #yiv7009120441ygrp-text tt {font-size:120%;}#yiv7009120441 #yiv7009120441ygrp-vital ul li:last-child {border-right:none !important;}#yiv7009120441

Thu Jul 30, 2015 6:55 am (PDT) . Posted by:

"Andrie -" sioean2

Dear Be Excel,
Saya mempunyai Sheet Data yang ingin di pindahkan datanya ke sheet import keluaran efaktur.Mohon bantuannya bagaimana caranya jika kita menggunakan macro untuk mengatasi hal ini sehingga mempermudah kita dalam proses import faktur keluaran di aplikasi efaktur Dirjen Pajak.
Contoh file terlampir

Thanks

Thu Jul 30, 2015 11:36 pm (PDT) . Posted by:

"ris ha" har1sn.excel

Terima kasih Mr. Kid.
Maaf sebelumnya, karena pekerjaan, baru bisa benimba ilmu kembali.Sebelumnya saya ucapkan selamat Idul Fitri 1436H. mohon maaf jika dalam menimba ilmu, tidak bisa kasih apa2 untuk menggantikan ilmu yg sangat bermanfaat selama ini, kecuali teriring doa semoga selalu diberi kesehatan, kesuksesan serta amal jariyah yang tiada terkira dan dimudahkan segala urusannya. Amin
Saya mau bertanya kembali, saya sudah mempraktekan semua saran 1,2,3. Tapi saya tidak berhasil untuk yang nomor 1. Berikut saya sertakan macronya
Private Sub RepeatNext_Click()
With Sheets("EntryRepeatBlend").Range("CK3:CK100")
    Set iNext = .Find(Me.RepeatBatch.Value, LookIn:=xlValues)
    If iNext Is Nothing Then
        Set iNext = .Find(Me.RepeatBatch.Value, LookIn:=xlValues)
        iNext.Parent.Activate      
    Else
        Set iNext = .Find(Me.RepeatBatch.Value, iNext, LookIn:=xlValues)
        iNext.Activate
        Application.Goto iNext, False
    End If
End With
End Sub
Mungkin penalaran saya yang kurang menjangkau. mohon pencerahannya kembali Mr. Kid...,
SalamHaris

On Thursday, April 16, 2015 7:23 PM, "'Mr. Kid' mr.nmkid@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:


  Wa'alaikumussalam wr wb

Hai Haris,

0. Mohon pencerahan dan solusinya
>> Kali ini saya penasaran dengan usaha membuat proses find sendiri melalui userform dan tidak menekan CTRL F saja.

1. Dia akan terus mencari hingga data yang dicari tidak ditemukan lagi..., bagaimanakah macronya...?
>> bagian parameter After dalam methods Find diisi dengan object range hasil pencarian sebelumnya.
>> artinya, diperlukan sebuah variabel object ber-scope module (minimal)
>> misal di baris ke-1 module (bukan di baris ke-1 prosedur loh), diberi deklarasi variabel hasil seperti (jika ada tulisan Option Explicit, maka letakkan di baris ke-2 module) :
private rngHasilSebelumnya as range

>> lalu buat proses find menjadi 2 cabang, yaitu ketika isi rngHasilSebelumnya masih kosong dan yang sudah isi
if rnghasilsebelumnya is nothing then
     'rngHasilSebelumnya masih kosong
else
     'rngHasilSebelumnya ada isinya
endif

>> di bagian rngHasilSebelumnya masih kosong, lakukan proses Find dengan bagian parameter After dikosongkan
    set rngHasilSebelumnya=sheets("nama sheet data").range("alamat data").find( nilainya , lookat:=xlvalues)
>> di bagian rngHasilSebelumnya ada isinya, lakukan proses Find dengan bagian parameter after diisi dengan rngHasilSebelumnya
    set rngHasilSebelumnya=sheets("nama sheet data").range("alamat data").find( nilainya, rngHasilSebelumnya , lookat:=xlvalues)

2. Jika data ditemukan, maka yang bergerak adalah pointernya, nah kalo pake Application.Goto semua data yang berada diatasnya tidak tampak, bagaimanakah macronya?
>> kalau begotu jangan pakai methods Goto
>> ganti dengan rangkaian proses berikut :
      a. aktifkan sheet yang akan ditunjuk tersebut
            Sheets("nama sheetnya").activate
      b. aktifkan range yang akan ditunjuk tersebut
            Sheets("nama sheetnya").Range("alamat rangenya").activate

>> kalau terkait dengan soal nomor 1 di atas, karena range hasil disimpan di variabel bernama rngHasilSebelumnya, maka kedua proses tersebut menjadi begini :
      a. aktifkan sheet yang akan ditunjuk tersebut
            rngHasilSebelumnya.parent.activate
      b. aktifkan range yang akan ditunjuk tersebut
            rngHasilSebelumnya.activate
3. Tatkala jendela Find masih terbuka, kita bisa mengedit cell tanpa harus menutupnya, bagaimanakah macronya? selama ini saya membuat userform selalu menghalangi saya untuk mengklik cell, sehingga kurang fleksibel.
>> pakai userform kan... set properti showmodal milik userform menjadi FALSE
       -> lihat di VBE -> aktifkan properties window (tekan F4 supaya muncul) -> double klik userformnya
       -> lihat properties window -> cari properti bernama ShowModal -> set nilainya menjadi FALSE -> save workbook
>> atau saat akan menampilkan userform dengan methods Show, set parameter modal dengan FALSE
        nama_object_userformnya.show false

Amin.

Wassalamu'alaikum wr wb
Kid

2015-04-16 17:39 GMT+10:00 ris ha har1sn.excel@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>:

  Assalamu'alaikum rekap master excel semua
Mohon pencerahan dan solusinya para master excel semua...Kali ini saya penasaran dengan jendela Find pada excel, kenapa?1. Dia akan terus mencari hingga data yang dicari tidak ditemukan lagi..., bagaimanakah macronya...? kalo pencarian yg saya lakukan selama ini dengan macro dibawah ini, dia hanya akan mencari 1 data, sementara jika data yang sama masih ada, maka tidak bisa dicari lagi
With Sheets("EntrySuratPenyerahan").Range("A1:A1000")
    Set iNo = .Find(CariNoBP, After:=.Cells(1), LookIn:=xlValues)
    If Not iNo Is Nothing Then
        Application.Goto iNo, True
2. Jika data ditemukan, maka yang bergerak adalah pointernya, nah kalo pake Application.Goto semua data yang berada diatasnya tidak tampak, bagaimanakah macronya?
3. Tatkala jendela Find masih terbuka, kita bisa mengedit cell tanpa harus menutupnya, bagaimanakah macronya? selama ini saya membuat userform selalu menghalangi saya untuk mengklik cell, sehingga kurang fleksibel.
Terima kasih atas bantuannya, semoga tiap respon dan solusi mendapatkan balasan yang lebih baik dari Allah Swt. Amin
SalamHaris

#yiv1734183556 #yiv1734183556 -- #yiv1734183556ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1734183556 #yiv1734183556ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1734183556 #yiv1734183556ygrp-mkp #yiv1734183556hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv1734183556 #yiv1734183556ygrp-mkp #yiv1734183556ads {margin-bottom:10px;}#yiv1734183556 #yiv1734183556ygrp-mkp .yiv1734183556ad {padding:0 0;}#yiv1734183556 #yiv1734183556ygrp-mkp .yiv1734183556ad p {margin:0;}#yiv1734183556 #yiv1734183556ygrp-mkp .yiv1734183556ad a {color:#0000ff;text-decoration:none;}#yiv1734183556 #yiv1734183556ygrp-sponsor #yiv1734183556ygrp-lc {font-family:Arial;}#yiv1734183556 #yiv1734183556ygrp-sponsor #yiv1734183556ygrp-lc #yiv1734183556hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1734183556 #yiv1734183556ygrp-sponsor #yiv1734183556ygrp-lc .yiv1734183556ad {margin-bottom:10px;padding:0 0;}#yiv1734183556 #yiv1734183556actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1734183556 #yiv1734183556activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv1734183556 #yiv1734183556activity span {font-weight:700;}#yiv1734183556 #yiv1734183556activity span:first-child {text-transform:uppercase;}#yiv1734183556 #yiv1734183556activity span a {color:#5085b6;text-decoration:none;}#yiv1734183556 #yiv1734183556activity span span {color:#ff7900;}#yiv1734183556 #yiv1734183556activity span .yiv1734183556underline {text-decoration:underline;}#yiv1734183556 .yiv1734183556attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv1734183556 .yiv1734183556attach div a {text-decoration:none;}#yiv1734183556 .yiv1734183556attach img {border:none;padding-right:5px;}#yiv1734183556 .yiv1734183556attach label {display:block;margin-bottom:5px;}#yiv1734183556 .yiv1734183556attach label a {text-decoration:none;}#yiv1734183556 blockquote {margin:0 0 0 4px;}#yiv1734183556 .yiv1734183556bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv1734183556 .yiv1734183556bold a {text-decoration:none;}#yiv1734183556 dd.yiv1734183556last p a {font-family:Verdana;font-weight:700;}#yiv1734183556 dd.yiv1734183556last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv1734183556 dd.yiv1734183556last p span.yiv1734183556yshortcuts {margin-right:0;}#yiv1734183556 div.yiv1734183556attach-table div div a {text-decoration:none;}#yiv1734183556 div.yiv1734183556attach-table {width:400px;}#yiv1734183556 div.yiv1734183556file-title a, #yiv1734183556 div.yiv1734183556file-title a:active, #yiv1734183556 div.yiv1734183556file-title a:hover, #yiv1734183556 div.yiv1734183556file-title a:visited {text-decoration:none;}#yiv1734183556 div.yiv1734183556photo-title a, #yiv1734183556 div.yiv1734183556photo-title a:active, #yiv1734183556 div.yiv1734183556photo-title a:hover, #yiv1734183556 div.yiv1734183556photo-title a:visited {text-decoration:none;}#yiv1734183556 div#yiv1734183556ygrp-mlmsg #yiv1734183556ygrp-msg p a span.yiv1734183556yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv1734183556 .yiv1734183556green {color:#628c2a;}#yiv1734183556 .yiv1734183556MsoNormal {margin:0 0 0 0;}#yiv1734183556 o {font-size:0;}#yiv1734183556 #yiv1734183556photos div {float:left;width:72px;}#yiv1734183556 #yiv1734183556photos div div {border:1px solid #666666;height:62px;overflow:hidden;width:62px;}#yiv1734183556 #yiv1734183556photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv1734183556 #yiv1734183556reco-category {font-size:77%;}#yiv1734183556 #yiv1734183556reco-desc {font-size:77%;}#yiv1734183556 .yiv1734183556replbq {margin:4px;}#yiv1734183556 #yiv1734183556ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv1734183556 #yiv1734183556ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv1734183556 #yiv1734183556ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv1734183556 #yiv1734183556ygrp-mlmsg select, #yiv1734183556 input, #yiv1734183556 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv1734183556 #yiv1734183556ygrp-mlmsg pre, #yiv1734183556 code {font:115% monospace;}#yiv1734183556 #yiv1734183556ygrp-mlmsg * {line-height:1.22em;}#yiv1734183556 #yiv1734183556ygrp-mlmsg #yiv1734183556logo {padding-bottom:10px;}#yiv1734183556 #yiv1734183556ygrp-msg p a {font-family:Verdana;}#yiv1734183556 #yiv1734183556ygrp-msg p#yiv1734183556attach-count span {color:#1E66AE;font-weight:700;}#yiv1734183556 #yiv1734183556ygrp-reco #yiv1734183556reco-head {color:#ff7900;font-weight:700;}#yiv1734183556 #yiv1734183556ygrp-reco {margin-bottom:20px;padding:0px;}#yiv1734183556 #yiv1734183556ygrp-sponsor #yiv1734183556ov li a {font-size:130%;text-decoration:none;}#yiv1734183556 #yiv1734183556ygrp-sponsor #yiv1734183556ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv1734183556 #yiv1734183556ygrp-sponsor #yiv1734183556ov ul {margin:0;padding:0 0 0 8px;}#yiv1734183556 #yiv1734183556ygrp-text {font-family:Georgia;}#yiv1734183556 #yiv1734183556ygrp-text p {margin:0 0 1em 0;}#yiv1734183556 #yiv1734183556ygrp-text tt {font-size:120%;}#yiv1734183556 #yiv1734183556ygrp-vital ul li:last-child {border-right:none !important;}#yiv1734183556

============================================================
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
---------------------------------------------------------------------

Tidak ada komentar:

Poskan Komentar