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
Grafer Af Malou i Excel	1	16/05/202514:51	16/05/202515:00
Graf ud fra timestamp. Af jthyge i Excel	1	16/05/202511:52	16/05/202515:40
csv fil til forskellige kolonner Af TheLibrarian i Excel	9	14/05/202510:41	15/05/202518:51
Finde uge nr i Celle E3 Af lurup i Excel	4	09/05/202510:59	09/05/202512:21
Lave en løbende SUM Af lurup i Excel	4	09/05/202509:39	09/05/202512:41

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

16/05

Test: Her er in-ear-hovedtelefonerne, der vil det hele – og slipper ret godt fra det meste

16/05

Microsoft forlænger levetiden for M365 på Windows 10: Se den nye deadline

16/05

Nørgaard: Personlighedstests er humbug på linje med stjernetegn - og Heinemeier sparker AI-røv!

16/05

Microsoft lukker platforme i kølvandet på stor fyringsrunde

16/05

Tyskland frygter for EU’s dataoverførselsaftale med USA: Sådan kan Trump flå tæppet væk under det hele

16/05

Stor dansk billet-app med 1,3 millioner brugere lukker: I fremtiden skal du bruge denne løsning i stedet

16/05

17 år efter brutalt og mystisk overfald: Nu taler Stein Baggers hemmelige partner ud

16/05

Europæisk open source-alternativ til Google Workspace raser: Google forsøger at udrydde konkurrencen

16/05

SAP har taget nye værktøjer i brug for at styrke sit omdømme, og nu brager den tyske gigant frem på ny rangliste

16/05

Fra Danske Commodities til TV2: Her er en stribe ledige stillinger, som du kan søge nu

16/05

Danske Andel Energi overtager it-platform fra IBM: Skal udrulles i stor stil

Vis flere artikler

IT-JOB

RAW IT

Drift- og supportkonsulent til vores unge og dynamiske team

Sahva A/S

IT-systemadministrator - vær med til at skabe et liv i bevægelse

Netcompany A/S

Software Developer

Økonomistyrelsen

IT-konsulent søges til Statens Lønløsning

Region Midtjylland

Region Midtjylland søger digital frontløber og facilitator: Bliv forretningsarkitekt

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

I går 18:02	Kan ikke slette Google Drev Af TTA i Apps til Android
16/0514:51	Grafer Af Malou i Excel
16/0512:31	VBA koder lagt i MS project kolonner Af per2edb i Visual Basic
16/0511:52	Graf ud fra timestamp. Af jthyge i Excel
16/0508:47	fødselsdage i google kontakter Af gerhardpet i Andet software