Avatar billede Slettet bruger
27. februar 2008 - 08:35 Der er 4 kommentarer og
1 løsning

Flyt de farvede indførsler i XP og office2003

JEg har et regneark, hvor mange er fede og blå.
De fede, blå skal flyttes over i et ark for sig selv, og jeg har forsøgt med søg og erstat: format blå. Kan godt markere alle de blå, og slette dem, men ikke flytte til nyt ark.
Her er nogle få af dem, men uden formatering - hvis du hjælper kan de jo kopieres over i dit eget regneark.
18-09-07    500    Pernille
12-09-07    500    Rasmus
04-02-08    250    Saif
04-02-08    250    Sana
19-09-07    500    Sara Johanne 
06-02-08    250    Sarah
10-10-07    500    Sarah
26-09-07    500    Sarah Aviaja
12-09-07    500    Sertac
30-01-08    250    Sidse
14-09-07    500    Sidsel
23-01-08    250    Sidsel
15-01-08    250    Sidsel
13-02-08    250    Signe
21-01-08    250    Silje
Avatar billede Slettet bruger
27. februar 2008 - 08:37 #1
jeg har kigget på sortering, men der kan jeg jo kun sortere på kolonnerne, ikke på formater
Avatar billede jkrons Professor
27. februar 2008 - 21:32 #2
Prøv denne nmakro, men gør det i en kopi først :-)

Makroen kopierer alel data fra Ark1 til Ark2 og sletter derefter alle rækker i Ark2, hvor teksten er blå.

Sub SletBlaa()
    Sheets(1).UsedRange.Copy
    Sheets(2).Select
    ActiveSheet.Paste
    For Each c In Range("a1:a20").Cells
        If c.Font.ColorIndex = 5 Then
            c.EntireRow.Delete
        End If
    Next c
End Sub
Avatar billede mrjh Novice
27. februar 2008 - 21:43 #3
Lidt for sent, men nu poster jeg den alligevel.
Aflæser farven i A1 og flytter tilsvarende rækker med formatet over i Ark 2



Sub flyt_markerede()

Farve = Range("A1").Interior.ColorIndex

For Each cell In Worksheets("Ark1").Range("A10:A1000")
    If cell.Font.Bold And _
    cell.Interior.ColorIndex = Farve Then
        cell.EntireRow.Cut _
        Worksheets("Ark2").Range("A" & cell.Row)
    End If
Next cell

End Sub
Avatar billede Slettet bruger
16. marts 2008 - 18:38 #4
Kære jkrons og mrjh Tak for svar og tilgv at JEG læser dem så sent. Læg et svar, så får krons points. Hvordan jeg deler points ud til flere har jeg glemt fra gang til gang.
Avatar billede Slettet bruger
18. juni 2008 - 16:34 #5
ingen svar - jeg lukker
Avatar billede 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.

Loading billede Opret Preview
Kategori
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

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