Hot Fox: Re: ]] XL-mania [[ Menghide row dengan kondisi tertentu

sábado, 24 de outubro de 2009

Re: ]] XL-mania [[ Menghide row dengan kondisi tertentu

Om om Kodingannya :

Option Explicit

Private Sub Worksheet_Activate()

      Dim BarisHilang&, rBaris As Range, rBarisValue&

      ' Set Baris Pertama dan Terakhir yang akan dihilangkan
      ' => Baris 2
      Const BarisPertama As Long = 2
      Const BarisTerakhir As Long = 2

      ' Set Kolom Yang Mengandung Data
      ' = > Kolom A dan B
      Const KolomPertama As String = "A"
      Const KolomTerakhir As String = "B"

      ActiveWindow.DisplayZeros = False
      Application.ScreenUpdating = False

      For BarisHilang = BarisPertama To BarisTerakhir

            'Kolom A dan B
            Set rBaris = Range(KolomPertama & BarisHilang & _
                                 ":" & KolomTerakhir & BarisHilang)

            'Jumlahkan data yang ada di rows
            rBarisValue = Application.Sum(rBaris.Value)

            If rBarisValue <> 0 Then
                  Rows(BarisHilang).EntireRow.Hidden = False
            Else
                  Rows(BarisHilang).EntireRow.Hidden = True
            End If

      Next BarisHilang

      Application.ScreenUpdating = True

End Sub

File Terlampir oom
- ^ Puthut Wibowo ^ - || puthut_vai@yahoo.com

--- On Fri, 10/23/09, Fajri <fajri619@gmail.com> wrote:

From: Fajri <fajri619@gmail.com>
Subject: ]] XL-mania [[ Menghide row dengan kondisi tertentu
To: XL-mania@yahoogroups.com
Date: Friday, October 23, 2009, 5:20 PM

Hi All,

Bagaimana caranya agar ketika kondisi tertentu terjadi, baris yang bersangkutan menjadi tersembunyi.

Misalkan jika cell A2 kosong dan cell B2 sama dengan 0 (nol) atau kosong maka baris ke-2 itu menjadi tersembunyi.

Begitu juga baris2 lainnya, jika cell Ax kosong dan cell Bx sama dengan nol atau kosong, maka baris ke-x menjadi hide.

Tetapi, kondisi itu hanya sampai baris tertentu, misalkan hanya sampai baris ke 30.

Artinya jika cell A31 kosong, dan cell B31 sama dengan 0 (nol) atau kosong, maka baris ke-31 tetap terlihat.

Saya buat macronya, pakai IF … THEN … tapi, malah jadi hang L

Mohon bantuannya yach.

Regards,

SF

__._,_.___

Messages in this topic (10) Reply (via web post) | Start a new topic

Messages

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Moderasi akan lambat minggu ini, momods pergi ke tempat jauh      |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message, melecehkan, tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan winzip jika perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau... |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id] |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+

Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch format to Traditional
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___

Nenhum comentário:

Postar um comentário

Hot Fox

sábado, 24 de outubro de 2009

Re: ]] XL-mania [[ Menghide row dengan kondisi tertentu

Nenhum comentário:

Arquivo do blog