rumus memasukkan data yang sama dalam satu baris pada kolom yang berbeda

  1. ‹ Older
  2. 3 bulan yang lalu

    Caton

    Agu 7 Terverifikasi Indonesia + 12.523 Poin

    MAs @manweljs_ :

    ... mungkin mas @Caton bisa bantu jelaskan kenapa bisa hasilnya text ...

    Sama dengan penjelasan mas @manweljs_, kalau melihat prosedur tersebut, seharusnya hasilnya adalah numerik, jika inputnya berupa numerik.

    Mas @Bejo :

    ... knpa rumus ini hasilnya teks, bukan numeric ya, terima kasih sebelumnya ...

    Kalau dilihat dari file yang mas lampirkan terakhir di atas, masalahnya adalah pada saat proses menyimpan, yakni pada baris:

    Sub BTINPUT_Click()
    ...
    Me.Tbayar.Value = ""
    ...
    End Sub

    Pada saat perintah tersebut dieksekusi, prosedur berikut:

    Private Sub Tbayar_Change()
    If IsNumeric(Tbayar) Then
    Tbayar = Format(Tbayar, "#,##0")
    Else
    Tbayar = Format(Tbayar, "###")
    End If
    End Sub

    akan dieksekusi secara otomatis, oleh karena prosedur Sub Tbayar_Change termasuk Event Procedure, artinya prosedur tersebut akan dieksekusi jika Event yang dimaksud (dalam hal ini Change Event) dipicu. Alhasil, karena properti Text dari kontrol Tbayar berubah, maka prosedur tersebut pun dieksekusi. Dan dikarenakan Empty String ("") bukan merupakan numerik, maka otomatis blok Tbayar = Format(Tbayar, "###") yang akan dieksekusi.

    Saran saya, ubah saja scriptnya menjadi:

    Private Sub Tbayar_Change()
       If IsNumeric(Tbayar) Then
          Tbayar = Format(Tbayar, "#,##0")
       End If
    End Sub

    dikarenakan baris script:

    Tbayar = Format(Tbayar, "###")

    pada dasarnya tidak berguna saat pengguna memasukkan nilai non numerik (bukan angka), karena karakter # merupakan Digit Placeholder yang hanya berguna untuk memformat sebuah teks yang berupa numerik saja. Dengan membuang baris tersebut, setidaknya dapat mengurangi perintah-perintah yang pada dasarnya tidak dibutuhkan.

    Kalau mas @Bejo mau lebih ketat, saran saya:

    [1] Buat prosedur untuk menguji setiap karakter yang dimasukkan hanya berupa angka saja;
    [2] Atau sebelum proses menyimpan, lakukan validasi terhadap tipe nilai dari kotak masukan (misalkan Tbayar). Informasikan kepada pengguna jika tipe nilai yang diinput salah.

    Demikian.

  3. terima kasih master, akan saya coba!!!

  4. master, setelah entri data,kemudian cetak dan simpan, bagaimana script untuk menonaktifkan kotak isian/ entri data kecuali commad input lagi atau exit, saya coba2 pake locked gk bisa, atau penulisannya yg salah, mohon bantuannya

    Me.Cbkelas.Locked
    Me.Lbnama.Locked
    Me.DTPicker1.Locked
    Me.Tbayar.Locked
    Me.TBING.Locked

  5. manweljs_

    Agu 11 Terverifikasi + 5.718 Poin

    coba :

    ...
    me.cbkelas.enabled = false
    ...

    hanya saja jangan lupa pada event tertentu harus di

    ...
    me.cbkelas.enabled = true
    ...

  6. siap master, dicoba!!!! terima kasih

  7. master mau tanya, aplikasi macro yang saya buat kalau terbuka dan posisi tidak terpakai agak lama, ketika akan digunakan pasti ng'hang ya, kira2 masalahnya dimana ya master??

  8. manweljs_

    Agu 13 Terverifikasi + 5.718 Poin

    @bejo

    aplikasi macro yang saya buat kalau terbuka dan posisi tidak terpakai agak lama, ketika akan digunakan pasti ng'hang ya, kira2 masalahnya dimana ya

    mungkin mas @Caton yang bisa menjelaskan soalan ini

  9. Caton

    Agu 13 Terverifikasi Indonesia + 12.523 Poin

    @bejo ... aplikasi macro yang saya buat kalau terbuka dan posisi tidak terpakai agak lama, ketika akan digunakan pasti ng'hang ya, kira2 masalahnya dimana ya ...

    Unik nih ... Baru tahu saya ... Kayak mesin aja ya ... ?! (^_^)/ :D Gak ada contohnya mas @bejo ... ?!

    @manweljs_ ... mungkin mas @Caton yang bisa menjelaskan soalan ini ...

    Saya juga tidak tahu mengapa ... :)

  10. master, saya baru belajar vba, jadi masih Nol Bessar tentang pemrograman, hya bisa coppas script yg bisa saya pahami, selebihnya, haha... bantuan master2 disini, tolong bantu ya master!!! thank before

  11. Caton

    Agu 13 Terverifikasi Indonesia + 12.523 Poin

    @bejo master, saya baru belajar vba, jadi masih Nol Bessar tentang pemrograman, hya bisa coppas script yg bisa saya pahami, selebihnya, haha... bantuan master2 disini, tolong bantu ya master!!! thank before

    Mas @bejo ... Yang dibahas khan bukan masalah scriptnya ... :D Tapi masalah:

    ... aplikasi macro yang saya buat kalau terbuka dan posisi tidak terpakai agak lama, ketika akan digunakan pasti ng'hang ya, kira2 masalahnya dimana ya ...

    File yang mas lampirkan, saat saya coba buka memang butuh waktu (meski tidak sampaai 1 menit), dan membuat Excel sempat Not Responding sesaat ... :D Btw, klo kayak gini kasusnya, ada beberapa hal yang saya ketahui sebagai penyebab masalahnya:

    [1]. Penggunaan fungsi Volatile (fungsi yang akan dikalkulasikan secara otomatis saat terjadi proses kalkulasi pada Worksheet), seperti fungsi DATE, fungsi NOW, fungsi RAND, fungsi RANDBETWEEN dan sebagainya.
    [2]. Penggunaan Array Formula.
    [3]. Link atau External Connections.
    [4]. Cell Format yang berlebihan.
    [5]. Conditional Formatting.
    [6]. Jumlah baris data yang banyak.

    dan sebagainya. Solusinya sangat bergantung kepada apa masalahnya utamanya. Karena tidak semua penyebab ada solusinya global. Mungkin mas @Bejo bisa mencoba menyimpan filenya ke dalam format XLSB untuk mengurangi lag saat proses loading file ...

  12. manweljs_

    Agu 13 Terverifikasi + 5.718 Poin

    mas @Caton

    saya juga punya file yang makronya bisa dikata lumayan banyak (mas @Caton tau deh), baris datanya sudah 80k sekarang, file sizenya 7mb (xlsb) dan untuk hari ini sudah terbuka dari jam 10 pagi sampe sekarang. tapi gak ng'hang kyk punya nya mas @bejo.

    ini saya lagi coba buka filenya dan akan sy biarkan sampe sy tidur sebentar. penasaran ng'hangnya kyk apa

  13. Terima kasihperhatiannya master, tpi xlsb, save as nya gmana master??

  14. @manweljs_ , sekitar 30 menit pasti sudah g'hang master,

  15. manweljs_

    Agu 13 Terverifikasi + 5.718 Poin

    iya nanti saya kabari hasilnya ;)

    @bejo tpi xlsb, save as nya gmana

    save as aja biasa terus pilih Excel Binary Workbook (.xlsb)

  16. Caton

    Agu 13 Terverifikasi Indonesia + 12.523 Poin

    Mas @manweljs_ ...

    Macro, jika tidak tereksekusi secara langsung (AutoRun) saat filenya dibuka, biasanya tidak akan membuat proses loadingnya lama. Namun jika ada script yang masuk AutoRun (misalkan pada prosedur Sub ThisWorkbook_Open) plus data yang banyak, bisa menimbulkan masalah — meskipun hal ini tergantung kepada proses apa yang dilakukan oleh script tersebut. Atau juga script-script berupa UDF yang dipanggil secara Volatile pada Worksheet yang mambuat scriptnya dieksekusi saat proses loading filenya.

    ... sudah terbuka dari jam 10 pagi sampe sekarang ..

    Khan yang dimaksud adalah saat filenya mas @Bejo dibuka (proses loading), bukan sudah dibuka ... :D Klo saya lihat, saat proses awal, StatusBar terlihat melakukan kalkulasi sedikit lamban.

    ... ini saya lagi coba buka filenya dan akan sy biarkan sampe sy tidur sebentar ...

    Di saya gak sampai 1 menit udah terbuka kok mas, gak perlu ditinggal tidur ... (^_^)/ :D

    Mas @Bejo ...

    ... tpi xlsb, save as nya gmana master ...

    Screenshoot030.png

    Pilih Save as type ...

    ... sekitar 30 menit pasti sudah g'hang master ...

    Masih hang juga mas?

  17. manweljs_

    Agu 13 Terverifikasi + 5.718 Poin
    Di sunting 3 bulan yang lalu oleh manweljs_

    mas @Caton Di saya gak sampai 1 menit udah terbuka kok mas...

    iya kalo kebuka di saya juga begitu :P, masalahnya kan kalau terbuka dan posisi tidak terpakai agak lama

    sampe ini belum ng'hang tuh... :D

    btw mas @bejo tidak terpakai agak lama itu file tersebut kan, bukan nya komputernya ? soalnya kalau komputernya saya pakai terus karena lagi kerja

    mas @Caton Pilih Save as type ...

    sampe dibuatkan foldernya :D :D jangan-jangan ada folder saya juga nih :P

  18. saat filenya terbuka/ di run master, hanya tidak di operasikan

  19. Caton

    Agu 13 Terverifikasi Indonesia + 12.523 Poin

    @bejo saat filenya terbuka/ di run master, hanya tidak di operasikan

    Iya, ini juga sudah saya buka ± 30 menit tanpa saya gunakan, tapi ya saya juga sedang mengerjakan script di file lain. Kalo total dianggurin, belum tau. Mungkin saja ada pengaruh dari sistem PC atau Windows-nya, Apalagi klo PC-nya sempat Sleep, bisa jadi ada pengaruhnya.

    @manweljs_ sampe dibuatkan foldernya :D :D jangan-jangan ada folder saya juga nih :P

    Saking banyaknya kasus, saya suka salah buka file ... :) Jadi mending saya pisahkan langsung per klien ...termasuk mas @manweljs_ :D :D :D

  20. terima kasih atas perhatian dan bantuan master semua, semoga master2 disini diberikan kesehatan, umur yg panjang, rizki yg berlimpah, aamiin!!!

  21. manweljs_

    Agu 13 Terverifikasi + 5.718 Poin

    sudah hampir 3 jam not happen, mungkin masalah ada pada windowsnya

 

atau Mendaftar untuk ikut berdiskusi!