Print side | Luk vindue

vis formel i celle som tekst i en anden celle

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=231
Udskrevet den: 12.Dec.2024 kl. 14:34


Emne: vis formel i celle som tekst i en anden celle
Besked fra: KimC
Emne: vis formel i celle som tekst i en anden celle
Posteringsdato: 10.Feb.2011 kl. 11:26
Jeg forsøger at få vist en formel som tekst, i en anden celle

eks. på det jeg gerne vil have vist:

A1 indeholder =2+2    -    jeg ønsker her at få vist formelresultatet "4" (so far no problem :-)

B1 indeholder =A1      -    jeg ønsker her at få vist formlen selv, som tekst "=2+2"(dynamisk, så hvis jeg ændrer indholdet af A1, så ændres B1 også... dvs. jeg ønsker ikke en copy-paste og dermed statiske data)

Nogen forslag?

Mvh.
Kim




Svar:
Besked fra: Jan B. Hansen
Posteringsdato: 10.Feb.2011 kl. 14:23
Hej Kim
 
Jeg mener ikke at der findes en formel som kan dette trick
Jeg kender ikke dine kundskaber i VBA men skriv igen hvis du har brug for yderligere hjælp.
 
 
Function VisFormel(Formel As Range) As String
   VisFormel = Formel.Formula
End Function
 
 
Efter du har lagt koden ind, skal du bruge formlen =VisFormel(A1) for at få vist formlen fra cellen A1.
 
JanB


Besked fra: KimC
Posteringsdato: 10.Feb.2011 kl. 15:35
Tak for svar. Mine VBA kundskaber er lig 0, men kender en jeg kan spørge i morgen... så foreløbigt mange tak for hjælp!

Mvh. Kim


Besked fra: Allan
Posteringsdato: 10.Feb.2011 kl. 22:04
Hej Kim,
 
Kort instruks i indsætning af koden:
  • Åben den fil hvor du skal bruge funktionen.
  • Hold tasten ALT nede mens du trykker én gang på F11
  • Nu vil du kunne se din fil og dine ark i venstre del af vinduet.
  • Højreklik på THISWORKBOOK og vælg 'Insert' og klik på 'Module'
  • Indsæt denne koden fra JanB i de hvide vindue til højre for.
  • Luk VBA-Editoren med krydset i øverste højre hjørne.
  • Gem din fil.
Nu kan du bruge formlen =VisFormel() og henvise til cellen som indeholder formlen.
 
//Allan


Besked fra: KimC
Posteringsdato: 11.Feb.2011 kl. 11:00
Hej Allan og Jan,

Det virker, og I har hjulpet mig med at spare mange timers arbejde fremover! Smile

Tusind tak til Jer begge! 

Mvh. Kim


Besked fra: Allan
Posteringsdato: 11.Feb.2011 kl. 11:22

Velbekomme Kim, tak for din tilbagemelding Wink

//Allan


-------------
MVH

Allan
https://www.excel-regneark.dk" rel="nofollow - Excel-regneark.dk - Gratis skabeloner til Excel
Få over 120 ekstra funktioner med Danmarks bedste add-in


Besked fra: Jan B. Hansen
Posteringsdato: 11.Feb.2011 kl. 16:10
Ditto herfra
Dejligt du kunne bruge koden Wink
 
JanB


Besked fra: Michael Hvid
Posteringsdato: 16.Feb.2011 kl. 17:14
Kan man udvide makroen, så excel selv indsætter værdierne fra celle referencerne.

F.eks.

A1 = 1
A2 = 2
A3 = A1+A2 = 3

Hvis man så vil have formlen i A4 fra A3 får man A1+A2, er det her muligt at få 1+2, altså få excel til at indsætte værdierne fra cellerne?

mvh.
Michael


Besked fra: Allan
Posteringsdato: 16.Feb.2011 kl. 21:22
Hej Michael,
 
Du tænker noget á la:
 
Function VisFormel(Formel As Range) As String
If Formel <> "" Then
   VisFormel = Formel.Formula & " = " & Formel.Value
End If
End Function
 
Funktionen skriver formlen og resultatet i samme celle f.eks =SUM(A1:A2) = 3
Ramte jeg?
 
//Allan


Besked fra: Michael Hvid
Posteringsdato: 16.Feb.2011 kl. 21:51
Takker for svaret
Det var ikke helt det jeg mente, men er nu også meget cool.
Jeg tænkte på om man kunne få excel til at vise udregningen i tal, i stedet for at henvise til cellerne.
Altså at man får 1+2 og ikke A1+A2

Mvh. Michael


Besked fra: Allan
Posteringsdato: 16.Feb.2011 kl. 22:10
Jeg ved det ikke, jeg kan ikke gennemskue hvordan den skulle laves.
Grunden er at formlen kan være =A1+A2 eller =SUM(A1:A2), eller sågar en helt anden formeltype....
 
Lur mig om der ikke er en eller anden som har lavet en sådan genistreg, den ligger bare ikke lige til højrebenet LOL
 
//Allan


Besked fra: Jørgen
Posteringsdato: 17.Feb.2011 kl. 11:23
Hej Michael
 
Kan du bruge noget noget i denne retning
(jeg har måttet lave en lille mellemregning i celle D6, men den kan du jo lavet et "skjult" sted
 
/uploads/32/formel_som_tekst.xls - uploads/32/formel_som_tekst.xls
 
Jørgen


Besked fra: Jørgen
Posteringsdato: 17.Feb.2011 kl. 11:38
Hej igen
 
Eller er det faktisk bare en formel som celle c3 i vedlagte du leder efter. ??
/uploads/32/formel_som_tekst-ver2.xls - uploads/32/formel_som_tekst-ver2.xls
 
=A1&"+"&A2&"="&A3
 
Jørgen


Besked fra: Michael Hvid
Posteringsdato: 17.Feb.2011 kl. 23:43
Hej Jørgen-

Det var noget i stil med det sidst. 
Jeg ville høre om man kunne programmere en makro, der laver det samme som du gør. Men som Allan er inde på, så kan det være en hvilken som helst formeltype.
Jeg er meget ny inde for VBA og makro, så ved ikke hvad der er muligt og svært. - Jeg så bare denne tråd, som minder lidt om det jeg savner i excel i forhold til f.eks. mathcad.

Takker for de hurtige svar fra jer begge. Wink

Michael



Print side | Luk vindue