ferdinand.k Mester
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 Forsker
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 Mester
07. januar 2013 - 20:00 #2
Det spiller - Tak. Men jeg fortår sgu ikke lige de der dobbelt-plinger ?!
store-morten Forsker
07. januar 2013 - 20:04 #3
dobbelt-plinger ?!
store-morten Forsker
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 Mester
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
Jens Højgaard skrev negativ anmeldelse på Trustpilot - nu er han blevet sagsøgt for 11.419 kroner
En negativ anmeldelse på Trustpilot om et inkassofirma har indtil videre kostet den selvstændige hvidevare-reparatør Jens Høgni Højgaard flere tusinde kroner og en tur i retten. Forklaringen er, at inkassofirmaet har forbudt kunder at udtale sig negativt i offentlighed om selskabet.
CIO
Lille it-virksomhed med 18 ansatte: "Sådan vinder vi de offentlige udbudsopgaver"
Hvis man er lille og vågen, kan man sagtens hugge de udbudsopgaver, der tidligere gik til de store firmaer. På et enkelt år er der næsten sket en fordobling i antallet af virksomheder under 20 personer, som vinder udbudsopgaver. Her kan du møde en af dem.
Comon
Test af Jabra Elite Sport: Det er fedt - men kan du leve med kompromisserne?
Ægte trådløse headsets uden nogen former for kabler er så småt begyndt at dukke op. Vi tester Elite Sport med indbygget pulsmåler fra danske Jabra.
Channelworld
Overblik: Det ved vi efter første retsmøde i den store Atea-bestikkelsessag
Den første sag om bestikkelse af offentlige ansatte kører i disse dage, hvor offentlige ansatte anklages for at have modtaget bestikkelse fra it-giganten Atea.
White paper
Case: Uafhængig rådgivning bragte uventet navn på banen for Icopal
Icopal lyttede til uafhængig rådgivning fra Kompetera, og det bragte et uventet navn inden for storage på banen, da man skulle udskifte det gamle storagesystem.