Tecnologia, programação e muito Visual FoxPro.

quarta-feira, 17 de abril de 2013

Re: ]] XL-mania [[ kopi sampai akhir

 

Pak Suwaspodo,

Coba copas script berikut ke sebuah module.
Public Sub KopiTuntas()
    With Sheet1.Range("an2:ar2")
        If .CurrentRegion.Rows.Count > 1 Then
            .Copy .Resize(.CurrentRegion.Rows.Count - 1)
        End If
    End With
End Sub

kemudian save as workbook dengan save as type dipilih .xlsm atau .xlsb
lalu jalankan prosedur KopiTuntas.

Wassalam,
Kid.




2013/4/17 Suwaspodo Seni mihardjo <podo8991@yahoo.com>
 

Rekan xl-mania
Saya punya soal pengkopian kebawah sampai habis baris yang dulu sangat mudah waktu saya kerjakan dengan makrolotus. Saya mencoba merekam pengkopian dengan makroexcel, tetapi hasilnya hanya untuk file itu saja, pada waktu jumlah baris berubah pekerjaannya menjadi tak sempurna lagi. Mohon pembelajaran dari rekan yang sudah lebih dahulu mengetahui.
Terima kasih.


__._,_.___
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (2)
Recent Activity:
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Merry Christmas. May God bless you and your family...             |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di :                                            |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
MARKETPLACE


.

__,_._,___

Nenhum comentário:

Arquivo do blog