Print side | Luk vindue

Range.Formula på Range.Pastespecial ved IFERROR ..

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=4159
Udskrevet den: 23.Nov.2024 kl. 02:25


Emne: Range.Formula på Range.Pastespecial ved IFERROR ..
Besked fra: Stkol76
Emne: Range.Formula på Range.Pastespecial ved IFERROR ..
Posteringsdato: 03.Feb.2020 kl. 08:54
Hej alle,

Jeg har nedenstående formel jeg har brug for at køre i et VB script (Excel 2013), men jeg får fejl når jeg prøver at køre det:

Sub CalculateRRow()
Range("R2").Formula = "=IFERROR(ROUND(W2/12;1);"")"
Range("R2").Copy
Range("R2:R5483").PasteSpecial (xlPasteAll)
End Sub

Fejl jeg modtager er "Run-time error '1004'" hvilket den adresserer til linie 2 i ovenstående.

Hvis jeg ikke bruger IFERROR og Round fungerer det helt perfekt, men det er vigtigt at jeg kan bruge disse i det .. er der nogen der kan hjælpe med en løsning på problemet? :-)

Mange hilsner
Stig :-)


Svar:
Besked fra: nsv
Posteringsdato: 03.Feb.2020 kl. 17:15
Du skal bruge fire anførselstegn og komma i stedet for semikolon
 Range("R2").Formula = "=IFERROR(ROUND(W2/12,1),"""")"

NSV

Besked fra: Stkol76
Posteringsdato: 04.Feb.2020 kl. 09:41
Tak NSV .. Det var lige hvad der skulle til, fantastisk!! :-)


Print side | Luk vindue