Avatar billede aut0htil Nybegynder
31. marts 2003 - 18:20 Der er 11 kommentarer

Hvordan kopiere verdien av en celle og ikke hele formelen?

Jeg bruker Excel for å hente verdier fra et annet program (Intouch fra Wonderware). Bruker da en formel for å hente verdier til cellen ("=view|tagname!name"). Når jeg skal bruke disse tallene i en tabell følger hele formelen med og tallet oppdateres når det endres i Intouch. Hvordan kan jeg kopiere bare tallverdien fra cellen?

På forhånd takk
31. marts 2003 - 18:37 #1
Marker hele dit område, og vælg kopier
Højreklik et sted på området, og vælg "Indsæt speciel"
Der kommer et lille skærmbilled - her markerer du "Værdier"
Tryk OK

Alle formler er nu ændret til at være værdier i stedet for formler
Avatar billede sjap Praktikant
31. marts 2003 - 18:37 #2
Er ikke helt sikker på, hvad der er dit problem, men prøv med kopier og vælg så Indsæt speciel og marker værdi
Avatar billede sjap Praktikant
31. marts 2003 - 18:39 #3
Damned - nu må jeg altså snart have et kursus i mere end to-fingersystemet  :-)
31. marts 2003 - 18:40 #4
:-)
Avatar billede janvogt Praktikant
31. marts 2003 - 22:32 #5
200 point er da vist i den store ende af skalaen for dette spørgsmål :-)

Jeg mindes forresten, at vi havde en kode fremme på et tidspunkt, som lavede samtlige celler (i alle ark) om til værdier.
Hvilket spørgsmål var det nu lige?
31. marts 2003 - 22:37 #6
ellers er den her Jan
Sub Demo()
    Dim rCell As Range

    For Each rCell in Range("A1").UsedRange.Cells
        rCell.Value = rCell.Value
    Next rCell
    Set rCell = Nothing
End Sub
Avatar billede janvogt Praktikant
01. april 2003 - 08:38 #7
Virker vist ikke på alle celler, alle ark.
01. april 2003 - 09:03 #8
Nej - og den virker faktisk slet ikke - var lige frihånds med en huske fejl - here goes something that works

Public Sub Demo1()
    Dim rCell As Range

    For Each rCell In ActiveSheet.UsedRange.Cells
        rCell.Value = rCell.Value
    Next rCell

    Set rCell = Nothing
End Sub

Public Sub Demo2()
    Dim wks As Worksheet
    Dim rCell As Range

    For Each wks In ThisWorkbook.Worksheets
        For Each rCell In wks.UsedRange.Cells
            rCell.Value = rCell.Value
        Next rCell
    Next wks

    Set wks = Nothing
    Set rCell = Nothing
End Sub
Avatar billede janvogt Praktikant
01. april 2003 - 09:23 #9
Ja tak, det var meget bedre :-)
01. april 2003 - 09:24 #10
:-)
13. februar 2004 - 10:40 #11
Fik du det til at virket ? og hvis - lukker du så ikke sprøgmålet ?
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester