Artikel Ilmiah

Meghapus Data Dari Dua atau Lebih Sheet Secara Otomatis

Ada yg merespon tentang aplikasi POS (Point Of Sale) gratis, yang sudah saya posting sebelumnya, intinya adalah pengguna aplikasi POS tersebut menemukan kendala, ketika dia mau menghapus satu cell, anggaplah di Sheet1, maka cell di Sheet2 dan Sheet3 yang terkoneksi dengan formula di Sheet1 menjadi “Error”, sehingga program nya menjadi tidak terpakai.

Maunya, ketika cell di Sheet1 dihapus, maka isi cell di Sheet2 dan Sheet3 akan terhapus secara otomatis.

Maka penulis mencari solusinya dengan mencoba menggunakan Code VBA Macro Excel, seperti di bawah ini:

Sub Button3_Click()
' Menggunakan Looping/Pengulangan For Next (Cara 1)
 Dim ws As Worksheet
 For Each ws In ThisWorkbook.Sheets
 ws.Range("A1:B12").ClearContents
 Next
' using for loop with an iterator (Cara 2)
 Dim i As Long
 For i = 1 To Sheets.Count
 Sheets(i).Range("A1:B12").ClearContents
 Next i
' using do while loop (Cara 3)
 i = 1
 Do While i <= Sheets.Count
 Sheets(i).Range("A1:B12").ClearContents
 i = i + 1
 Loop
 'Silakan pilih cara yang paling mudah untuk digunakan
End Sub

File bersangkutan, silakan download
Sumber

Iklan

Data Toko Online Otomatis

Ilustrasi [Hp: 081273259932]

Toko gustika online shop sudah berjalan selama +/- 4 tahun dengan omset 10 juta/bulan. Toko ini menjual berbagai macam produk yang berhubungan dengan bahan dasar dari kain untuk kebutuhan kamar. Produk-produk tersebut berupa:

  • Bed Cover Dengan Merk A, B, C, D, F
  • Selimut bulu dengan merk A,B,C,D,F
  • dan produk lainnya yang berhubungan dengan kebutuhan kamar tidur

Toko gustika onlineshop ini tidak berjualan sendirian, melainkan dibantu para reseller yang berjumlah 100 orang lebih. Sedangkan pelanggannya sendiri sudah mencapai ribuan orang dengan alamat lokasi yang berbeda-beda, dan seringkali melakukan pembelian ulang dengan data pengirim dan penerima yang sama.

Permasalahan muncul ketika akan mengirimkan barang yang dipesan. Permasalahan tersebut adalah:

  1. Selalu mengetik ulang nama pengirim dan penerima barang, meskipun data yang sekarang sama dengan data sekarang, hal ini cukup merepotkan, menghabiskan waktu & tenaga
  2. Terkadang kemasan barang yang dipesan memiliki bentuk yang berbeda (satuan, lusinan, grosiran) sehingga perlu membuat bentuk kertas alamat yang digunakan tidak mungkin dibuat sama, karena tidak sesuai dengan bentuk barang yang dikirim
  3. Terkadang pelanggan ini menjadi sekaligus sebagai reseller, artinya dia meminta barang dikirim ke orang lain atas nama dia, sehingga sulit kembali untuk memasukkan nama tujuan dan pengirim secara manual
  4. Belum lagi barang pesanan yang langsung dari reseller, harus dikirim dengan pengirim nama reseller, dan penerimanya adalah orang lain, maka “ritual memasukkan nama pengirim dan penerima menjadi pekerjaan rutin yang sangat menjemukan” karena habis waktu dan tenaga untuk melakukan sesuatu yang berulang.
  5. Masalah lain muncul ketika para reseller menginginkan pengiriman barang A dengan Agen 1, reseller B menginginkan pengiriman dengan Agen 2, dan pelanggan langsung menginginkan pengiriman dengan agen 3. Sebagai manusia biasa, tentu tidak selalu ingat dengan pesanan reseller dan pelanggan tersebut. Akibatnya ada beberapa pengiriman yang salah kirim melalui agen yang diinginkan oleh pelanggan dan reseller. Dan sudah bisa ditebak, pelanggan dan reseller akan komplain karena tidak sesuai dengan apa yang diinginkannya. ūüė¶ , akibat paling fatal adalah pelanggan berhenti berlangganan dengan kita. Tentu ini merugikan sekali….
  6. Karena tulisan tidak begitu bagus “tergolong jelek” terkadang alamat tujuan dan penerima tidak begitu jelas terlihat, akibatnya ada beberapa barang yang dibalikin ke pengirim, wah… merepotkan sekali bekerja dengan manual dan keluar biaya yang tidak perlu.
  7. Akhirnya pemilik toko gustika online shop membutuhkan suatu software atau aplikasi dengan harga yang murah, mudah dioperasikan, dan dapat mengatasi masalah tersebut di atas.

Filenya dapat Didownload di:

++++++++++++++++++++++

File Disini  Panduan Disini

++++++++++++++++++++++

Ternyata melalui file ini, toko gustika online shop mampu merekap semua data pelanggannya dengan baik, rapi, mudah digunakan, programnya ringan sekali, karena hanya menggunakan program excel yang sudah ada di komputernya sendiri. Tidak repot untuk menginstall ulang program tersebut di komputernya. Disamping itu dia mampu merekap semua reseller di tokonya sama mudahnya dengan dia merekap data pelanggan dan memasukkannya kembali ke dalam kertas alamat yang akan digunakan. Dengan data agen pengiriman yang biasa digunakan, dan agen pengiriman yang bisa disesuaikan, pemilik toko menjadi sangat mudah melakukan perekapan data pelanggan dan alamat reseller serta mencetakknya dengan berbagai ukuran, karena fasilitas di program ini sangat cocok untuk pemilik toko online.

Wah… ternyata pekerjaan yang selama ini merepotkan toko online untuk membuat database pelanggan dengan manual, sudah teratasi dengan program tersebut.

Kenapa saya ingin berbagi file ini, supaya teman-teman pemilik toko onlineshop menjadi pemilik toko yang profesional dan berfikiran maju “customer oriented” bukan hanya berfikir keuntungan belaka, melainkan berfikiran demi kemajuan usaha agar lebih berkembang.

Berikut saya lampirkan screen shoot program yang dimaksud pemilik toko gustika onlineshop (Klik Gbr Untuk Memperbesar Tampilan).

Form Database Pelanggan Untuk Di Print  Database Reseller Untuk Di Print Di Alamat Tujuan  Print Alamat Kiiro Tosca Shop

Nah, begitu teman-teman pemilik toko online, sedikit berbagi cerita tentang program yang akan memudahkan anda menjadi pemilik toko online yang profesional. ūüôā

[otomatisasi data toko online]
[database excel]
[software database]
[software data base]
[database online]

Investasi Jabon Untuk Tahun 2017

Jabon, dengan nama latin (Anthocephalus Cadamba) sedang dalam proses pertumbuhan (tanam tgl 20 Des 2013), lahan yang sudah diolah dengan tampilan seperti di bawah ini.

Loksi Kebun Jabon

