Tolong pilih kategori sesuai, jenis posting (diskusi atau bukan) dan sertakan tag/topik yang sesuai seperti komputer, java, php, mysql, dll. Promosi atau posting tidak pada tempatnya akan kami hapus!
- Bagi Anda yang ingin mendaftar, baca link berikut:
http://diskusiweb.com/discussion/50491/how-to-registrasi-diskusiweb-com-baca-ini-terlebih-dahulu
- Cara menyisipkan kode program supaya tampil rapi dan terformat dengan baik di diskusiweb.com: http://www.diskusiweb.com/discussion/50415/cara-menyisipkan-kode-program-di-diskusiweb-com
- Cara posting gambar/image di post Anda: http://www.diskusiweb.com/discussion/47345/cara-menyisipkan-menyertakan-image-pada-posting/p1

Reminder Date VBA Excel

Halo master,

saya baru belajar membuat VBA di Excel, saya ada masalah pada saat saya click command button dia akan terus looping sebanyak data yang ditemukan

|   Lot      |     Tanggal         |

|    15      |   10-Nov-2014   |

|    15      |   10-Nov-2014   |

|    2        |   10-Okt-2014    |

|    4        |    20-Okt-2014   |

ini code yang saya buat,

<pre lang="vb">

Sub reminder()

  For Each cell In Range("B7:B1994")

  If cell.Value = Date + 3 Then

    Cells(3, 2).Interior.ColorIndex = 4
    Cells(3, 2).Font.ColorIndex = 0
    Range("B3").Value = cell.Value

 ElseIf cell.Value < Date + 3 Or cell.Value > Date + 3 Then
    Cells(3, 2).Interior.ColorIndex = 0
    Cells(3, 2).Font.ColorIndex = 0
    Range("B3").Value = ""
   
 End If

 Next
    
 On Error Resume Next
 End Sub

</pre>

Jadi pada saat saya click command button akan memunculkan tanggal hari ini + 3 = Tanggal lot dalam excel

saat itu sudah berhasil muncul,tetapi dia akan me looping sebanyak data yang ditemukan,saya sudah mencoba menggunakan mesgBox

dan hasilnya saya harus klik ok sebnyak 200 kali karena data yang ditemukan ada 200.

mohon bantuannya untuk resolve code saya yang masih berantakan ini

Terima Kasih

Comments

  • edited November 2014
    ya jangan pake for buat loop
    pake kondisional loop, misal pake while

    atau, break saja loop nya kalo sdh ada 1 data yg ketemu
Sign In or Register to comment.