CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

piphans Nybegynder

28. august 2006 - 13:19 Der er 3 kommentarer og
1 løsning

Macro der sletter rækker over og under en given celle med bestemt

Nogen der kan hjælpe mig? Jeg skal bruge en makro der løber igennem et ark

Leder efter celler i kolonne C der indeholder teksten REKV
Sletter rækken samt rækken under og 3rækker over (fem rækker i alt hvor REKV står i fjerde række)

Herefter skal søgning foretages igen indtil der ikke længere er celler med teksten REKV

Synes godt om

excelent Ekspert

28. august 2006 - 14:02 #1

Sub FindTxt()
Dim x
For x = 1 To ActiveSheet.UsedRange.Rows.Count
If Cells(x, 3) = "REKV" Then
Range("C" & x - 3 & ":C" & x + 1).EntireRow.Delete
End If
Next

End Sub

Synes godt om

excelent Ekspert

28. august 2006 - 16:36 #2

hvis ordet REKV ikke er det eneste i cellerne så prøv denne:

Sub xFind()
Dim x
For x = 1 To ActiveSheet.UsedRange.Rows.Count
If Cells(x, 3) Like "*REKV*" Then
Range("C" & x - 3 & ":C" & x + 1).EntireRow.Delete
End If
Next
End Sub

Synes godt om

piphans Nybegynder

29. august 2006 - 15:17 #3

Hvor er det bare godt!

Hvad med lige at smide et svar i stedet for en kommentar. Så har jeg meget nemmere ved at komme af med mine points :O)

Synes godt om

excelent Ekspert

29. august 2006 - 17:15 #4

ok kommer her

Synes godt om

Ny bruger Nybegynder

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.

Følg dette spørgsmål

Opret Preview

Excel kurser

Stort udvalg af Excel kurser til alle niveauer og jobfunktioner

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Vba Array sortering Af Jan Hansen i Excel	2	19/02/202517:39	21/02/202520:03
Fravælge celler til sum Af lurup i Excel	6	19/02/202501:36	19/02/202516:06
Fortsæt i nyt lopslag ved fejl ved det første Af Roland i Excel	3	18/02/202512:58	19/02/202514:51
VBA Excel Af ingeman i Excel	17	12/02/202515:42	14/02/202511:44
Tjekke redigering af delt Excel fil Af cyperbent i Excel	3	06/02/202522:51	08/02/202518:16

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS

21/02

Test: Er du lost et sted uden mobilforbindelse og GPS-dækning? No problem med en HMD OffGrid - og så er den ret billig

21/02

Alt om den prisvenlige iPhone 16E: Så god er den i forhold iPhone 16 og 16 Pro

21/02

Nørgaard: Vi har i Danmmark brug for en grundlæggende militær reform af tre små ting - her er min plan

21/02

Derfor ender dine AI-projekter ofte med at blive for dyre: Tre store udfordringer, som det er svært at tackle

21/02

Tiltrængt nyt til Googles bil-platform: Det vælter ind med nye apps

21/02

Regeringen har sendt brev til den danske it-branche som svar på bekymringer: Og svaret er "stærkt, klart og meget kærkomment," siger branchen

21/02

Gå foråret i møde med et nyt job - her er 10 friske stillinger, som du kan søge netop nu

21/02

En lille håndfuld cloud-leverandører sidder på 64 procent af det globale marked: Omsætter for flere hundrede milliarder kroner

21/02

Efter Gladiator 2: Ridley Scott giver bog nyt liv på storskærmen

21/02

Står til blankt nej til borgerforslag om dansk børneforbud af sociale medier: Nu vil regeringen gå videre

21/02

HP indfører tvungen ventetid på 15 minutter for alle support-opkald

Vis flere artikler

IT-JOB

Netcompany A/S

IT Consultant

Gpv International A/S

Data Engineer

KMD A/S

SAP BW Developer

HT-Prestige

Webudvikler – skab 4 webshops fra bunden

Koda

Bliv proceskonsulent i Kodas Music Data Management team og vær med til at skabe et stærkere musikliv

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

I dag 04:49	LiveTV fra TVboks til Projektor Af Allan i Fjernsyn & projektorer
I går 17:34	PC starter ikke op, sort skærm, ingen BIOS Af jonasbang i PC
I går 15:20	Hvordan får man en "Asus Nuc" i gang Af bjarnebif i PC
I går 13:21	Uønskede nyheder på mobil Samsumg S21 (måske via app?) Af Philip Kuhlmann i Browsere
I går 13:10	USB dongle Af Wombat i Andet hardware