Adapun keterangan kebun sebagai berikut:

  1. Luas lahan +/- 2,3 ha
  2. Banyak tanaman +/- 2300 batang
  3. Jadwal tanam 20 desember 2013
  4. Elevasi kebun +/- 800 m Asl (Kayu jabon cocok ditanam pada daerah dengan ketinggian 0-1000 Asl)
  5. Sistem penanaman monokultur (hanya jabon)
  6. Jenis hasil kayu jabon
  7. Jenis kayu jabon adalah jenis kayu dengan grade III, kayu dengan massa jenis ringan. Dengan kekuatan lebih 1 level dibanding sengon
  8. Estimasi perkembangan diameter  +/-  (5-10 cm/tahun.

Jabon setelah 2 mingu ditanamUpdate: Gambar di atas adalah tanaman jabon umur 2 minggu. Ditanam tanggal 23 Desember 2013, dan difoto tanggal 05 Januari 2014.

Investasi dibidang tanaman kayu, cocok untuk investasi bagi masyarakat yang tidak memiliki banyak waktu untuk berkebun, yang disebabkan oleh aktivitas lain. Secara teoritis, investasi kayu hutan memiliki daya tahan lebih kuat dibanding kayu sejenis (misal sengon). Dan tidak membutuhkan perawatan yang sangat intensif, cukup kita pupuk, semprot rumput yang tumbuh disekelilingnya dengan herbisida, ketika panen, tanaman kayu tidak membutuhkan perlakuan lebih, tidak perlu dijemur, tidak perlu di keringkan, dan bisa dijual dengan cara gelondongan, jual berdiri di batang, dan atau dengan diolah terlebih dahulu menjadi kayu pertukangan.

——————– Catatan ————–

*Artikel ini akan terus diupdate sesuai dengan kondisi tanaman jabon yang sedang saya usahakan, setelah panen nanti akan menjadi bukti mengenai proses gagal/berhasilnya investasi Jabon.

Membaca Barton Chart Untuk Mengetahui Differensial Pressure & Pressure Upstream

Kemarin ada yang bertanya mengenai cara membaca barton chart, yang sering digunakan untuk mengukur flow fluida dengan alat orifice. Sehubungan waktu pertanyaan ditanyakan dan saya belum menjawab karena ada tamu yang datang, maka akan saya jawab melalui tulisan ini. Siapa tahu ada yang menanyakan hal yang sama dengan pertanyaan orang itu.

Dp Mak 23 Psi P static Max 500 Psi

Di dalam chart barton ada komponen seperti:

  • Range alat (Range yang terdapat di alat barton) *Gambarnya di bawah ini*
  • Range Chart (Range yang terdapat di kertas barton) *Gambarnya di bawah ini*
  • Satuan dari chart itu sendiri (yang sedang dipakai satuannya Psi)

Contoh Soal:

Contoh Pembacaan BartonPembacaan barton chart yang digunakan  untuk mengetahui differensial pressure (Dp) dengan satuan yang diinginkan adalah dalam Ksc. Informasi yang diketahui: Range (Dp) alat  23, dan range chart 100 (satuan dalam Psi). Pada saat chart dibaca, hasil pembacaan menunjukkan garis di angka 60.

Maka nilai Dp : (Pembacaan Chart * Range Alat/Range Chart) / (Konversi Psi ke Ksc), maka nilai Dp = ((60*23/100)/14.22) = 0,97 Ksc

Untuk pressure upstream, (Pu) memiliki cara pembacaan yang sama. Contoh:

Pembacaan barton chart yang digunakan  untuk mengetahui Pressure Upstream (Pu) dengan satuan yang diinginkan adalah dalam Ksc. Informasi yang diketahui: Range alat (Static Pressure) 500, dan range chart 100 (satuan dalam Psi). Pada saat chart dibaca, hasil pembacaan menunjukkan garis di angka 20.

Maka nilai Pu : (Pembacaan Chart * Range Alat/Range Chart) / (Konversi Psi ke Ksc), maka nilai Pu = ((20*500/100)/14.22) = 7,03 Ksc

Semoga dengan jawaban ini pertanyaannya terjawab dengan baik.

Pengukuran Differensial pressure dan Presure Upstream digunakan sebagai salah satu dari parameter untuk menghitung seberapa besar total flow dari fluida (gas, uap, air brine) yang dihasilkan.

Contoh pengukuran (Dp & Pu) dalam bidang panas bumi, hasil flow yang diperoleh dari hasil perhitungan akan menggambarkan berapa besar energi listrik yang dibangkitkan setelah dibagi dengan total uap hasil desain untuk membangkitkan 1 MW listrik. Misalnya, dengan total uap hasil perhitungan menunjukkan angka 110 ton/jam, dari hasil desain jumlah kebutuhan uap untuk membangkitkan 1MW listrik adalah 8 ton/jam. Maka nilai 110 ton/jam : 8 ton/jam = 13,75 Mw

Untuk lebih jelasnya, akan saya berikan contoh perhitungan dengan menggunakan file excel. Ditunggu saja pada postingan berikutnya… ūüôā

Pembelajaran Awal Desember 2013

Pertemuan di lapangan di awal bulan Desember 2013 ini membuat suatu kesimpulan sederhana, bahwa sebenarnya sikap dan prilaku seseorang mengikuti apa yang difikirkannya. Fikiran dipengaruhi oleh opini orang lain, dan opini liar akan membuat tindakan dan pendapat menjadi tidak terkendali. Seseorang dengan mudah menerima perkataan orang lain, mengeluarkan pendapat tersebut dengan penuh keyakinan, bahwa apa yang dia dengar, dia rasakan, itu adalah kebenaran. Padahal info yang diperoleh tidak sesuai dengan fakta yang sebenarnya. Akibatnya semua akan di nilai sesuai dengan pemikiran itu..

Tak perduli dengan pandangan narasumber, tidak diindahkan efek dari perkataan tersebut, apakah perkataan itu akan membungkam mereka sendiri, tampaknya semua menjadi abu-abu, dan akhirnya menjadi salah atau benar dengan hasil pemikiran yang sepihak.

Ahh….. ternyata…. tua nya usia tidak menjadi suatu patokan, pertemuan demi pertemuan tidak menjadi pelajaran, tetap saja ingin menjadi diri sendiri, merasa benar sendiri, merasa paling hebat sendiri, dan akhirnya akan menepuk dada…. sayalah yang paling berjasa…. tanpa saya… semua tidak bisa berjalan dengan baik….

Skill bukan segala-segalanya… tanpa etika dan kemauan untuk memahami dan difahami, skill akan menjadi tubuh tanpa roh…. akan bergerak liar semaunya sendiri… tanpa diikuti bayang-bayang toleransi, dan tanpa adanya pandangan dari sisi orang lain…..

Semoga besok mentari bersinar dan aku tetap bisa menatapnya kembali, dan bayangan alam tetap memayungi perjalananku… ketika keinginan untuk berbuat baik masih terus membara, harapan itu akan tetap ada di dada… sejauh itu pula langkahku tak akan berhenti..

Tip Mempercepat Kerja Macro Excel

Ada beberapa tip untuk mempercepat kinerja macro excel yang saya dapat dari web ini. Tulisannya saya modifikasi sedikit dengan data kurang lebih sama.

Tip ke-1: >> Application.ScreenUpdating = False perintah ini membuat proses macro Excel berjalan tanpa memperlihatkan perubahan yang terjadi pada layar Excel. Selama proses macro berjalan, tampilan window Excel tidak akan berubah sampai nanti proses macro ini selesai.

Sebagai contoh, bandingkan 2 kode macro ini dari segi kecepatan.
‚Äėtanpa Application.ScreenUpdating
Sub Macro1()
  For i = 1 to 20000 step 1
     Cells(i,2) = i
  Next i
End Sub
‚Äėdengan Application.ScreenUpdating
Sub Macro2()
Application.ScreenUpdating = False
  For i = 1 to 20000 step 1
     Cells(i,2) = i
  Next i
End Sub
Contoh file yang menggunakan  Application.ScreenUpdating = False  dapat didownload pada file berikut ini: Download di Sini
File di atas adalah file yang berfungsi merekap semua yang terdapat dalam berbagai sheet dan dimasukkan hanya pada 1 sheet saja.¬† Data Sheet1+Sheet2+Sheet3 —>> Sheetkombinasi

Tip ke-2: >>¬† Hindari perintah Select,¬† Sewaktu mengolah Cells di Excel, sebaiknya hindari perintah Select, yang mana dengan perintah ini maka komputer akan mengalokasikan sebagian memory untuk memindahkan kursor kelokasi cell yang di ‚Äúselect‚ÄĚ, dan ini berarti butuh sejumlah memory untuk merubah tampilan layar aplikasi Excel, Misalkan:

Cells(3,4).Select
Selection.Interior.ColorIndex = 30
Bisa dibuat menjadi
Cells(3,4).Interior.ColorIndex = 30
Bandingkan 2 contoh kode berikut ini:
‚Äėdengan perintah select
Sub Macro1()
  For i = 1 to 20000 step 1
     Cells(i,2).select
     Selection.Value = i
  Next i
End Sub
¬†‚Äėtanpa perintah select
Sub Macro1()
  For i = 1 to 20000 step 1
     Cells(i,2).Value = i
  Next i
End Sub

Tip ke-3: >>  Gunakan Matriks / Array

Untuk pengolahan data dalam jumlah besar, gunakan Array atau Matriks. Jadi data yang ada dalam file Excel dicopy terlebih dahulu menjadi sebuah database Array,