Pelaporan BOS

Pelaporan bos

DOWNLOAD

Posted by Kang Pri 7:54 AM 0 comments

Tombol Print pada Excel

Membuat tombol print pada lembar excel tenyata mudah. sebagai contoh jika kita akan print pada area A1:G5, maka kita tinggal masuk ke VBA dan copy code di bawah ini:

Sub MyPrint()
 curPrtArea = ActiveSheet.PageSetup.PrintArea
  myPrtArea = "A1:G5"
   ActiveSheet.PageSetup.PrintArea = myPrtArea
   ActiveSheet.PrintOut
 ActiveSheet.PageSetup.PrintArea = curPrtArea
End Sub

caranya :

1. pastinya buka excel
2.buatlah sebuah button (pokoke gambar tombol bulat opo persegi monggo)

3.tombol Alt + F11 untuk membuka VBA
4.trus insert module & copas kode diatas (ubahlah sesuai kebutuhan myPrint Area,    pada contoh diatas "A1:G5" )

5.lalu masuk ke excel >> klik kanan gambar button tadi pilihlah assign macro pilih 

    Myprint
6. selesai



silahkan coba fungsi apa nggak

Posted by Kang Pri 1:14 PM 6 comments

KALENDER

Kalender sepanjang masa ..

yang membutuhkan silahkan download 

yang mau untuk download silahkan klik gambar

sumber : http://moeidzahid.site90.net

Posted by Kang Pri 6:35 PM 0 comments

LOGIN EXCEL

monggo belajar lagi VBA login excel

contoh dari download meniko 

Posted by Kang Pri 9:54 AM 0 comments

MEMBUAT FORM LOGIN DAN REGISTER ANGGOTA DI EXCEL

Met pagi sobat blogger, kali ini kami akan share, karena ini hanya copas dari salah satu blog. yaitu dari  https://sites.google.com/site/catetannenden/membuat-form-login-dan-register-anggota-di-excel-versi-2
tujuan kami untuk pelajaran pribadi ataupun bagi rekan-rekan pengunjung mungkin ada yang membutuhkan dapat sama-sama belajar.

Kelebihan dari postingan ini, disesuaikan dari Request beberapa pertanyaan yang masuk, diantaranya :

1. Sheet Password di hide... dan hanya akan muncul satu sheet setiap proses
2. User Mau tidak mau harus melakukan Login...
3. User wajib mensetting security menjadi medium (rekomendasi) atau low (tidak direkomendasikan)..
4. User harus dan wajib Enable Macro.... kalau tidak yach... datanya gak kelihatan...
5. Dan kelebihan terakhir... lebih rapih dikit....he...

Untuk kodenya sendiri... aku taruh di Empat area di jendela visual basic yaitu

1. Area UserFom
2. Area Modeul
3. Area ThisWorkbook
4. Area Worksheet Password Untuk Rumus Fungsinya

Untuk kodenya sendiri bisa dilihat seperti dibawah ini, dan sehubungan postingan ini disempet-sempetin... jadi mohon maaf tidak bisa dijelaskan per baris kodenya....

ini dia kode VBA nya, monggo belajar bareng.....

1. Kode Area UserForm

Option Explicit
Dim sh As Object
Dim ws As Worksheet
Dim isi As Long
Dim Msg, Style, Title, Help, Ctxt, Response, MyString

'Properties ketika Userform aktif
Private Sub UserForm_Activate()
    ThisWorkbook.Application.Calculate
    ThisWorkbook.Sheets("Login").Visible = True
    
    'hanya sheet Login yang tampil
    For Each sh In ThisWorkbook.Worksheets
        If Not sh.Name = "Login" Then sh.Visible = xlSheetHidden
    Next sh
    
    FrmLog.Visible = True
    LogNam.SetFocus
    FrmDaf.Visible = False
    Daftar.Visible = True
    Login.Visible = False
Set sh = Nothing
End Sub
Private Sub Masuk_Click()
ThisWorkbook.Application.Calculate
Set ws = Sheets("Password")

ws.Range("E4") = LogNam.Value
ws.Range("F4") = LogPwd.Value
  
LogNam.Value = ""
LogPwd.Value = ""
LogNam.SetFocus
   
