Scripting: formel

Du behøver sådan set ikke en vba-løsning. Du kan lave det med betinget formatering

Hvis resultatet af formlen skal stå i test1!R2C17, så er det også i den celle formlen skal stå.

Det er godt nok ikke vba, men det kan jo langt hen ad vejen klares uden:

Når formlen står i celle test1!R2C17, kan du få den til at skifte farve ved hjælp af betinget formatering, f.eks.

"Celleværdien er"  "Mindre end"  12
Angiv skrifttype farve til grøn

Tryk på "Tilføj>>"
"Celleværdien er"  "Større end"  20
Angiv skrifttype farve til rød

Tryk på "Tilføj>>"
"Celleværdien er"  "Større end eller lig med"  12
Angiv skrifttype farve til gul

Selve formlen kan indsættes med

  Sheets("test1").Cells(2, 17).FormulaR1C1 = "=SIN(R[2]C[4])"

Tak

Formlen virker :-)

Du får ekstra 100 points hvis du kan hjælpe mig med følgende:

Jeg vil gerne klare det hele via vba scripting da det er flere hundrede celler som skal have formler med tekstfarve skift funktionalitet

+

hvis du kan lave formlen så den henviser til definerede cellenavne

Dvs at Række 2 har fået defineret navn : bil
og
Kolonne 17 har fået navn: farve


Her er et eksempel med defineret cellenavne.....(løsning fra eksperten :-)

Range("TEST1!Bil Farve").Select
    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="http://www.eksperten.dk/"

cykel123 > Jeg kan tidligst kigge på det i morgen aften. Så hvis det haster, håber jeg der dukker en anden op, der kan hjælpe dig. :0)

Jeg vil sætte stor pris på din hjælp...har forgæves søgt på en løsning.....du får 1000 point hvis du løser det

Hvad med at give SJAP de point han har fortjent, og så få dette spørgsnål lukket. Opret så det nye spørgsmål som et nyt spørgsmål.