Dear Miss Jan Raisin (dlm arti bahasa jawanya "Mba yang ga pernah malu"),
Hehehe, pas dicoba ternyata paham knp bisa error dan bermasalah. jadi saat menjalankan macronya, ternyata nilai valuenya terlihat dengan jelas semua. makasih Miss Jan Raisin. Inget Aji Mumpung yang drmh miss? Waaaahhhh... 0_0 :-D ---In [email protected], <[email protected]> wrote: hai Aji.. jadi keingat sama mas Aji Mumpung yang di rumah buka worksheet excel dan VBE secara berdampingan, lalu coba dicek sendiri dulu dengan cara menekan tombol F8 berkali-kali, dan lihat setiap perubahan yang terjadi baik di worksheet maupun di VBE, kalo di VBE dengan cara meletakan kursor di setiap variabel. cara di atas akan menjawab 3 pertanyaan yang anda sampaikan untuk pertanyaan berikutnya tolong lampirkan sample workbook yang sudah dimodifikasi.. agar BeExceller dapat melihat kesalahan yang terjadi. Salam, -Miss Jan Raisin- Pada 24 Oktober 2013 18.10, <ones_marle_oke@... mailto:ones_marle_oke@...> menulis: Miss Jan Raisin, Mau tanya boleh? (boleh yaaaa.....) Next problem... - Setelah saya modifikasi sedemikian rupa - Dim rgHasil As Range, rng As Range Dim lRow As Long, lHasil As Long, getDays As String Application.ScreenUpdating = False getDays = Format(Date, "dd") lRow = Sheet2.Cells(Rows.Count, 1).End(xlUp).Row Set rgHasil = Sheet2.Range("w2:w" & lRow) For Each rng In rgHasil lHasil = rng.Row If Sheet2.Range("v" & lHasil).Value < getDays Then rng.Value = DateSerial(Year(Date), Month(Date), Range("v" & lHasil).Value) Else rng.Value = DateSerial(Year(Date), Month(Date) - 1, Range("v" & lHasil).Value) End If Next rng MsgBox "Done update PTD", vbInformation, "Message" Application.ScreenUpdating = True Pertanyaannya : 1. Pada saat saya action macronya, ternyata semua value yang ada di kolom W2-W4 pada sheet("After") sudah normal, namun kolom W5 sheet("After") sampai seterusnya menjadi 30-09-2013 dan 30-08-2013, ini kenapa ya? 2. Untuk variable 'rng', ini mengapa menunjukkan tanggal 30-09-2013 ? 3. Agak sedikit linglung juga, kenapa loopingnya hanya mencapai di kolom W4, namun di kolom W selanjutnya malah tidak berjalan... Terima kasih. -aji-
