Senin, 19 November 2018

sampai nangis.....


Rosi vs Marq


mabuk berat...


nyaris saja


ngantuk berat


sok sok an....


jail....


akhirnaya kepergok


ketahuan lo...


ke pesta


ibunya hahaha....


hati - hati modus copet


hampir aja


belajar ngaji



goyang maut


benar - benar sukses


akhirnya


anak pintar


Seni Airbrush


si Amel


CARA MEMBUAT FUNGSI TOMBOL COPY PASTE DENGAN EXCEL



Blog sederhana yang berkeinginan menyajikan materi materi kursus microsoft spreadsheet ini menajak belajar cara membuat fungsi tombol Copy Paste data dengan Microsoft Excel, Apakah bisa? Tentu saja bisa, dengan menggunakan rumus VBA, kita bisa melakukan proses Copy dan Paste data pada excel dengan hanya menggunakan sebuah tombol. Lalu, bagaimana caranya? Mari ikuti langkah-langkahnya sebagai berikut :


1. Siapkan lembar kerja Excel, kemudian arahkan kursor ke Tab Developer, lalu pilih Insert sub menu, drag dan pilih Button.

                                                                                                                                                                                                                                                                                                                                                         
1. Kemudian akan muncul jendela seperti berikut, dan pilih tombol New seperti berikut.




3. Maka akan tampil halaman VBA, dan kita tuliskan rumus dengan script berikut ini


Sub Button1_Click()


Range(“D3:D7″).Select


Range(“D3:D7″).Copy


End Sub




4. Selanjutnya kembali lagi ke lembar kerja Excel, ganti tombol Button1 dengan nama Copy.



5. Kemudian untuk membuat tombol Paste lakukan hal yang sama seperti pada langkah 1 dan 2, untuk mengisi pada halaman VBA ketikan rumor script seperti berikut.


Sub Button2_Click()


Range(“F3:F7″).PasteSpecial (xlPasteAll)
End Sub

6. Selanjutnya kembali lagi ke lembar kerja Excel, ganti tombol Button2 dengan nama Paste.



Untuk membuktikan data yang kita buat dapat di Copy dan di Paste, terlebih dahulu masukan data pada sel D3 sampai sel D7 seperti berikut.



Kemudian klik tombol Copy, setelah itu klik tombol Paste, Apa yang terjadi?





Inilahhasilnya, sepertipadatampilandiatas, data darisel D3 sampaisel D7 dapat di copy dan paste kesel F3 samapi F7.Mantabbukan?


Kesimpulan, Fungsi Copy Paste inibisadigunakanuntukmembantuAndadalammembuatsebuahlaporan data dengan format data yang harussama, halinitentunyadapatmenghematwaktudanlebihefisiendaripadaharusmelakukan copy paste denganbantuan mouse atau keyboard. Semogabermanfaatd




CARA PENGGUNAAN IF GANDA/MULTI DALAM RUMUS EXCEL


Bagi yang berkeinginan memuat materi kursus microsoft excel secara online ini mengajak untuk melanjutkan pembahasan rumus if dasar dan fungsi rumus if excel sebelumnya. Sekarang kita lanjutkan pembahasan kita yaitu tentang formula IF Ganda/Multi. Kegunaan dari fungsi ini adalah  menentukan pernyataan atau nilai syarat dan pilihan yang ditentukan lebih dari satu, sebagaimana pada if tunggal. Sintaksnya yaitu: =If(ekspresi logika,nilai benar,if(ekspresi logika,nilai benar,if(…………))) maksimal 8 IF Keterangan : untuk tutup kurung yang terakhir disesuaikan dengan jumlah if yang ada, misal if yang ditulis 2 berarti tutup kurungnya yaa 2 Contoh 1, Fungsi IF dengan 2 syarat, 3 pilihan.
  • Jika nilai rata-rata 0-59, maka Cukup
  • Jika nilai rata-rata 60-84, maka Baik
  • Jika nilai rata-rata 85-100, maka Baik Sekali.

Data dan bentuk penulisan rumusnya sebagai berikut;
  • Rumus pada cell I6 adalah
