Resultat og formel

En løsning er at skrive dine data - værdi for tommer, fod, og cm i f.eks. F1-F2-F3.
I cellen A1 skriver du så f.eks. =A2*F1
og B1 =B2*F2 osv.

I A2-B2-C2 skriver du så det der skal regnes om

Det kan du ikke. Der er dog alternative løsninger:

1. Lav en macro (VBA), skriv tal i A1, B1 eller C1, aktiver macroen, der så sætter formlen ind i de celler hvor tallet ikke står.

2. Sæt en dropdown box ind i dit ark. Skriv et tal i A1. Vælg fra dropdown:
  Fra cm til tommer
  Fra cm til Fod
  Fra Fod til tommer
  Fra Fod til cm
  Fra Tommer til Fod
  Fra Tomer til cm
Ud fra valg af combobox udregner en macro (VBA) det der skal udregnes og skriver resultatet i B2. Hvis du putter macroens kode ind i drob-down boxens change-event, bliver det udregnet automatisk så snart du omskifter...

3. Skriv tallet i A1.
  I cellerne B1, C1, D1, E1, F1, G1 skriver du formlerne for omregning
  cm->fod, cm->tommer, fod->cm, fod->tommer, tommer->cm, tommer->fod

4. Find selv på flere forslag :o)

Ville det ikke være nemmere hvis jeg lagde filen ud på nettet så i selv kunne lave det? for jeg forstår ikke så meget af det der :)

http://www.angelfire.com/oz/ozon/udregner.xls

Arhh - du forstår vel punkt 3?

Ja, men vil du ikke prøve at lave punkt 1 eller 2?

Punkt 1:

If Left(ActiveCell.Formula, 1) = "=" Then
  MsgBox "Den aktive celle må ikke indeholde formler - det vil føre til cirkulære referencer. Indtast et tal"
  Exit Sub
End If
Select Case ActiveCell.Address
  Case "$A$1"
    Range("B1").FormulaR1C1 = "=RC[-1]*2"
    Range("C1").FormulaR1C1 = "=RC[-2]*3"
  Case "$B$1"
    Range("A1").FormulaR1C1 = "=RC[1]*4"
    Range("C1").FormulaR1C1 = "=RC[-1]*5"
  Case "$C$1"
    Range("A1").FormulaR1C1 = "=RC[2]*6"
    Range("B1").FormulaR1C1 = "=RC[1]*7"
  Case Else
    MsgBox "Du skal stå i celle A1, B1 eller C1 for at køre macroen"
  End Select

Formlerne for at omregne mellem cm og fod og inch kender jeg ikke, dem må du selv rette. Jeg ganger bare med nogle tilfældige tal...

Sorry - det var punkt 2 jeg lavede. Du kan sikkert selv lave punkt 1, den er mere simpel

Under Funktioner-tilføjelsesprogrammer sætter du flueben i Analysis Toolpak.
I H1 til H8 skriver du

m
mi
Nmi
in
ft
yd
cm
mm

i C1 laver du Data-Datavalidering - Liste og skriver =H1:H8
kopier C1 til C2
i B2 skriver du nu
=KONVERTER(B1; C1; C2)
Du kan nu frit vælge hvad du vil konvertere til og fra i celle c1 og c2

bak: Som altid har du bare løsningen :o)
Dog skal man så bruge den i Excel indbyggede konverteringsfunktion - bruger den mon amerikanske feet eller engelske eller..?

tjah eksemplet er her, men der regner jo sikkert i US feet. Er Bill Gates ikke amerikaner :-)

http://tommy.bak.homepage.dk/udregner.xls

men din makro er nu også fiks og ikke afhængig af Analysis Toolpak.

Bare pistolpalle husker at tage højde for det, hvis han nu tror det er engelske. Han må nok lige teste om den giver de resultater han forventer :o)

pistolpalle > hvordan går det ?

sorry for ventetiden...

jeg har fået lavet det for et stykke tid siden og nu virker det perfekt - tusind tak

bak > laver du et svar?