CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

jath08ac Forsker

11. januar 2018 - 09:42 Der er 6 kommentarer og
1 løsning

Tekst og formel i samme celle + VBA kode

Hej,

Jeg har problemer med at får min VBA kode til at indsætte noget tekst og en formel i samme selle. Jeg får en error 1004.

Hvad gør jeg forkert

Min kode er følgende:

With Range("E2")
.Formula = "=""Årsregnskab ""&Start&"" - ""&Slut&""" => Kode
fejler her.
.Font.Bold = True
.Font.Size = 12
.Font.FontStyle = Range("Skriftstype")
End With

Synes godt om

garrett Seniormester

11. januar 2018 - 09:58 #1

Skal du ikke benytte .Value ="Årsregnskab...." i stedet for formula, da det ikke er en formel men en værdi du vil sætte i den range?

.Font.FontStyle kan måske også skabe problemer, der kan du prøve med 'Range("Skriftstype").Value' hvis den fejler.

Synes godt om

Dan Elgaard Ekspert

11. januar 2018 - 11:01 #2

.Value = "Årsregnskab '" & Start & " - " & Slut & "'"

Husk, at få mellemrum med, da brugen af &-tegn opfattes af VBA fortolkeren som en Long værdi, hvis tegnet står i umiddelbar tilknytning til en anden værdi.

Synes godt om

jath08ac Forsker

11. januar 2018 - 11:06 #3

Skal der ikke indgå et = i den celle hvor værdien skal indlæses. Start og Slut referer til to navngivet celle i min Excel fil?

Synes godt om

garrett Seniormester

11. januar 2018 - 11:17 #4

Så skal det vel være:

Value = "Årsregnskab '" & Range("Start").Value & " - " & Range("Slut").Value & "'" ?

Evt. med noget formatering af de 2 værdier hvis de er i dato-format.

Synes godt om

jath08ac Forsker

11. januar 2018 - 12:25 #5

Det kan være at jeg ikke udtrykker mig klart. Det jeg gerne vil er, at VBA koden skal indsætte nedenstående kode i den celle jeg har angivet.

="Årsregnskab "&Start&" - "&Slut&""

Der skal indgår = i koden, for ellers kan min Excelfil ikke løbende opdatere værdierne der står i Start og Slut

Synes godt om

garrett Seniormester

11. januar 2018 - 13:05 #6

Nedenstående virker fint i min Excel hvis jeg navngiver 2 celler "Start" og "Slut"
.Formula = "=""Årsregnskab ""& Start & "" - "" & Slut"

Hvis det fejler så ligger fejlen et andet sted.

Synes godt om

bak Seniormester

12. januar 2018 - 19:37 #7

Prøv lige at se om dette her ikke skulle være på rette spor.

Range("A7").Formula = "=""Regnskabsår "" & TEXT(start,""dd-mm-åååå"") & "" - "" &TEXT(slut,""dd-mm-åååå"")"

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Skrive tekst fra celle i formel Af SFrede i Excel	8	I går 14:54	I dag 12:51
slette rækker automatisk Af torben lind i Excel	12	24/04/202418:52	I dag 07:07
Ctrl + Backspace Af xl-Enthusiast i Excel	7	22/04/202408:15	22/04/202410:12
Lopslag Af Mariacecilia i Excel	9	19/04/202419:00	20/04/202420:01
Vagtliste med rul mellem skifter Af Klaus W i Excel	0	19/04/202413:33	-

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS