26. januar 2012 - 20:45Der er
10 kommentarer og 1 løsning
Overføre farvede celler automatisk til et andet ark i samme excel ark
Jeg er ved at udabejde en tidsplan i excel 2010, hvor en leder skal have overblik over flere medarbejdere.
Jeg vil gerne kopiere farvede celler fra en bestemt række (fx række 4) i et excelark (hedder fx mit overblik) til en anden bestemt række (fx række 25) i et andet ark i samme excel (hedder fx lederens overblik).
Hvis jeg tilføjer eller sletter farve i en celle fx K4 i arket "mit overblik", skal farve automatisk overføres til pågældende celle i arket "lederens overblik" fx kolonne K25.
Jeg kan godt kopiere farverne fra det ene ark over i det andet, men jeg kan ikke finde ud af at få lavet en automatiske ændring, så man ikke skal rette i begge ark, hver gang man ændrer i det ene ark. Der skal kun kunne rettes én vej (fra mit overblik til lederens overblik).
Virksomheder er på vej fra store sprogmodeller, der svarer på spørgsmål, til AI-agenter, der kan udføre opgaver på egen hånd. Det gør teknologien mere nyttig – og langt mere risikabel.
i dit ark "mit overblik"'s model, det gælder for hele arket
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Worksheets("lederens overblik").Range(Target.Address).Offset(23, 0).Interior.ColorIndex = Target.Interior.ColorIndex End Sub
Nej. Svaret skal ikke flyttes i rækken. Det vil altid være den samme række for de to ark, der er koblet sammen.
Der kan være en anden medarbejder, der har række 4 i sit ark (xx overblik) koblet med lederens ark række 27. Der skal være samme funktion, men de to rækker vil også skulle være "parret" og vil ikke blive ændret til andre rækker.
Har du overvejet at benytte betinget formattering? F.eks.
Du opretter en betinget formattering i "Mit overblik" celle K4, hvor du anvender en formel til at bestemme om cellen skal udfyldes eller ej - du kunne evt. benytte denne:
=HVIS(LÆNGDE(K4)=1;SAND();FALSK()),
hvor du blot indsætter et blankt tegn for at farvelægge cellen. Du fjerner farven igen ved at ryde cellens indhold - Delete.
I arket "lederens overblik" celle K25, opretter du følgende betingede formattering =HVIS(LÆNGDE('Ark1'!K4)=1;SAND();FALSK()),
Nu faves denne celle også når betingelsen for favelægning af cellen i K4 er opfyldt.
Hej Jeg har fået oprettet formlerne i betinget formatering (valgt "brug en formel til at bestemme, hvilke celler, der skal formateres"), men jeg kan ikke få det med farverne til af fungere. Hvad mener du med blankt tegn for at farvelægge cellen i "mit overblik"? Skal det være et blankt tegn i formlen eller skal det være et blankt tegn i cellen? Jeg har prøvet både at vælge en farve i fyld i formatering for opfyldelse af formlen i lederens overblik men har også prøvet uden. Jeg har ikke lige evnet at få det til at virke endnu.
når du har oprettet den betingede formattering i "mit overblik" K4, så farves cellen hvis du indsætter f.eks. et blanktegn i cellen eller et hvilket som helts andet tegn. Formlen tjekker kun at cellen ikke er tom!. I "lederens overblik" referere formlen også til K4 i "Mit overblik", så hvis K4 ikke er tom burde eks. celle K26 også farves. Huskede du at vælge Format og fyldfarve? :-) - ved den betingede formatering?
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim C As Range For Each C In Range("A4:F4") Worksheets("lederens overblik").Cells(27, C.Column).Interior.ColorIndex = C.Interior.ColorIndex Next End Sub
Fantastisk. Virker nu. Jeg manglede lige det med mellemrumstasten :-) Mange tak for hjælpen. Jeg er ny bruger og havde ikke lige forstået det med point, ellers skulle den have været til mere end 30 point for jeg har selv forsøgt mange udgaver.
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.