Avatar billede virtualdurran Nybegynder
13. februar 2007 - 20:21 Der er 15 kommentarer og
1 løsning

Lave en simpel funktion i excel med VBA

Jeg sidder og bikser lidt med at lave funktioner i VBA. Jeg har ikke prøvet det før og kan heller ikke rigtig få det til at virke. Jeg har startet med at lave en funktion der ser sådan her ud:
Function Test (A,B)

Svar = A & B
ark1.cells (1, 1) = Svar

End Function

Jeg ha så en knap på ark1 og når jeg trykker på den, vil jeg gerne have 2 InputBox frem og de ting jeg skriver i dem, skal så vises i celle 1, 1. Har foreløbig lavet dette:

Private Sub CommandButton1_Click()

A = InputBox("Test", "Test")
B = InputBox("Test1", "Test")

Test

End Sub

Hvad gør jeg forkert? Den siger noget med "Expected: ="!?

På forhånd tak for hjælpen.
Avatar billede thesurfer Nybegynder
13. februar 2007 - 20:49 #1
Du skal jo sendes parameterene med..

Dvs:

Test(A,B)

Jeg mener at hvis Test er en Sub (i stedet for en Function), skal det være:

Test A, B
Avatar billede virtualdurran Nybegynder
13. februar 2007 - 20:57 #2
det virker heller ikke...
Avatar billede virtualdurran Nybegynder
13. februar 2007 - 21:08 #3
Har prøvet at skrive "Test A = Hej, B = Hej", men så skriver den bare FaultFault i den celle jeg har bedt om svaret!?
Avatar billede excelent Ekspert
13. februar 2007 - 21:12 #4
Function Test(A, B)

Svar = A & B
Sheets("Ark1").Cells(1, 1) = Svar

End Function

Private Sub CommandButton1_Click()

A = InputBox("Test", "Test")
B = InputBox("Test1", "Test")

Test A, B

End Sub
Avatar billede excelent Ekspert
15. februar 2007 - 16:54 #5
hvordan går det :-)
Avatar billede virtualdurran Nybegynder
17. februar 2007 - 00:07 #6
Det går bestemt ikke. Det du har skrevet der virker heller ikke. :S
Avatar billede excelent Ekspert
17. februar 2007 - 00:24 #7
tyder på din knap ikke trikker subben
prøv i stedet at indsætte denne sub og kør den


Sub tst()

A = InputBox("Test", "Test")
B = InputBox("Test1", "Test")

Test A, B

End Sub
Avatar billede virtualdurran Nybegynder
17. februar 2007 - 14:48 #8
hvad står det der tst for?
Avatar billede excelent Ekspert
17. februar 2007 - 14:53 #9
subbens navn - tilfældig valgt
Avatar billede excelent Ekspert
17. februar 2007 - 14:55 #10
så mangler vi bare at få knappen til at virke
Avatar billede virtualdurran Nybegynder
17. februar 2007 - 14:57 #11
Så virker det sku. Ved ikke hvad jeg har gjort, for er ret overbevist om at jeg havde skrevet nøjagtig det du har skrevet her, men da jeg så åbnede den idag igen, virkede det fint. :) Mange tak for hjælpen. Er det ok med dig jeg lige holder spg åbent resten af dagen, mens jeg lige tester, sådan jeg lige kan spørge hvis der bliver noget? :)
Avatar billede excelent Ekspert
17. februar 2007 - 14:59 #12
ja det er fint med mig
bare spørg løs
Avatar billede virtualdurran Nybegynder
17. februar 2007 - 15:25 #13
Nåh, nu har jeg leget lidt med det og det ser ud til jeg har fået det til at spille. Har lavet nogle forskellige functioner og de virker allesammen, så tror godt jeg kan lukke, men vil lige høre om du har forstand på access databaser? Vil nemlig lige oprette et nyt spg og kunne godt bruge en hånd der også :)
Avatar billede excelent Ekspert
17. februar 2007 - 15:50 #14
mit kendskab til acces er ret begrænset, men der er mange her på experten som hjælpe.

må jeg foreslå at du selv tager 100 point, og 50 til mig og thesurfer ?
Avatar billede thesurfer Nybegynder
17. februar 2007 - 19:24 #15
Jeg behøver ikke points for dette spørgsmål.. :-)
Avatar billede virtualdurran Nybegynder
17. februar 2007 - 23:34 #16
Så scorede du dig selv 200 piont der :) Mange tak for hjælpen ihvertfald :)
Avatar billede 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.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

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