Jeg sidder med en For each løkke der køre over et navngivet range, jeg skal ha fjernet alle rækker der ikke opfylder min if sætning, løkken virker perfekt når jeg bruger følgende:
If Filnavn <> " " Then mycell.EntireRow.ClearContents end if Men bruger jeg .Delete Shift:=xlUp springer min løkke ca hver anden række over. Hvordan for jeg så slettet rækkerne?
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Jeg går ud fra det er Excel? Årsagen er, at når du sletter, bliver dine rækker rykket op, mens din løkke forsætter ned ad (det lød vist lidt underligt... men meningen er god nok)
Der er nok en simpel løsning, men jeg ville nok køre løkken igennem, og ikke slette i løkken, men lave en "Multiple range": Set MultipleRange = Union(MultipleRange , Delrange) således at MultipleRange hele tiden udvides med den række der skal slettes. Uden for løkken kan du så bruge MultipleRange.Delete - tror jeg...
Eller måske simplere: bygge en streng efter dette mønster: delrange="4:4,6:6,10:10"
Range(delrange).Delete Shift:=xlUp
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
