GoldenLine
Zaloguj się
Damian Poźniak

Damian Poźniak Właściciel, Datech
Systemy i Sieci
Komputerowe

Temat: Makro ukrywające wiersze w zależności od sumy komórek

Witam,
uczę się intensywnie póki co excela, ale tymczasem pojawiła się potrzeba wykorzystania makra, a tutaj nieco już kiepściej.

Otóż bardzo proszę o wsparcie w stworzeniu makra, które w arkuszu chowało by wiersze (np. od 10 do 500 wiersza, w których suma komórek z kolumn np. od D do G jest równa 0.

dziękuję i pozdrawiam
Damian
Link do wypowiedziLink
Oskar Shon

Oskar Shon Dodatki do Office
www.VBATools.pl

Temat: Makro ukrywające wiersze w zależności od sumy komórek

Proszę załączyć link do przykładowego pliku.
Na poziomie opisu nie można dojść do tego w jakich warunkach ma działać kod.
Link do wypowiedziLink
Adam Pieprzyca

Adam Pieprzyca Młodszy specjalista
ds. planowania
obsad, R. R.
Donnelley...

Temat: Makro ukrywające wiersze w zależności od sumy komórek

Najprościej, to chyba takie makro pomoże:

Sub Ukrywanie()

For i = 10 To 500
If Cells(i, 4) + Cells(i, 5) + Cells(i, 6) + Cells(i, 7) = 0 Then
Rows(i).Hidden = True
End If
Next i

End Sub
Link do wypowiedziLink
Marcin S.

Marcin S. analityk

Temat: Makro ukrywające wiersze w zależności od sumy komórek

Nieco tylko mniej prosto, za to bardziej elastycznie;


Sub Ukrywanie_wierszy()

Dim rng As Range, cl As Range

Dim dV As Double



If TypeName(Selection) <> "Range" Then Exit Sub



dV = Application.InputBox("Ukryj mniejsze niż: ", Type:=1)

Set rng = Intersect(Selection, ActiveSheet.UsedRange)



For Each cl In rng

    If IsNumeric(cl.Value) Then

        If cl.Value < dV Then cl.Rows.Hidden = True

    End If

Next cl



End Sub


Zaznaczasz kolumnę z interesującymi Cię danymi, odpalasz makro, w okienku wpisujesz wartość, od której ma ukrywać wiersze.
Link do wypowiedziLink
Damian Zurawski

Damian Zurawski Data Engineer w
Grupie Żywiec

Temat: Makro ukrywające wiersze w zależności od sumy komórek

Najłatwiej chyba byłoby użyć zwykłego filtra, aczkolwiek może potrzebne jest właśnie makro.
Link do wypowiedziLink
Oskar Shon

Oskar Shon Dodatki do Office
www.VBATools.pl

Temat: Makro ukrywające wiersze w zależności od sumy komórek

Abstrahując od słów Damiana.
Efektywniej jest ukryć wszystko a odkrywać tylko te, które spełniają warunek.
Link do wypowiedziLink
Marcin S.

Marcin S. analityk

Temat: Makro ukrywające wiersze w zależności od sumy komórek

Damian Z.:
Najłatwiej chyba byłoby użyć zwykłego filtra, aczkolwiek może potrzebne jest właśnie makro.

O ile dane mają charakter tabeli, nie ma przerw w kolumnach. Tego przecież nie wiemy.
Link do wypowiedziLink
« Wróć do tematów
Odpowiedz

Podobne tematy





Wyślij zaproszenie do
Anuluj