'kondisi jika cell I4, sheet password bernilai true, maka bisa masuk login
If ws.Range("I4").Value = True Then
    Msg = "Nama Anda : " & ws.Range("E4").Value & " ,Password : " & ws.Range("J4").Value
    Style = vbOKCancel + vbDefaultButton1
    Title = "Konfirmasi"
    Response = MsgBox(Msg, Style, Title)
    If Response = vbOK Then
        'kondisi jika cell j4, sheet password, nilainya "Admin" maka hanya sheet admin yg ditampilkan
        If ws.Range("J4").Value = "Admin" Then
            ThisWorkbook.Sheets("Admin").Visible = True
            For Each sh In ThisWorkbook.Worksheets
                If Not sh.Name = "Admin" Then sh.Visible = xlSheetHidden
            Next sh
            Me.Hide
        Else
            ' selain itu sheet user yang tampil
            ThisWorkbook.Sheets("User").Visible = True
            For Each sh In ThisWorkbook.Worksheets
                If Not sh.Name = "User" Then sh.Visible = xlSheetHidden
            Next sh
            Me.Hide
        End If
    End If
Else
'jika login salah maka akan muncul pesan dibawah ini
    MsgBox "Nama Ama password salah... Kalau belum termasuk Anggota silahkan Daftar"
End If
Set ws = Nothing
Set Response = Nothing
End Sub
Private Sub Daftar_Click()
'kondisi jika melakukan pendaftarn maka fram Login tidak tampil
FrmDaf.Visible = True
FrmLog.Visible = False
    With Status
        .AddItem "User"
        .AddItem "Admin"
    End With
Login.Visible = True
Daftar.Visible = False
End Sub
Private Sub Login_Click()
FrmLog.Visible = True
FrmDaf.Visible = False
Daftar.Visible = True
Login.Visible = False
End Sub

Private Sub Tambah_Click()
ThisWorkbook.Application.Calculate
Set ws = Sheets("Password")
'mencari cell di kolom B yang kosong
isi = ws.Cells(Rows.Count, 2).End(xlUp).Offset(1, 0).Row

'kondisi jika form pendaftaran kosong akan muncul message
If DafNam.Value = "" Or DafPwd.Value = "" Or Status.Value = "" Then
    MsgBox "Data harus diisi semua"
    DafNam.Value = ""
    DafPwd.Value = ""
    Status.Value = ""
    DafNam.SetFocus
Else
    'kalau form tidak kosong maka datanya akan di masukkan ke cell di kolom B, C, D yang kosong
    ws.Cells(isi, 2).Value = DafNam.Value
    ws.Cells(isi, 3).Value = DafPwd.Value
    ws.Cells(isi, 4).Value = Status.Value

    'untuk menghindari supaya tidak ada data user dan password yang sama
    If ws.Range("N4").Value > 1 Then
        MsgBox "Data sudah ada coba cari yang lain"
        ws.Range(ws.Cells(isi, 2), ws.Cells(isi, 4)).ClearContents
        DafNam.Value = ""
        DafPwd.Value = ""
        Status.Value = ""
        DafNam.SetFocus
    Else
        Msg = "Nama Anda : " & DafNam.Value & " ,Password : " & DafPwd.Value & " , Coba Login"
        Style = vbOKCancel + vbDefaultButton1
        Title = "Konfirmasi"
        Response = MsgBox(Msg, Style, Title)
            If Response = vbOK Then
                FrmDaf.Visible = False
                FrmLog.Visible = True
                LogNam.SetFocus
            Else
                ws.Range(ws.Cells(isi, 2), ws.Cells(isi, 4)).ClearContents
                DafNam.Value = ""
                DafPwd.Value = ""
                Status.Value = ""
                DafNam.SetFocus
            End If
    End If
End If
Set ws = Nothing
End Sub

Private Sub FrmDaf_Layout()
    DafNam.Value = ""
    DafPwd.Value = ""
    Status.Value = ""
End Sub
'kondisi untuk menonaktifkan icon Close "X"
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If CloseMode = vbFormControlMenu Then
        Cancel = True
        MsgBox "Maaf ya... harus login dulu"
    End If
End Sub

2. Untuk kode Area Modul bisa dilihat dibawah ini 
Fungsi dari kode di Area Modul ini adalah untuk mengembalikan ke proses Login Kembali.

Option Explicit
Dim sh As Object

Sub AutoShape1_Click()
ThisWorkbook.Sheets("Login").Visible = True
   'hanya sheet Login yang tampil
    For Each sh In ThisWorkbook.Worksheets
        If Not sh.Name = "Login" Then sh.Visible = xlSheetHidden
    Next sh
