CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede simulu Juniormester
08. juni 2013 - 15:27 Der er 8 kommentarer og
1 løsning

Fjerne cellemarkering ved overskrivning

Hej

Jeg har nogle jobs med tilhørende datoer fra 2012 i celle F7:F17.

Datoerne i F7:F17 skal jeg overskrive i løbet af 2013.
For overskuelighedens skyld kunne jeg tænke mig, at dem, jeg IKKE har overskrevet endnu, var markeret f.eks. med rødt eller med fed eller cellen var farvet.
Dvs. når jeg så overskriver værdien i cellen manuelt, forsvinder markeringen af sig selv.

Kan dette lade sig gøre?

Mvh Jan Andreasen (Excel 2007)
Avatar billede jens48 Ekspert
08. juni 2013 - 15:52 #1
Det kan f.eks. gøres med denne makro:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("F7:F17")) Is Nothing Then
Selection.Font.ColorIndex = 0
Selection.Font.Bold = False
End If
End Sub
Avatar billede vejmand Juniormester
08. juni 2013 - 16:10 #2
Eller:

betinget formatering > Ny regel > brug en formel..... > =ÅR(F7)<>ÅR(IDAG()) > Vælg formatering
Avatar billede simulu Juniormester
08. juni 2013 - 17:51 #3
Hej
Jeg har nu fået din makro til at virke, men... hvordan kan det være, at når jeg taster en ny celleværdi i f.eks. F8, så er det cellen under, der ændrer farve?
Mvh Jan
Avatar billede jens48 Ekspert
08. juni 2013 - 21:06 #4
Det må være fordi cursoren er sat til at gå en celle ned efter du trykker Enter. Hvis du ønsker at bibeholde det kan du bruge denne makro:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("F7:F17")) Is Nothing Then
Selection.Offset(-1, 0).Font.ColorIndex = 0
Selection.Offset(-1, 0).Font.Bold = False
End If
End Sub
Avatar billede jens48 Ekspert
08. juni 2013 - 21:11 #5
Men det er nok mindre problematisk at bruge denne makro. Den virker under alle omstændigheder:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("F7:F17")) Is Nothing Then
Target.Font.ColorIndex = 0
Target.Font.Bold = False
End If
End Sub
Avatar billede simulu Juniormester
09. juni 2013 - 12:55 #6
Hej Jens48
Det virker fint nu, så tak for svar.
Mvh Jan
Avatar billede jens48 Ekspert
09. juni 2013 - 14:31 #7
Fint. Her er et svar
Avatar billede Michael B. Bom Juniormester
10. juni 2013 - 17:17 #8
@jens 48 - hvordan får du den til at starte med projektmappen?
Avatar billede jens48 Ekspert
10. juni 2013 - 23:59 #9
Til p5,
Makroen virker kun på det ark den er lagt ind under (højreklik på faneblad og vælg Vis Koder). Den starter automatisk, når der skrives noget i en af cellerne F7:F17
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

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Dato opslag Af Klaus W i Excel 0 I dag 16:17 -
Slet automatisk indehol i felt så det blivet tomt Af gylling i Excel 1 I dag 09:22 I dag 17:02
Træk dato og måned ud af celle Af Klaus W i Excel 4 I går 13:46 I går 17:10
Nul efter forreste tal Af Marting i Excel 1 02/05/202421:50 02/05/202422:46
Fjerne tomme celler i kolonne Af torben lind i Excel 4 02/05/202419:15 02/05/202420:28
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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 16:17 Dato opslag Af Klaus W i Excel
I dag 15:37 Disable button efter 1. klik Af nemlig i JavaScript
I dag 12:42 pc hakker og lagger Af Gabi i Windows
I dag 09:22 Slet automatisk indehol i felt så det blivet tomt Af gylling i Excel
I går 20:16 Ai genererede billeder Af Anja de Thurah i Fri debat
White papers
Flere white papers »


Premium
Teaser billede
Socialdemokratiet vil give massiv offentlig støtte til europæiske AI-virksomheder
Læs mere »
Interne mails afslører: Derfor besluttede Microsoft at investere milliarder i OpenAI i 2019
Jakob Høholdt fratræder som CEO for Sentia: Indsætter ny topchef fra Aeven
Åbner for en af Danmarks største it-konsulentaftaler til 2,3 milliarder kroner
Se alle »
Computerworld
Teaser billede
Apotekskæde lukker alle butikker efter "cybersikkerhedshændelse"
Læs mere »
Hypet browser bliver nu lanceret til Windows: Skal blive til et styresystem for internettet
Test: Disse små højttalere til 44.000 kroner per sæt vil blæse dig bagover - både visuelt og lydmæssigt
Test: Vi vil altså virkeligt gerne beholde HP's nye pc - men den koster 360.000 kroner
Se alle »
CIO
Teaser billede
Top-CIO Anne Nørklit færdig hos Tryg: “Jeg vil bruge sommeren på at overveje, hvad fremtiden skal bringe”
Læs mere »
Her er Danmarks fem bedste CIO’er lige nu: Se de fem nominerede til prisen som Årets CIO 2024
Her er Trygs nye CIO - afløser Anne Nørklit Lønborg
Tre måneder efter exit fra Scandiavian Tobacco: Top-CIO Kenneth Messerschmidt har landet nyt job
Se alle »
Job & Karriere
Teaser billede
Her er Danmarks fem bedste CIO’er lige nu: Se de fem nominerede til prisen som Årets CIO 2024
Læs mere »
Knap 40 procent af disse it-folk tjener tjener mindst 57.000 kroner om måneden
Medarbejderne fik udleveret badetøfler ved indflytningen: Kom med inden for i IBM Danmarks nye topmoderne hovedkontor
Så meget tjener dine kollegaer: Her er alle data fra Computerworlds store it-lønstatistik for 2024
Se alle »
White paper
Teaser billede
Guide: Sådan udvikler du en moderne netværksstrategi
Læs mere »
SASE: Træf det rette valg – første gang
Sådan høster du forretningsfordelene ved Internet of Things
MDR: Transparent sikkerhed og overvågning i realtid
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »