Excel formler och cellhantering

Excel kan vad jag vet inte ha både värden och funktioner i samma cell. Men om någon är expert får de gärna rätt mig. Med andra ord så får du lägga din data på ett stället och beräkninen på ett annat. Om du inte vill att data ska synas så kan du lägga det på en ny flik eller kolumner vid sidan av som du sen döljer.

Att göra olika färger om det blir andra värden i cellen finns, det heter villkorsstyrd formatering. Du kan lägga på en defaultformatering och sen gå in och ändra reglerna för den (färger, värden och villkor m.m.).

Lägg t.ex. in data på Blad2 (eller döp om det) så här:

Sen blir formeln på Blad1 så här med ett vilkor som visar "" om siffran på blad2 är 0.

=OM(Blad2!B2=0;"";Blad2!B2*Blad2!$G$1)

Observera att jag kör svenska Excel, och det går inte att skriva svenska funktionsnamn i engelska versionen. "OM" heter IF t.ex.

Det går väl att formatera bort 0-an också, då blir formeln mycket enklare.

Obs, jag läste lite baklänges. Om du inte skriver något på Blad2 så blir det 0 automatiskt i en beräkning på Blad1. En tom cell räknas som "0".

Så du kan köra formeln utan OM/IF;

=Blad2!B2*Blad2!$G$1

Så ignorera det mer komplexa med OM i inlägget ovan.

ååhhh!! detta låter som ett problem jag ska lösa! jippi!!!

vi måste använda VBA och villkorstyrd formatering.
formateringen tror jag du kan lösa själv men vi kör lite snabbkurs i VBA.

VBA är ett programmeringspråk som kan köras i bakgrunden av excel, i ditt fall vill du köra programmet var gång cell A1 är uppdaterad och då räkna ut värdet på din "formel".
så när du skriver in 20000 och trycker enter så startar programmet och ändrar värdet.
coolt va?!

det du behöver göra är att öppna VBA editorn, ALT+F11 är det in excel 2003, 2007 har jag för mig knappen finns i fliken visa.
du borde få upp ett fönster med två rutor, projekt och egenskaper.
i projekt dubbelklicka på det blad du vill funkitionen ska fungera på, ett vitt textfält borde dyka upp.

klistra in följande kod

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim str As String
    If Not Intersect(Target, Range("A1:A10,B5,C5:D10")) Is Nothing Then
        
        On Error Resume Next
        varde = ActiveCell.Offset(-1, 0).Value
        
        If varde = vbNullString Then Exit Sub
        
        str = "=" & varde & "*0.75"
        ActiveCell.Offset(-1, 0).FormulaR1C1 = str

    End If


End Sub

just nu reagerar denna kod på det blad du valt och endast på cellerna A1:A10, B5, C5:D10.
detta kan du själv ändra så den inte dummar sig på fel ställen.

det viktiga med denna funktion är att du trycker på ENTER när du skrivit in siffrorna i cellen, INGET ANNAT!!! INTE TAB, INTE NÅN PILTANGENT, INTE MUSKLICKA.

ditt andra problem blir i princip löst av sig själv eftersom skriver du in 0 så blir det 0*0,75 vilket faktiskt blir 0

hojta till om du inte fixar det!

dom där smiliesen ska vara kolon D

Det finns en ruta "Inga Smilies" som du kan klicka på om du postar eller editerar.

I övrigt, snygg kod. Jag är ingen programmerare så håller mig till grunderna i Excel.

Jag testade och det fungerade fint i Excel 2007.

ahhh! jag håller mig till grunderna i swec istället

kan väl vara nått att det beräknas med 75% effektivitet?

lugnt!
var det så du ville ha det?
fixar du med villkorsstyrd formatering själv eller behöver du hjälp med det också?

Vad tänkte du med den villkorstyrda formateringen? Bör väl gå att skapa en sträng som innehåller formeln.

sträng? vad är en sträng?

villkorsstyrd formatering är att du kan ställa in att om värdet i cellen är över, under, mellan vissa värden så ska bakgrundsfärgen ändras

Jaha du tänkte så Äh skit samma.