met vba verbergen

idrmer · #1 3 februari 2012, 20:05

Goededag mensen,
een vraag hoe kan ik met vba rijen verbergen die een waarde hebben en die leeg zijn.
Dus als een selectie rij een waarde heeft dan verbergen, deze waarden kunnen op verschillende rijen staan.
En als een rij geen waarden heeft dan ook verbergen. Maar ook alles weer tonen.
mvg Jan

john1713 · #2 3 februari 2012, 20:37

Jan,

kan je geen filter gebruiken (aangepaste filter)?

John

RedHead · #3 3 februari 2012, 20:53

idrmer, Als je zelf je vraag na leest, snap je die dan? Als ik 'm lees, begrijp IK namelijk dat je een leeg blad wilt hebben. Dus volkomen zonder regels.

Citaat:

Oorspronkelijk geplaatst door idrmer

kan ik met vba rijen verbergen die een waarde hebben en die leeg zijn

...dan blijft er naar mijn gevoel verdomd weinig over.

Wat wil je dus precies?

Groet, Leo

RedHead · #4 3 februari 2012, 20:59

...en dan is deze code prima aansluitend bij die vraag...

Code:

Sub VerbergEnToon()

    Cells.EntireRow.Hidden = Cells.EntireRow.Hidden = False

End Sub

Groet, Leo

idrmer · #5 4 februari 2012, 19:43

Hoi, ik heb het niet goed uitgelegd.
De wens is als er in een regel bv de waarde 1 staat dan met met vba verbergen.
De regel met de waarde 2 laten staan.
Anders als er in een andere regel de waarde 2 staat dan verbergen en de regels met de waarde 1 weer tonen. En ook zo andersom.
Als het kan over 100 regels.

mvg Jan

trucker10 · #6 5 februari 2012, 00:02

Met een voorbeeldje van U uit zou het duidelijker zijn wat je juist wil
bv hier :

Citaat:

in een regel bv de waarde 1 staat

bij Excel is dat een kolom en een rij >> staat in kolom 1 (A) rij 13 .

Dan deze :

Citaat:

er in een andere regel de waarde 2 staat

is dat in dezelfde kolom ? of zoeken we dat ergens anders ?
moet alles ook zichtbaar zijn of is het een wissel 1 / 2 .

mvw · #7 5 februari 2012, 09:05

Bedoel je het zo ?

trucker10 · #8 5 februari 2012, 10:13

mvw , zonder een bepaalde range ( de gebruikte range )

Code:

 UsedRange.EntireRow.Hidden = False
    Dim cel As Range
    For Each cel In UsedRange
    If cel = 1 Then
    cel.EntireRow.Hidden = True
End If
    Next cel

alles terug

Code:

 UsedRange.EntireRow.Hidden = False

idrmer · #9 5 februari 2012, 12:07

Bedankt mensen voor Uw hulp, het werkt.
Maar ik kom een probleem tegen, door deze manier van selecteren.
De rijen verbergen werkt goed, maar de selectie zou een bereik moet zijn met waardes groter dan 0
Bv
knop 1 A30:I50. groter dan 0, of een waarde, bv A dan rijen verbergen.

knop 2 J30:M30 groter dan 0, of een waarde bv A, dan rijen zichtbaar van A30:I50 en J30:M30 rijen verbergen.

knop 3 alles zichtbaar maken.

Ik heb getracht om de vba aan te passen maar dan werkt ie niet meer.

mvg Jan

trucker10 · #10 5 februari 2012, 13:20

Citaat:

Oorspronkelijk geplaatst door idrmer

Ik heb getracht om de vba aan te passen maar dan werkt ie niet meer.

Je hebt getracht om de VBA aan te passen naar werkt niet meer , maar toch geef je het bestandje van mvw als voorbeeld

als wij deze nu gaan aanpassen en jij moet nadien het in jouw bestandje terug overzetten krijgen wij terug de vraag van het werkt niet .
Plaats jouw afgeleid voorbeeldje ( wil zeggen zonder gevoelige informatie ) maar strookt met de werkelijkheid .

Edit: je zou ook de macro die jij hebt gemaakt kunnen posten , zien we in welke richting je verkeerd gaat

Discussietools
Printversie tonen Deze pagina e-mailen
Weergave
Lineaire weergave Switchen naar hybride weergave Switchen naar vertakte weergave

Soortgelijke discussies
Discussie	Auteur	Forum	Reacties	Laatste bericht
Rij verbergen	leonpard	Afgehandelde vragen	5	10 juni 2011 17:15
Voorwaardelijk #N/B verbergen	Djosjowa	Afgehandelde vragen	6	31 mei 2010 19:24
#N/B verbergen	Aartk	Afgehandelde vragen	3	26 februari 2010 13:41
Verbergen VBA	willem tilburgs	Afgehandelde vragen	2	11 februari 2009 13:57
rij verbergen	jolpet	Afgehandelde vragen	10	15 oktober 2008 21:26