Wa'alaikumussalam wr wb
LibreOffice automation juga menggunakan BASIC. Jadi perintahnya akan
sebagian besar sama dengan VB/VBA (Visual BASIC).
Yang mebuat berbeda adalah object model antara Excel Application dengan
LibreOffice Document.
Contoh :
kalau di Excel Application, workbook yang bekerja
السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.
Waduh, metode apa lagi itu OOP..
Hahaha mesti duduk manis sambil ngopi di depan layar ternyata
buat belajar metode OOP. Terima kasih mas Nang Agus.
Jazakallah.
وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Warm
Asalamualaikum warahmatullah,
Mas Heri,
Yang tidak boleh sama bukan nama sheetnya, tetapi nama prosedur, nama
variabel termasuk dalam Name manager, nama object misalnya nama tabel, nama
label, nama user form nama textbox dll. kemarin file yang dikirimkan yang
sama adalah nama sheet (nama akte
السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.
Ohh, ternyata nama sheetnya ga boleh default dari Excell ya ?!
Ya ya ya ,... nambah ilmu lagi ni.
Terima kasih mas Nang Agus.
hm kalo boleh nambah (hahaha kebanyakan nambahnya daripada nanyanya)
Alhamdulillah berjalan
Asalamualaikum warahmatullah,
Mas Heri,
sebaiknya untuk tidak menggunakan nama macro, prosedur, scope maupun
nama variabel dengan nama bawaan Excel.
Misalnya menamakan sebuah prosedur dengan nama "Sheet1" ini akan
menyebabkan excel error yang susah mencarinya.
Agar setelah shhet 5 kembali ke
السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.
Alhamdulillah, mas Nang Agus emang luar biasa.
Saya masih bingung untuk loopnya euy, bagaimana supaya terus
muter sheetnya ?!
Berikut saya sampaikan filenya...
وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Warm
Asalamualaikum warahmatullah
Mas Heri, coba cekrip:
Private Sub Workbook_Open()
Application.OnTime TimeValue("12:00:00"), "pindahSheet"
End Sub
diubah menjadi:
Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:02:00"),"pindahSheet"
End Sub
wasalamualakum warahmatullah.
السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.
Alhamdulillah sudah dicoba dan berhasil.
Terima kasih mas Nang Agus.
Kalau mau tambah lagi boleh kan ya ?!,
Misalnya saya punya 5 sheet berbeda.
Mau berpindah sheet setiap 2 menit sekali, hehehe kira-kira gimana ya !?
Coba pada Workbook open dibuat cekrip:
Private Sub Workbook_Open()
Application.OnTime TimeValue("12:00:00"), "pindahSheet"
End Sub
pindahSheet merupakan macro yang diletakkan di Module, misalnya:
Public Sub pindahSheet()
Sheets("Sheet2").Select
Range("A5") = "wis jam12"
End Sub
salam
NangAgus
--
السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.
Dear Teman-teman,
Mau iseng-iseng bikin Workbook Excell yang bisa pindah sheet otomatis.
Nah, kalo manual Insyaallah sudah bisa. Kalau pakai Timer gimana ya ?!
Mohon bantuannya.
وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ
10 matches
Mail list logo
