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 Forsker

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

Excel kurser

Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Excel ark oplåsning Af FinnLauridsen i Excel	5	I går 15:05	I dag 09:15
Excel hjælp Af rudbech i Excel	6	12/09/202509:09	12/09/202510:52
VBA der vælger celler med værdi over 0 Af Excel Styrmanden i Excel	1	10/09/202510:07	10/09/202511:16
Hente data fra andet excelark VBA Af fajens i Excel	7	02/09/202511:29	03/09/202512:32
tæl sorteret data Af ABE15 i Excel	4	01/09/202521:04	04/09/202507:12

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