=IF(H6>=85,”BAIK SEKALI”,IF(H6>=60,”BAIK”,”CUKUP”)
  • Rumus pada cell I7 adalah
=IF(H7>=85,”BAIK SEKALI”,IF(H7>=60,”BAIK”,”CUKUP”))
  • Dan seterusnya sampai cell I15, gunakan Fill Handle, gambar  kursor (+) di pojok bawah cell.
  • Klik tahan dan seret sampai ke cell I15
Fungsi IF ganda dengan 4 syarat 5 pilihan Contoh soal
  • Ø Jika nilai ujian 85-100, maka nilai huruf A
  • Ø Jika nilai ujian 70-84,99, maka nilai huruf B
  • Ø Jika nilai ujian 55-69,99, maka nilai huruf C
  • Ø Jika nilai ujian 40-54,99, maka nilai huruf D
  • Ø Jika nilai ujian 0-39,99, maka nilai huruf E
Lihat data dan penulisan rumus di bawah ini 

Tulis rumus di cell paling atas aja, kemudian gunakan Fill Handle kayak contoh di atas biar tidak binggung…selamat mencoba dan untuk lebih mahir kembangkan sendiri yaaaaa…… Contoh lain


Rumus pada cell D6 adalah =IF(B6=”MB25″,250,IF(B6=”PR80″,750,IF(B6=”M717″,30,IF(B6=”MM34″,150,35)))) Untuk menambah decimal/angka nol pada harga, anda bisa klik Increase Decimal, seperti gambar di bawah ini

Begitulah cara penggunaan rumus If ganda/multi dalam Microsoft Office Excel ini. Dengan harapan bisa dianggap sebagai tempat belajar online penganti kursus  microsoft excel tentu masih banyak kekuranagan disana sini. Harap maklum dan semoga bermanfaat

Cara Membuat Password Karakter Sensitif Untuk Form Login

Tutorial ini merupakan lanjutan dari tutorial sebelumnya tentang cara membuat Form Login sederhana. dalam tutorial tersebut - pengguna diharuskan memasukkan sebuah kata kunci (password) agar bisa masuk ke dalam aplikasi utama, permasalahannya adalah : kata kunci tersebut tidak bersifat sensitif, artinya penulisan kata kunci mengabaikan format karakter. Ambil contoh, password yang digunakan untuk login adalah "admin" (format karakter huruf kecil) sedangkan pengguna menuliskan kata tersebut menggunakan huruf kapital sehingga menjadi "ADMIN". 


Dengan mengabaikan sensitifitas sebuah karakter, dua kata tersebut adalah sama - entah menggunakan format tulisan huruf kecil, kapital, atau gabungan antara keduanya. Padahal, pada umumnya penulisan kata sandi atau password selalu bersifat sensitif hal ini diperuntukkan demi menjaga keamanan data.

Sebuah kelemahan kecil yang tentunya akan berakibat sangat fatal yang terdapat pada
tutorial terdahulu kini dapat Anda perbaiki melalui panduan berikut ini :

Menentukan password dalam sebuah sel
Langkah inilah yang tidak ada dalam tutorial sebelumnya. Ya, langkah ini merupakan kunci yang nantinya password tersebut bersifat sensitif - sehingga penulisan karakternya harus sama persis dengan apa yang terdapat dalam sebuah sel.

Aktifkan Sheets1 (atau terserah) kemudian ketikkan sebuah kata atau kalimat di dalam sel A2, yang nantinya akan difungsikan sebagai password. Contoh, ketikkan kata "admin" - tanpa tanda petik
selanjutnya letakkan fungsi berikut di sel C2

=EXACT(A2,B2)
artinya, isi sel B2 harus sesuai dengan sel A2 - dan jika tidak maka fungsi ini akan menghasilkan nilai FALSE.

Kombinasi Fungsi dengan Macro VBA
Sebelumnya siapkan sebuah desain untuk UserForm - atau Anda bisa juga menggunakan desain seperti tutorial sebelumnya. Langkah selanjutnya adalah memasukkan kode untuk Kotak Password (TextBox1) dan Tombol Login (CommandButton1) seperti berikut :
Private Sub TextBox1_Change()
Range("B2") = TextBox1
End Sub

Private Sub CommandButton1_Click()
If Range("C2") = False Thn
     MsgBox "Password yang Anda masukkan salah"
     Else
     UserForm1.Hide
     MsgBox "Selamat Datang..."
End If
End Sub

Skema Kerja Login
Ketika pengguna memasukkan sebuah password di kotak TextBox1 yang secara otomatis juga akan tertulis di sel B2, kemudian fungsi =EXACT akan membaca kesamaan antara sel B2 dengan sel A2.
Jika dua sel tersebut berisi data yang sama persis maka akan menghasilkan nilai TRUE, dan sebaliknya jika keduanya terdapat perbedaan maka akan menghasilkan nilai FALSE.

Sementara itu tombol Login membaca informasi dari fungsi EXACT, artinya pengguna akan berhasil login ketika sel C2 bernilai TRUE dan ketika sel C2 bernilai FALSE akan menampilkan sebuah pesan bahwa password yang dimasukkan salah.
Anda juga dapat mengkombinasikan tutorial ini dengan tutorial-tutorial lainnya yang dapat Anda pelajari untuk memaksimalkan Form Login anda 

CARA MENGKONVERSI NILAI ANGKA MENJADI FORMAT HURUF


Pada umumnya data yang ditulis di Buku Raport atau Laporan Hasil Belajar Siswa antara lain, nama mata pelajaran kemudian disertai dengan sebuah nilai untuk masing-masing mata pelajaran tersebut. Dan biasanya untuk nilai yang terdapat dalam buku raport dibagi menjadi dua bagian, satunya berupa angka dan yang berikutnya berupa huruf (penjabaran dari nilai angka). 

Kaidah penulisannya tergantung dari masing-masing kebijakan sekolah, ada yang menggunakan nilai satuan dengan dua angka di belakang koma; contoh 7,65, dan ada yang menggunakan nilai puluhan dengan satu angka di belakang koma; contoh 76,5.

Kemudian biasanya untuk penulisan nilai dengan format huruf seperti berikut, nilai dengan angka 7,56 ditulis dalam format huruf menjadi Tujuh Koma Lima Enam bukan Tujuh Koma Lima Puluh Enam.

Formula berikut ini berfungsi untuk mengkonversi nilai Angka menjadi format huruf, dengan menggunakan satuan puluhan dengan dua angka di belakang koma sehingga hasilnya akan seperti berikut :
8,60 menjadi Delapan Koma Enam Nol
Membuat Tabel Konversi
Tabel ini nantinya akan digunakan sebagai dasar dalam penulisan format huruf menggunakan bantuan sebuah formula sederhana
Menuliskan Nilai Dengan Format Angka
Sebagai contoh, ketikkan sembarang nilai di sel D1 dengan format angka satuan dengan dua angka di belakang koma - misal 5,28
Catatan :
jika komputer anda menggunakan setting Bahasa Indonesia maka gunakan tanda koma (,) sebagai pemisah angka desimal, sedangkan jika komputer anda menggunakan setting bahasa Inggris maka gunakan tanda titik (.)
Kesalah penulisan tanda baca akan menghasilkan pesan error #VALUE! untuk hasil akhirnya.

Formula untuk merubah Angka menjadi huruf
ketikkan formula berikut di Sel E1
=VLOOKUP(LEFT(D1;1)*1;A1:B10;2)&" koma "&VLOOKUP(MID(D1;3;1)*1;A1:B10;2)&" "&VLOOKUP(RIGHT(FIXED(D1);1)*1;A1:B10;2)

Jika anda menggunakan format puluhan dengan satu angka dibelakang koma, gunakan formula berikut :
=VLOOKUP(LEFT(D1,1)*1,A1:B10,2)&" "&VLOOKUP(MID(D1,2,1)*1,A1:B10,2)&" koma "&VLOOKUP(RIGHT(FIXED(D1,1),1)*1,A1:B10,2)
Untuk menghilangkan pesan error #VALUE! dikarenakan tidak adanya data yang dibaca di sel D1, maka gunakan bantuan formula IFERROR.
Untuk lebih jelasnya mengatasi error formula klik
link ini

Caras Membuat Otomatis Menutup Dokumen Excel Jika Tidak Ada Aktifitas Pengguna

Sebuah system operasi seperti windows yang sudah terinstall dengan benar baik yang terdapat di laptop maupun PC mempunyai sebuah fitur yang digunakan untuk menghemat energy (energy saving) yang dapat diatur - kapan Laptop atau PC tersebut mati (sleep, hibernate, atau shutdown) Kondisi ini terjadi jika tidak ada aktifitas sama sekali dari pengguna dalam kurun waktu tertentu.

Di dalam Microsoft Excel - kita dapat juga menambahkan sebuah fasilitas atau fitur tersebut; seperti menutup sebuah file excel jika tidak ada aktifitas dari pengguna dalam waktu tertentu. Tentunya untuk membangun sebuah fasilitas ini membutuhkan kode VBA.
Membuat Module Untuk Menutup Dokumen
Buat sebuah standar module dengan cara klik Insert > module Dalam jendela Microsoft Visual Basic,
kemudian paste kode berikut :
Public RunWhen As Double
Public Const MENIT = 5 'workbook akan tertutup dalam waktu 5 menit

Public Sub Tutup()
   ThisWorkbook.Close savechanges:=True
End Sub
ganti nilai MENIT = 5 sesuai dengan yang anda kebutuhan untuk menutup dokumen
Module Untuk Menjalankan Prosedur
Masih dalam jendela Microsoft Visual Basic, paste kode berikut di ThisWorkbook
Private Sub Workbook_Open()
    On Error Resume Next
    Application.OnTime RunWhen, "Tutup", , False
    On Error GoTo 0
    RunWhen = Now + TimeSerial(0, MENIT, 0)
    Application.OnTime RunWhen, "Tutup", , True
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    On Error Resume Next
    Application.OnTime RunWhen, "Tutup", , False
    On Error GoTo 0
End Sub

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    On Error Resume Next
    Application.OnTime RunWhen, "Tutup", , False
    On Error GoTo 0
    RunWhen = Now + TimeSerial(0, MENIT, 0)
    Application.OnTime RunWhen, "Tutup", , True
End Sub

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    On Error Resume Next
    Application.OnTime RunWhen, "Tutup", , False
    On Error GoTo 0
    RunWhen = Now + TimeSerial(0, MENIT, 0)
    Application.OnTime RunWhen, "Tutup", , True
End Sub

Simpan file dengan type Excel Macro-Enabled Workbook

PERSAMI SMP Negeri 3 Tanah Tumbuh 2018




















MENGENAL VISUAL BASIC DI MS. EXCEL