ferdinand.k Nybegynder
07. januar 2013 - 13:10 Der er 4 kommentarer og
1 løsning

indsæt formular i celle gennem VBA

Halløjsa,

Jeg skal have indsat en formular i en række celler (B2 -- > B200), men jeg får en fejl når jeg smider koden ind.

Jeg skal have indsat denne koden :
=IF(A2<>"";(VLOOKUP(A2;SUMMARY!L1:AC1000;18;FALSE));"")

Jeg har forsøgt mig med både:
Range("B2:B200").FormulaR1C1 =
Range("B2:B200").Value =

... hvad bør jeg gøre ?
store-morten Seniormester
07. januar 2013 - 17:32 #1
Måske:
Sub Test_Indsæt_Formel()

    Range("B2").Formula = _
        "=IF(A2<>"""",(VLOOKUP(A2,SUMMARY!$L$1:$AC$100,18,FALSE)),"""")"
    Range("B2").AutoFill Destination:=Range("B2:B200"), Type:=xlFillDefault
   
End Sub
ferdinand.k Nybegynder
07. januar 2013 - 20:00 #2
Det spiller - Tak. Men jeg fortår sgu ikke lige de der dobbelt-plinger ?!
store-morten Seniormester
07. januar 2013 - 20:04 #3
dobbelt-plinger ?!
store-morten Seniormester
07. januar 2013 - 20:32 #4
Nå.. nu er jeg med ;-)
Range("B2").Formula =
Skriver det der står mellem den første " og sidste "

Altså for at få "" (tom) med blive formlen delt op:

=IF(A2<>  " og "  "",(VLOOKUP(A2,SUMMARY!$L$1:$AC$100,18,FALSE)),  " og "  "")  "
ferdinand.k Nybegynder
08. januar 2013 - 07:47 #5
Det giver bedre mening. Tak
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

Opret Preview

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





Computerworld
Ny bil i 2030? Mercedes-Benz har allerede bygget den ... og den kører på 10 MacBooks
Mercedes-Benz F015 ligner ikke noget, du kan finde på hylderne hos nogen bilforhandler. Den stålgrå maskine med de indbydende former er da også mere en vision og et rullende eksperiment end en bil, du kan bruge til noget. Og så er den fyldt med MacBooks under motorhjelmen.
CIO
Morten Mogensens firma blev forsøgt svindlet, men snød selv svindleren: "Vi tager det som en oplevelse"
Dansk virksomhed blev bedt om af sende 100.000 kroner til en hemmelig konto via en mail, der var afsendt som en besked fra direktøren til regnskabsafdelingen. Phishing-forsøget blev opdaget, og direktøren og regnskabschefen tog en fiffig hævn.
Comon
Microsoft er klar med firmaets næste konsol: Her er lanceringsdatoen i Danmark
Det nye familiemedlem ankommer i butikkerne den 2. august. Se hvad der bydes på af nyheder til spil-og film-folket.
Channelworld
Nordmænd køber dansk software-hus - medarbejderne bliver
Norske Amesto Solutions har købt det det danske CRM-firma Adwiza, der har haft svært ved at opnå tilstrækkelig lønsomhed. Men det skal der laves om på nu, lyder det fra Norge.
White paper
Tjekliste: 10 tegn på, at du har behov for at modernisere din Backup og Recovery løsning
Gennemgå denne tjekliste for at afgøre, om dit miljø har behov for en mere moderne tilgang til backup og recovery. Hvis ikke du kan tjekke nogen af disse af, kan det være tid til at revurdere din databeskyttelse strategi.