UserForm1.Show
End Sub

3. Untuk kode Area Thisworkbook bisa dilihat dibawah ini 
Fungsi dari kode di Area Thisworkbook adalah mengatur supaya User harus melakukan enable macro dan loading userform ketika workbook dibuka.

Option Explicit
Dim sh As Object
'proses untuk disable macro
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.ScreenUpdating = False
    ThisWorkbook.Worksheets("Peringatan").Visible = xlSheetVisible
    
        For Each sh In ThisWorkbook.Worksheets
            If Not sh.Name = "Peringatan" Then sh.Visible = xlSheetVeryHidden
        Next sh
    
    Application.DisplayAlerts = False
    ActiveWorkbook.Save
    Application.DisplayAlerts = True
End Sub
'proses untuk enable macro
Private Sub Workbook_Open()
    Application.ScreenUpdating = True
        For Each sh In ThisWorkbook.Worksheets
            If Not sh.Name = "Peringatan" Then sh.Visible = xlSheetVisible
        Next sh
    
    ThisWorkbook.Worksheets("Peringatan").Visible = xlSheetVeryHidden
    UserForm1.Show
End Sub

Nach begitulah kiranya... postingan ini berakhir...

sobat bloger juga bisa langsung download file excel nya disini


thanks to : https://sites.google.com/site/catetannenden/membuat-form-login-dan-register-anggota-di-excel-versi-2

Posted by Kang Pri 8:11 AM 0 comments

Tombol Print Pada Excel

Sekedar catatan, tappi yang berminat monggo belajar bareng. kali ini tentang membuat tombol print pada excel. ceritanya mau buat prin-prinan yang mudah sederhana dan cepat. tapi setelah googling kemana-mana, dan berjumpa dengan berbagai artikel. aku coba tapi tetap gagal, namun he..he.. gak boleh patah semangat, kan belajat itu dimanapun, dan kapanpun tidak ada kata terlambat.

akhir cerita ni aku dapat alamat website yang cocok dengan angan-anganku 

disini lah http://www.get-digital-help.com/2010/12/10/excel-vba-create-a-print-button/

ini scrensot percobaanku

mungkin teman bloger yang juga punya minat. mongo belajar bareng

Caranya gini :

Buat tombol (Form Control)

1. Buka File excelnya
2. Klik tab "Developer" pada pita
3. Klik tombol "Insert"
4. Klik Button (Form Control)
5. Buat tombol "Print Faktur"

Buat makro

1. Tekan Alt-F11 untuk membuka Editor visual basic
2. Klik Modul pada menu Insert
3. Copy dan paste "Sub Macro1" kode di bawah ini ke dalam modul

Sub Macro1 ()
  Application.Dialogs (xlDialogPrint). Tampilkan
End Sub

selamat belajar...

semoga bermanfaat.

Posted by Kang Pri 9:15 PM 0 comments

Kumpulan Fungsi Excel

Selamat Sore sobat blogger kali ini aku akan share kumpulan fungsi excel.

atau kamus fungsi excel. kalo nama asli dari sono nya Excel Function Dictionary disingkat xlfdic

ini screnshotnya

nah yang berminat silahkan download aja disini

atau bisa juga langsung ke website aslinya di sini

setelah download silahkan extrak file nya, disitu nanti kita tinggal klik aja karena sudah dibuat link-link tipe fungsi sekaligus contoh kasusnya.

selamat belajar.....

semoga bermanfaat

Posted by Kang Pri 7:05 PM 0 comments

Memfilter table pada Excel

Beberapa bulan lalu Saya mendapatkan informasi tentang sebuah program dashboard yang terintegrasi dengan SAP bernama XCelsius (sekarang telah dibeli SAP).

http://www.sap.com/solutions/sapbusinessobjects/sme/xcelsius/index.epx

Setelah membaca informasinya Saya lihat program XCelsius ini ternyata cukup gampang dalam pengoperasiannya, user dengan pengetahuan yang memadai pada Excel dapat menggunakannya dengan mudah. Kemudahan ini dikarenakan XCelsius dapat membaca fungsi-fungsi dari excel. Hasil dari XCelsius adalah sebuah file flash (*.SWF).

Selama trial 15 hari, Saya mencoba untuk melihat sejauh apa program ini bisa menangani data yang besar. Ternyata agak sulit juga bila data yang disajikan banyak, saya mencoba memasukkan data sebanyak 4000 baris, ternyata XCelsius menjadi tidak dapat loading. Memang sih waktu dimasukkan 4000 data XCelsius ada ngomel-ngomel karena data yang dimasukkan kebanyakan (standar mereka 512 records).

Selama uji coba tersebut, Saya mendapatkan satu rumus untuk memfilter records. Filter ini bekerja mirip seperti autofilter pada Excel, hanya saja memakai rumus. Kenapa tidak memakai autofilter? Karena XCelsius tidak dapat memanfaatkan fasilitas tersebut pada Excel.

Berikut ini adalah cara autofilter dengan menggunakan rumus pada Excel :

1. Buat sebuah Sheet kosong dan isi dengan 4 data seperti dibawah ini :
   
2. Sekarang Kita ingin menfilter data tersebut sehingga hanya golongan darah yang kita inginkan yang muncul. Hasil yang diinginkan adalah seperti pada gambar dibawah ini (kita mencari golongan darah A):

1. Kolom G1 memuat data golongan darah yang dicari (“A” dalam kasus ini). Kolom F4 sampai G8 menampilkan hasilnya. Nah Kolom D4 sampai E8 adalah kolom untuk membantu mendapatkan hasilnya. Sekarang Saya akan menunjukkan bagaimana kolom D4:E8 bekerja.
2. Pertama-tama klik cell D5, dan masukkan rumus ini : “=MATCH($G$1;$B$2:$B$7;0)”. Rumus ini berupaya mencari kata “A” dalam range B2 sampai B7. Hasilnya adalah cell pertama dalam range tersebut yaitu B2, maka nilai akhir dari perhitungan ini adalah “1″. Kenapa hasil perhitungan bukan “2″? Karena range dimulai dari B2 bukan B1.
3. Kedua klik cell E1 dan masukan rumus ini : “=D5″. Hasilnya pasti satu juga karena cell ini hanya menjiplak. Fungsi cell ini akan saya terangkan kemudian
4. Ketiga, pada cell D6 akan dibuat seperti D5 (step 4 diatas) hanya saja sekarang rangenya harus mulai dari satu titik setelah nilai A terakhir kali ditemukan. Nilai A ditemukan pada cell B2 maka rumus harus mulai dari cell B3. Untuk ini, kita akan memanfaatkan fungsi powerful excel yaitu INDEX(). Pada cell D6 ketiklah : “=MATCH($G$1;INDEX($B$2:$B$7;E5+1;1):$B$7;0)”
   Cara kerjanya adalah sebagai berikut :
   awalnya kita memiliki fungsi “=MATCH($G$1;INDEX($B$2:$B$7;E5+1;1):$B$7;0)”, fungsi INDEX($B$2:$B$7;E5+1;1) akan mengembalikan referensi “B3″ karena Saya memberikan perintah “Tolong ambil nilai dari kolom ke satu, baris ke E5 + 1 (hasilnya 2) dari range B2 sampai B7″. Baris ke 2 dan kolom pertama dari range “B2:B7″ adalah “B3″! Hasil hari INDEX adalah sebagai berikut :
   “=MATCH($G$1;$B$3:$B$7;0)” Function index telah diterjemahkan sebagai “B3″, Hasil dari fungsi match adalah 2 karena kata “A” berikutnya ada pada baris ke “2″ dari range “B3:B7″
5. Keempat, Klik cell “E6″ dan masukkan fungsi berikut : “=E5+D6″. Fungsi ini mengakibatkan kita selalu tahu kapan terakhir kali huruf A ditemukan.
6. Klik pada kolom D6 dan tempatkan cursor pada sudut kanan bawah sehingga menjadi cursor hitam. Klik dan geser cursor hitam sehingga mencapai D8. Lakukan hal yang sama dengan cell E6 (klik dan geser cursor hitam ke E8). Ini adalah screen shot hasil sementara yang diperoleh:
   
7. Lihatlah kolom E5:E8, kolom tersebut sekarang berisi infomasi posisi huruf A pada tabel data  . Sekarang kita hanya perlu membuat fungsi terakhir untuk membaca data. Pada cell F5 tuliskan rumus berikut : “=INDEX($A$2:$B$7;E5;1)”
   Rumus =INDEX($A$2:$B$7;E5;1) berarti : “Dari range A2 sampai B7 ambillah nilai dari cell yang berada pada baris ke 1 (karena nilai cell E5 adalah 1) dan kolom ke 1″
