Print side | Luk vindue

VLOOKUP fejler i VB Script

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=4161
Udskrevet den: 23.Nov.2024 kl. 02:09


Emne: VLOOKUP fejler i VB Script
Besked fra: Stkol76
Emne: VLOOKUP fejler i VB Script
Posteringsdato: 04.Feb.2020 kl. 14:37
Hej,

Jeg har et VLOOKUP som virker når den står alene i cellen:

=IF(IFERROR(+VLOOKUP(C2;'\\Filsrv01\ir\Supply Chain gruppen\ARKET\[Leverandører SC.xls]Leverandør liste'!B:D;2;FALSE);"")=0;"";IFERROR(+VLOOKUP(C2;'\\Filsrv01\company\Supply Chain gruppen\ARKET\[Leverandører SC.xls]Leverandør liste'!B:D;2;FALSE);""))

Men når jeg sætter denne ind i nedenstående VB script, så fejler den:

Sub GetFirstResponse()
Range("AC2").Formula = "=IF(IFERROR(+VLOOKUP(C2;'\\Filsrv01\company\Supply Chain gruppen\ARKET\[Leverandører SC.xls]Leverandør liste'!B:D;2;FALSE);"")=0;"";IFERROR(+VLOOKUP(C2;'\\[SERVER]\ir\Supply Chain gruppen\ARKET\[Leverandører SC.xls]Leverandør liste'!B:D;2;FALSE);""))"
Range("AC2").Copy
Range("AC2:AC5000").PasteSpecial (xlPasteAll)
End Sub

Jeg har forsøgt at ændre alle semicolons til komma, og har ligeledes forsøgt med 4 anførselstegn kontra 2, men intet virker.

Er der én der kan gennemskue hvad der er galt?

Mange hilsner
Stig :-)



Svar:
Besked fra: Mads32
Posteringsdato: 04.Feb.2020 kl. 19:53
Hej

Kan det være = foran IF??

Sub GetFirstResponse()
Range("AC2").Formula = "=IF(IFE


Besked fra: Stkol76
Posteringsdato: 05.Feb.2020 kl. 08:14
Hej Mads,

Ummiddelbart ikke .. Jeg har prøvet at fjerne det, og har yderligere forsøgt at sætte "=" foran IFERROR istedet .. sidst nævnte paster godt nok det ind i cellerne, men formlen virker ikke.

/Stig :-)



Print side | Luk vindue