Avatar billede ab58 Novice
25. april 2016 - 00:16 Der er 4 kommentarer og
1 løsning

Omdanne formlen UDSKIFT til en makro

Hej Eksperter,

I A1 står der:
3.114.334

Når jeg skriver følgende formel i A2:
=UDSKIFT(A1;".";"")

... viser A2:
3114334

Så vidt så godt.

Prøvede at lave formlen om til en makro, men det kunne jeg ikke.

Her er hvad jeg skrev:

Sub Fjern_Punktum()
Range("A2").Formula = "SUBSTITUTE(A1,".","")"
End Sub

Hvad gør jeg forkert?
Avatar billede store-morten Ekspert
25. april 2016 - 05:24 #1
Sub Fjern_Punktum()
Range("A2").Formula = "=SUBSTITUTE(A1,""."","""")"
End Sub
Avatar billede ab58 Novice
25. april 2016 - 06:26 #2
Lige i øjet!
1000 tak store-morten...
Ikke mindst fordi du svarede hurtigt.

Gider du lægge et accept-venligt svar?
25. april 2016 - 09:50 #3
Fjern direkte i A1 med:
Cells(1, 1) = Replace(Cells(1, 1), ".", "")
Avatar billede ab58 Novice
25. april 2016 - 10:23 #4
Tak for absolut hjælpsomt og nyttigt forslag Erik.
Holder mig til "Range" foreløbigt, da jeg er ved at lære præcist denne "sætning" og anvendelse af den i et udvidet område.

Venter på Mortens (store-morten) "accepterbare" svar :-)

store-morten,
Gider du kopiere dit kommentar #1 og indrykke det som svar?
Avatar billede store-morten Ekspert
25. april 2016 - 12:49 #5
Velbekomme
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

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