Avatar billede dsj1972 Mester
06. marts 2010 - 11:39 Der er 11 kommentarer og
1 løsning

Excel 2007, hvordan kan man med en formel lave betinget formatering ud fra celleværdi??

Hejsa,

Jeg har et regne ark i 2007 hvor jeg har en kolonne (A) med datotids koder (et slags stempel).

jeg ville gerne have det lavet sådan at hvis:

værdi i celle overskrider aktuel datotid med 5 dage så bliver celle rød, men det skal kun gøres hvis der er en datotidskode i, dvs hvis felter er tomme så skal der ikke gøres noget.

yderligere ville jeg gerne have det sådan at HVis:

Der kommer værdi i en anden celle i bestemt kolonne (U) i form af bestemt tekst "ja" så skal der laves grøn farve i cellen i samme række i kolonne (A).

Man kunne måske også lave det samme stunt med formel, mit problem er bare at jeg ikke lige kan huske hvordan man angiver at celle skal laves med rød fyld hvis værdi er sand og angiver at der intet skal foretages hvis værdi er falsk

Håber jeg har forklaret mig godt nok!!

mvh dsj
Avatar billede dsj1972 Mester
06. marts 2010 - 11:44 #1
Man kan jo også lave formel inde i en betinget formatering, men der kan jeg heller ikke rigtig gennemskue hvordan jeg skal gribe den an.

Hvis det var for en enkelt bestemt celle ville jeg jo kunne skrive:

=HVIS(A3>0;A3<NU()-5;"") og så angive rød fyld som format

Men problemet er jo at jeg gerne vil have reglen til at gælde hvor hele kolonnen så derfor kan jeg jo ikke bruge A3 som reference.
Avatar billede kabbak Professor
06. marts 2010 - 12:11 #2
=OG(A3>0;A3<NU()-5)
Avatar billede kabbak Professor
06. marts 2010 - 12:14 #3
"Men problemet er jo at jeg gerne vil have reglen til at gælde hvor hele kolonnen så derfor kan jeg jo ikke bruge A3 som reference."

Joda, du kopierer bare formatet til de andre celler, formlen skifter efter hvor den er, så længe den ikke er låst med $ tegn
Avatar billede dsj1972 Mester
06. marts 2010 - 12:19 #4
Hej Kabbak,

Nu skal jeg lige være med....den formel du har i indlæg #2 er det til Betinget formatering?? hvis ikke hvordan angiver jeg så at cellen skal "males" rød hvis værdien er sand og hvis falsk skal den ikk gøre noget

Hvis den er betinget, hvordan kopiere man så lige samme regel til alle celler i kolonne A sådan cika 65536 stk, eller sådan noget lign.???

mvh dsj
Avatar billede kabbak Professor
06. marts 2010 - 12:29 #5
indlæg #2  er til betingetformatering

du markerer den første celle den skal virke på, sæt formlen ind der og lav din farve.

når så du er færdig der, så tag formatpenslen til at kopierer den til de andre celler, så skulle den også virke der.
Avatar billede dsj1972 Mester
06. marts 2010 - 12:49 #6
Hmm, når jeg indsætter formel i betinget formatering i A3 og derefter bruger format pensel på resten, så skifter området i betingelsens regel til "gælder for" = $A$3:$A$65536, så kunne man jo lige så godt skrive det i "gælder for" istedet for at bruge format pensel har jeg ret i det???

Eller har den format pensel en anden funktion også???

Men umiddelbart virker det for de celler med nyere datokode markeres ikke med rødt.
Avatar billede dsj1972 Mester
06. marts 2010 - 12:53 #7
Du skulle tilfældigvis ikke lige vide hvordan jeg kan denne her til at skrive i den øverste række eks. A3 og så skubbe data ned således at nyeste data altid er øverst i ark.

Jeg har denne kode til at overfører data fra Word Userform.

  .Range("A65536").End(xlUp).Offset(1, 0).Value = strDateTime

Den virker fint nok, men har lige indset at det hurtigt bliver irreterende at skulle scrolle ned hele tiden når man vil tjekke nyeste data, så derfor kunne jeg godt tænke mig at den virkede nærmest omvendt.

Smækker den gerne op som nyt spm.
Avatar billede dsj1972 Mester
06. marts 2010 - 14:00 #8
Anyway så smid lige et svar, så får du point for det virker fint nok det betinget formatering.
Avatar billede kabbak Professor
06. marts 2010 - 14:32 #9
;-))
Avatar billede dsj1972 Mester
06. marts 2010 - 14:36 #10
Takker for hjælpen :-)
Avatar billede dsj1972 Mester
06. marts 2010 - 15:57 #11
Hmmm, den Betinget formatering, virker desværre ikke når der insættes ny række i række 3.

Jeg har sat en kode op i ThisWorkbook

Private Sub Workbook_Open()

    Rows("3:3").Select
    Selection.Insert Shift:=xlDown
   
End Sub

så når workbook åbnes så indskydes en ny række og min tanke var så at kunne jeg få mine data skudt ind i den nye række
Avatar billede dsj1972 Mester
06. marts 2010 - 16:03 #12
Og den fiksede jeg sørme lige ved at indspille en macro (dejlig lille ting den optager)

så nu kopiere den betinget formatering til ny række sådan her i workbook open

Private Sub Workbook_Open()

Rows("3:3").Select
    Selection.Insert Shift:=xlDown,_ CopyOrigin:=xlFormatFromRightOrBelow

End Sub
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
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

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