8. Pada cell G5 ketikkan =INDEX($A$2:$B$7;E5;2). Fungsinya seperti kolom F5 hanya saja sekarang kolom kedua yang dipilih.
9. Klik cell F5 dan tempatkan cursor pada sudut kanan bawah cell sehingga berubah menjadi cursor hitam. Click and Drag ke F8. Lakukan hal yang sama dengan G5 (click and drag ke G8). Hasil akhirnya adalah sebagai berikut :
   

Sekarang kita telah mempunyai satu table filter. Bila ingin menghilangkan #N/A gunakan rumus ISNA(). Misalkan pada cell F5 : =IF(ISNA(D5);”";INDEX($A$2:$B$7;E5;1))

sumber : http://pandarion.wordpress.com/2009/02/09/memfilter-table-pada-excel/

Posted by Kang Pri 11:52 AM 1 comments

Filter Data Berdasarkan Kriteria

Untuk melakukan Filter data pada Excel dapat dilakukan dengan berbagai macam cara, salah satu cara yang paling umum digunakan adalah dengan menggunakan fitur Filter atau Advanced Filter yang dapat diakses melalui ribbon Data ==> tab Sort & Filter ==> klik Filter atau Advanced Filter, seperti gambar di bawah ini:

Tetapi bukan cara tersebut yang akan dibahas pada posting kali ini, posting kali ini akan membahas mengenai cara melakukan filter data berdasarkan suatu kriteria tertentu, dalam pembahasan kali ini hanya akan menggunakan 1 buah kriteria tetapi nanti juga akan dijelaskan bagaimana melakukan filter dengan kriteria lebih dari 1 (multiple kriteria).

Data yang akan difilter terdiri dari 3 kolom yaitu: Nomer, Kategori, dan Keterangan seperti gambar di bawah ini:

Tujuan yang ingin dicapai adalah membuat daftar berdasarkan kategori pada kolom B.

Untuk menyelesaikan kasus ini, setidaknya ada 6 cara yang saya ketahui selain dengan memanfaatkan fitur Advanced Filter bawaan dari Excel.

Misal kriteria ada di cell F1 lalu akan dibuat daftar/list pada cell F4 ke bawah berdasarkan kriteria berupa Vowel atau Consonant, maka untuk solusinya harus dibuat sebuah kolom bantu di cell E4 sampai E27 untuk mendapatkan letak baris data yang sesuai dengan kriteria yang telah ditentukan.

Kolom bantu dibuat dengan cara:

1. Melakukan blok mulai dari cell E4 sampai dengan cell E27
2. Pada formula bar diketik formula berikut ini: =Small(If(B2:B27=F1;A2:A27);A2:A27)
3. Tekan 3 tombol berikut ini: CTRL Shift Enter sehingga akan muncul tanda kurung kurawal di awal dan akhir formula

Hasil akhir dari formula ini  adalah sebuah Array Data yang tersusun dari atas ke bawah.
Perhatian, tanda pemisah yang saya gunakan adalah titik koma karena regional setting di komputer saya adalah Indonesia, jika anda menggunakan regional setting English maka ubah setiap titik koma di atas menjadi koma.

Alur logika dari formula di atas adalah:
Dari formula yang paling dalam:
If(kriteria , data_jika_kriteria_bernilai_TRUE, data_jika_kriteria_bernilai_FALSE)
jika formula If di atas dimasukkan ke dalam blok warna maka akan menjadi seperti berikut:
If(B2:B27=F1;A2:A27)
perhatikan bahwa nomor data hanya diambil jika kriteria bernilai TRUE, sedangkan jika bernilai FALSE akan diabaikan.
Jika ingin membuat filter data berdasarkan banyak kriteria, maka lakukan modifikasi pada kriteria, conrohnya adalah sebagai berikut:

If((kriteria_1) * (kriteria_2) * (kriteria_3) * (kriteria_4) *(kriteria_n) , data_jika_kriteria_bernilai_TRUE , data_jika_kriteria_bernilai_FALSE)

Tanda * adalah pengganti fungsi AND yang setara dengan perkalian pada Excel.

Sedangkan formula yang paling luar berfungsi untuk menyusun hasil secara Ascending, jika ingin disusun hasil secara Descending maka ubah fungsi Small dengan fungsi Large.
syntax dari Small adalah:
Small(Array , jumlah_data_terkecil)

