Cara Membuat Warna Baris Data Berselang-seling Pada Excel

Salah satu cara untuk membuat pembacaan data lebih mudah dalam Excel adalah dengan membuat bayangan background (warna) pada tiap-tiap barisnya berselang-seling warnanya.

Jadi deretan urutan barisnya mudah dikenali dalam pembacaannya. Hal ini dapat mempermudah apabila data tiap baris terdapat data yang banyak serta terdiri beberapa angka yang hampir mirip. Seperti contoh daftar siswa berikut ini:

Langkah-langkah membuatnya sebagai berikut:

1. Buka data Excel Anda yang akan dibuat warna pada baris data berselang-seling.
2. Sorot seluruh range yang berisi data yang akan diberi warna berselang-seling.
3. Lalu pada menu Home pilih Conditional Formating
4. Pada dialog yang terbuka pilih New Rule.
5. Pada dialog box berikutnya pilih "Use a formula to determine whichcells to format"
6. Pada formula bar ketikkan formula berikut : =MOD(ROW();2)<>0 
7. Lalu klik tombol Format untuk membuka dialog format cell nya. 
8. Pilih menu Fill dan tentukan kondisi warna selang yang di inginkan. Dalam contoh saya pilih warna orange muda, lalu klik OK
9. Klik OK untuk mengkonfirmasi dan menutup dialog.

Warna baris data tersebut tidak akan hilang atau terhapus saat Anda menghapus isi data pada range tersebut. Juga saat anda menyisipkan baris baru ataupun menghapus sebagian baris datanya.

http://blogamka.blogspot.co.id/

Read More

How to Unprotect an excel sheet without password

THis document will tel you how to unprotect an excel spread sheet without having the password This procedure works in Excel 2010 and earlier but in Excel 2013 this will not work.

In case of a password protect worksheet you are unable to Edit the data on the Excel Sheet. If you do not Remember the Password or do not know the password to unprotect the sheet just follow the below simple steps.

1. Press ALT +  F11 or click on View Code in Developers Tab
2. In the Above White Space Enter the below Code. Do not change the code just copy paste:

Sub PasswordBreaker()
    'Breaks worksheet password protection.
    Dim i As Integer, j As Integer, k As Integer
    Dim l As Integer, m As Integer, n As Integer
    Dim i1 As Integer, i2 As Integer, i3 As Integer
    Dim i4 As Integer, i5 As Integer, i6 As Integer
    On Error Resume Next
    For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
    For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
    For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
    For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
    ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
        Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
        Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
    If ActiveSheet.ProtectContents = False Then
        MsgBox "One usable password is " & Chr(i) & Chr(j) & _
            Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
            Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
         Exit Sub
    End If
    Next: Next: Next: Next: Next: Next
    Next: Next: Next: Next: Next: Next
End Sub

3. Now Click on the Run Button or press F5
4. And there you go the sheet is unprotected for you now. Also you would be getting a message in the pop up window.
5. This Message is contains the password which can be used to unprotect the other sheets in the same workbook.

Read More

Download Video di Facebook

1. Putar video yang ingin Anda download dari Facebook. Jika Anda ketemu video melalui beranda, klik saja waktu/tanggal upload pada video tersebut.
2. Selanjutnya, perhatikan pada bagian adress bar pada halaman video. Ubah tulisan "www" menjadi "m" lalu klik Enter.
3. Tampilan Facebook akan berubah ke versi mobile. Akan terbuka halaman baru dimana hanya terdapat video.
4. Play video. Klik kanan pada bagian video tersebut lalu pilih Save Video As.
5. Pilih tempat untuk menaruh video dan kamu juga bisa ubah nama video. Kemudian klik Save. Video akan otomatis terdownload, dan silahkan tunggu beberapa saat.

Read More