Dear BeExceller,
Hendrik Kamadi

Terima kasih atas informasi dan rumusnya yang ok buanget.
Tolong sekalian cara sembunyikan kolom sesuai kreteria dan penjumlahan yang 
bersyarat dong.
Lampirannya sama.

Terima kasih,


Harry




________________________________
 Dari: hendrik karnadi <[email protected]>
Kepada: "[email protected]" <[email protected]> 
Dikirim: Rabu, 17 Oktober 2012 23:11
Judul: Re: [belajar-excel] Menyembunyikan baris yang bernilai #NUM!
 

  
Coba tulis macro ini pada Sheet VBA,

PadaSheet1Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel 
As Boolean)
    Call SembunyiAh'untuk menyembunyikanbaris yang ada #Num
    Cancel = True
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   
 If Target.Address = "$M$1" Then
        Call BukaAh'untuk membukabaris yang disembunyikan
        Cancel = True
    End If
End Sub


PadaModule1 (insert module terlebih dahulu)
Sub SembunyiAh()
    Dim rng As
 Range
    Set rng = Range("M4", Range("M4").End(xlDown))
    For Each r In rng
        If WorksheetFunction.IsNumber(r) = False Then
            r.EntireRow.Hidden = True
        End If
    Next r
End Sub

Sub BukaAh()
    Dim rng As Range
    Set rng = Columns("M:M")
    rng.EntireRow.Hidden = False
End Sub


Melaksanakan Macro:
- Untuk menyembunyikan baris yang ada #Num cukup doubleclick pada Sheet Aktif 
(di sel mana saja)
- Untuk membuka baris yang disembunyikan cukup klik sel M1

Salam,
Hendrik Karnadi



________________________________
 From: Harry <[email protected]>
To: "[email protected]" <[email protected]> 
Sent: Wednesday, 17 October 2012, 19:39
Subject: [belajar-excel] Menyembunyikan baris yang bernilai #NUM!
 

  
Dear BeExceller,

Mohon bantuan dan solusi akan pertanyaan saya mengenai bagaimana caranya 
menyembunyikan kolom yang diinginkan, menyembunyikan baris yang bernilai #NUM!, 
penjumlahan dengan kreteria,  sebagaima file terlampir.

Terima kasih atas berkenan bantuan dan solusi dari teman-teman BeExceller 
sekalian.

Wassalam,


Harry


 

Kirim email ke