-
Items
17 -
Registratiedatum
-
Laatst bezocht
Reputatie-activiteit
-
Piene gaf reputatiepunten aan Haije in Rij knippen en plakken in ander werkblad en de lege rij deleten
Voeg de regel c.EntireRow.Delete toe aan je macro:
Sub RijenKnippenPlakken() Dim bottomL As Integer bottomL = Sheets("blad1").Range("I" & Rows.Count).End(xlUp).Row Dim c As Range For Each c In Sheets("blad1").Range("I1:I" & bottomL) If c.Value = "Ok" Then c.EntireRow.Cut Worksheets("blad2").Range("A" & Rows.Count).End(xlUp).Offset(1) c.EntireRow.Delete End If Next c End Sub
-
Piene gaf reputatiepunten aan alpha in Rij knippen en plakken in ander werkblad en de lege rij deleten
Gebruik in de macro in plaats van
c.EntireRow.Cut ..... dit: c.EntireRow.Copy .... -
Piene gaf reputatiepunten aan JeanPaul28 in Gegevens aan een van de vijf categorieën toewijzen
Na veel puzzel werk heb ik er dit van gemaakt
Kopie van oefening stapelen.xlsm
-
Piene gaf reputatiepunten aan plongske in drie plaatsen met meeste prioriteit bepalen bij gegevens met gelijke waarden
Waarom worden die gewichten zo hoog ingesteld, deze zijn toch maar om de prioriteiten in te stellen?
Als tegen gewicht kan je de aantallen ook uitvergroten in die hulp kollom
pas even de formule van de hulpkolom aan.
-
Piene gaf reputatiepunten aan plongske in drie plaatsen met meeste prioriteit bepalen bij gegevens met gelijke waarden
Kijk even naar de functie SMALL. Daar wordt de kleinste waarde bepaald door de ROW functie.
In het voorbeeld start je op rij 4
Dus kleinste van rij 4-3 =1
Dus als je rijen bovenaan toevoegt zal je de -3 moeten aanpassen naargelang je rijen toevoegt.
Je moet ervoor zorgen dat in de bovenste formule (prio 1) via de SMALL functie op 1 komt te staan en dan doorslepen naar onder tot prio 3