[ OOT ] Terima kasih pak Franz..
Memang benar ada dua member baru yg menggunakan email address yg *dibuat * *mirip* dengan email siti dan email Mr. Kid. "mr.nmkid" <[email protected]> "Stdev I" <[email protected]> Semula kami anggap biasa seperti members lain karena kalau ternyata email - address sudah bisa dibuat, berarti sudah lolos peraturan di pihak "Penyedia Email address" Kita tidak ada hak untuk melarang email yg mirip dengan email lain. Sekitar tgl 21 Okt 2011 kedua email itu (kemungkinan besar dibuat oleh 1 orang yg sama) *mulai mengirim posting* tanggapan ke milis tetapi langsung dengan dengan "*inappropriate* email" maka tidak diloloskan (moderated) Mungkin karena merasa dipersulit memposting ke milis, ybs kirim-kirim* via japri * *seakan akan **menanggapi suatu topik* tetapi isinya semakin tidak pantas. beberapa members yg terkait dengan topik tsb diberi CC. Tgl 22 Oct kedua email address tsb sudah di banned & removed oleh Moderator. Yang berarti : untuk selamanya email address tsb tidak akan bisa posting ke milis ini. Tetapi tidak ada yg menghalangi ybs untuk mengirim langsung (japri) ke members kecuali member yg dengan sengaja mem-block /memfilter alamat tsb (spt laporan dari Haps). Demikian ceritak-nya dan juga sekaligus sebagai klarifikasinya. Kepada seluruh members dimohon agar setiap menerima email dari manapun (tidak hanya dari milis ini saja), meluangkan waktu *sejenak untuk memperhatikan * *eMail **Address-nya* karena EMAIL ADDRESS dan apalagi NICK NAME bisa dibuat mirip (bahkan dengan sedikit oprex, bisa dibuat persis *sama) dengan* email milik orang lain. * * *Jangan salah duga dulu hanya karena hal yg MIRIP saja.* Pendapat selanjutnya (mengenai email yg diterima) terserah kepada setiap individu member, karena kami tidak ingin memperngaruhi kebebasan berpendapat setiap member, termasuk apakah harus 'menyayangi' atau 'membenci' moderator / members lain. Sebagai moderators, hal yg dapat kami atur hanya mengarahkan diskusi agar fokus; mengatur lalulintas posting dan kepantasannya. (offensive, tidak patas, tidak sopan, sedapat mungkin kami cegah, setidaknya kalau sudah terlanjur termuat, kami hapus) Kepada pak Franz, sekali lagi terima kasih atas masukannya. Kepada para pinisepuh, owner & moderator, mohon tambahannya bila dirasa perlu. kindest regards, & wassalamu alaikum wr wb, siti note: Khusus dlm kasus ini, sebagai data pembanding barangkali perlu di perhatikan juga siti Yahoo_ID : siti_vi Nick-Name saat ini : "STDEV(i)" email address : [email protected] Mr. Kid Yahoo_ID : nmkid.family Nick-Name saat ini : "Mr. Kid"* * email address : [email protected] ---------------- 2011/10/24 Franciscus SOG <[email protected]> > Dear Mbak Siti, > > Sepertinya ada yang mencoba memperkeruh suasana dengan menggunakan > email yang mirip dengan email mbak "Stdev I <[email protected] > >". Mohon diklarifikasi kepada milist agar > tidak terjadi pencemaran nama baik moderator. Just it. > > Blessings, > Fran'z > > ---------- Forwarded message ---------- > From: Stdev I <[email protected]> Date: Sun, 23 Oct 2011 01:10:17 +0800 (SGT) > Subject: Bls: [belajar-excel] Macro excel copy data ke posisi terakhir > To: "[email protected]" <[email protected]>, "[email protected]" > <[email protected]> > > kalau mau jawab, jawab saja jangan belagu kali. > lu juga contek dari milis tetangga kan formulanya. > jangan sok pintar lahhh... > dasar berani dikampung. > > > ________________________________ > Dari: Franciscus SOG <[email protected]> > Kepada: [email protected] > Dikirim: Rabu, 19 Oktober 2011 11:13 > Judul: Re: [belajar-excel] Macro excel copy data ke posisi terakhir > > Dear Pak Dewan, > Panggil pak Dewan gpp ya, kan ga mau dipanggil pak Menteri (eh salah orang > ya).. > > Untuk kasus Anda, bedakan antara penulisan Row dengan Rows. > > Benar : > Set CellTujuan1 = Sheet2.Cells(Rows.Count, 2).End(xlUp).Offset(1, 0) > > Salah : > Set CellTujuan1 = Sheet2.Cells(Row.Count, 2).End(xlUp).Offset(1, 0) > > Just it. Semoga membantu. > > Blessings, > > Fran'z > > On 10/19/11, Dewan Deya <[email protected]> wrote: > > Sudah di coba sesuai listing di bawah. Masih belom bisa jalan. > > file terlampir. > > ________________________________ > > Dari: Haps <[email protected]> > > Kepada: [email protected] > > Dikirim: Selasa, 18 Oktober 2011 15:20 > > Judul: Re: [belajar-excel] Macro excel copy data ke posisi terakhir > > > > maaf ikutan.. > > Procedure yg ada di module milik Workbook SAMPLE.xls > > seharusnya seperti ini (bandingkan dengan teliti) vl makro tulisan pak > > Dewan > > > > Sub KopiTranspose() > > Dim CellTujuan1 As Range, CellTujuan2 As Range > > Set CellTujuan1 = Sheet2.Cells(Rows.Count, 2).End(xlUp).Offset(1, 0) > > Set CellTujuan2 = Sheet2.Cells(Rows.Count, 11).End(xlUp).Offset(1, 0) > > Sheets("Master").Range("c3:c11").Copy > > CellTujuan1.PasteSpecial Paste:=xlPasteValues, _ > > Operation:=xlNone, SkipBlanks:=False, Transpose:=True > > Sheets("Master").Range("D13:D17").Copy > > CellTujuan2.PasteSpecial Paste:=xlPasteValues, _ > > Operation:=xlNone, SkipBlanks:=False, Transpose:=True > > End Sub > > > > sepertinya bapak harus membaca helpnya, bgmana cara merujuk sheet > > (ada beberapa cara) > > - dengan menyebut indexnyaSheets(1) , Sheets(6) dst.. > > - dengan menyebut NAMA nyaSheets("NamaSheet") , Sheets("Sheet10") > > -dengan menyebut CodeName nya Sheet1 , Sheet32, dst > > . dengan mengexpresikan object sheet tsb (banyak cara) > > misalnya CellTujuan1.Parent.Range("A1:A1000") > > adalah object range yg berada di sheet2 (yaitu sheet yg menjadi induk > > (parent) > > bagi range yg bernama CellTujuan1 > > dst... > > > > -hapsari- > >