Mungkin para pembaca ada yang belum paham dengan Array Formula yang digunakan di atas, Array formula adalah formula yang menghasilkan nilai lebih dari 1, untuk membentuk suatu formula menjadi Array harus dengan cara menekan 3 tombol yaitu CTRL Shift Enter sehingga Array Formula juga sering disebut sebagai CSE Formula. Lalu kenapa harus menggunakan Array Formula? Jawabannya karena dalam kasus ini ingin dibuat sebuah daftar dari suatu kriteria tertentu, dan proses membandingkan kriteria di dalam fungsi IF adalah melakukan perbandingan satu data terhadap banyak data, oleh sebab itu dibutuhkan Array Formula.

Setelah diperoleh nomor urut data yang sesuai berdasarkan kriteria, maka untuk mengambil nilai datanya dapat digunakan cara-cara berikut ini:

1. LookUp, formulanya adalah : LookUp(E4;$A$2:$A$27;$C$2:$C$27)
2. VLookUp, formulanya adalah VLookUp(E4;$A$2:$C$27;3;0)
3. Index, formulanya adalah Index($C$2:$C$27;E4)
4. OffSet, formulanya adalah OffSet($C$1;E4;0)

Untuk Error trapnya pada Excel versi 2007 ke atas bisa menggunakan IfError sedangkan pada versi 2003 ke bawah bisa mengginakan IsErr.

Cara ke-5 adalah dengan memanfaatkan fitur Pivot Table
Cara ke-6 adalah menggunakan VBA (Visual Basic for Application)

Script VBA ditulis dalam sebuah modul VBE adalah dan dipanggil dengan cara menekan sebuah shape (tombol) :


Option Explicit

' -------------------------- '
'  Filter Data dengan VBA    '
'  Code by : Dwint Ruswanto  '
'  25 Desemeber 2012         '
' -------------------------- '

Sub FilterData()                                                  
    Dim HdKrit As Range, Rng As Range, cRg As Range             
    Dim Krit As String                                          
    Dim IdxRow As Long                                          
    
    Krit = Range("f1").Value                                    
    Range(Cells(4, 12), Cells(Rows.Count, 12)).ClearContents    
    Set HdKrit = Range("b1")                                
    Set Rng = Range(HdKrit.Offset(1, 0), HdKrit.End(xlDown))
    For Each cRg In Rng                                   
        If cRg = Krit Then                              
            IdxRow = Cells(Rows.Count, 12).End(xlUp).Row + 1   
            Cells(IdxRow, 12).Value = cRg.Offset(0, 1).Value   
        End If                                            
    Next cRg                                       
End Sub                                            

Pembahasan lebih detail mengenai masing-masing fungsi di atas, Pivot Table, dan VBA insya ALLAH akan saya tuliskan dalam suatu postingan yang lain.

File sampel dapat diunduh pada link berikut ini https://www.box.com/s/xa57ld0e7t0w6c2bn51x

sumber : http://excel-vba-dwint.blogspot.com/2012/12/filter-data-berdasarkan-kriteria.html

Posted by Kang Pri 11:39 AM 0 comments

LATIHAN

latihan kang....
bisa dibuka disini

Posted by Kang Pri 11:09 AM 0 comments

Kalender pendidikan

Kalender Pendidikan 2012-2013

Bagi bapak ibu guru ataupun admin sekolah bila memerlukan kalender pendidikan, ini admin akan share.
Silahkan download bila diperlukan disini

Posted by Kang Pri 10:21 AM 0 comments

SETTING HALAMAN PERTAMA PADA EXCEL

Ini adalah pengalamanku waktu aku ngetik sebuah laporan untuk RAT salah satu koperasi di kampungku. Karena aku ngetik pakai Ms. Word dan Excel dan itu nanti harus di jilid jadi satu, eh waktu mau ngasih nomor halaman la kok malah bingung, kalao di Ms.Word kan mudah aja kalo di Excel belum ngerti, maklumlah nggak pernah makan sekolahan langsung aja aku googling sana-sini eh nemu caranya. he..he.. langsung aja ya kang. gini caranya

gini langkahnya :

1. buka Ms.Excel tentunya
2. klik pada page layout
3. klik bgian pojok kanan bawah
4. setelah muncul jendela page setup pada bagian bawah ada tulisan first page number ganti auto dengan  nomor yang kita inginkan
5. dan tentunya klik oke.

selanjutnya tinggal di insert page number aja, udah tau kan...


gitu deh!!!
moga bermanfaat..

Posted by Kang Pri 9:58 AM 0 comments