tulis formula di A1
=IF(DAY(EOMONTH("1/1/2012";ROW(1:1)-1))>30;EOMONTH("1/1/2012";ROW(1:1)-1)-1;EOMONTH("1/1/2012";ROW(1:1)-1))

copy sampai A16

wassalam

Ghozi Alkatiri


________________________________
 Dari: Adi <[email protected]>
Kepada: [email protected] 
Dikirim: Senin, 29 April 2013 15:11
Judul: [belajar-excel] Mengambil tanggal tertentu dalam rentang waktu tertentu
 


  
Assalamu'alaikum Wr. Wb.

Master excel yang terhormat,
Saya ingin mengisi kolom A dari baris 1 s/d baris 16 dengan tanggal 30 dari 
setiap bulan dalam rentang Januari tahun 2012 s/d April 2013 menggunakan Excel 
VBA. Untuk bulan yang tidak mempunyai tanggal 30, seperti bulan Februari, maka 
dia akan menyesuakain menjadi tanggal 29/2/2012 atau tanggal 28/2/2013
Mohon pencerahannya Master. Terimakasih, wassalam

Output yang diinginkan:

30/1/2012
29/2/2012
30/3/2012
30/4/2012
30/5/2012
30/6/2012
30/7/2013
30/8/2013
30/9/2013
30/10/2013
30/11/2013
30/12/2013
30/1/2013
28/2/2013
30/3/2013
30/4/2013


 

Kirim email ke