Avatar billede jjdk Nybegynder
06. maj 2004 - 12:25 Der er 10 kommentarer og
1 løsning

VBA og hente celleindhold ind i UserForms

Hej
Jeg har i VBA lavet nogle UserForms med tekstindhold.
Kan det lade sig gøre, at hente tal fra en celle i regnearket til Userformen. Hvis ja, er jeg også interesseret i at højre, hvordan tallet formateres i Userformen, så det står med tusindtalsseperator og 2 decimaler.
Avatar billede bak Forsker
06. maj 2004 - 12:46 #1
Så står det fuldstændig som i cellen (A1)
Me.TextBox1 = Range("a1").Text
Avatar billede bak Forsker
06. maj 2004 - 12:47 #2
Jeg udelod måske noget

Private Sub UserForm_Initialize()
Me.TextBox1 = [a1].Text
End Sub
Avatar billede jjdk Nybegynder
06. maj 2004 - 13:16 #3
For at jeg kan skrive noget i Userformen, skal jeg vælge "Label". Det har jeg gjort, hvor jeg så skriver præcis, som du har beskrevet først. Endvidere har jeg skrevet i Modules, den tekst de skrev anden gang. Jeg har nok gjort noget forkert - for det virker ikke.
Jeg har mange ark i min projektmappe. Hvordan vælger jeg en bestemt celle i en bestemt ark.
Avatar billede bak Forsker
06. maj 2004 - 13:22 #4
højreklik på userformen og vælg "Show Code"

indsæt så


Private Sub UserForm_Initialize()
Me.Label1 = Sheets("MitDatArk").Range("a1").Text
End Sub

Dette forudsætter at din label hedder Label1
Avatar billede bak Forsker
06. maj 2004 - 13:24 #5
Du skal selvfølgelig ændre
Me.Label1 = Sheets("MitDatArk").Range("a1").Text

så det refererer til dit eget arknavn og celle
Avatar billede jjdk Nybegynder
06. maj 2004 - 13:30 #6
Det er så gjort, men hvad skriver jeg i min label. Den hedder i øvrigt Label3
Avatar billede jjdk Nybegynder
06. maj 2004 - 13:45 #7
I koden til Userformen, har jeg skrevet følgende:
Me.Label3 = Sheets("Satser").Range("b4").Text

Men jeg er så i tvilv om, hvad jeg skriver helt præcis i min Label3?
Avatar billede jjdk Nybegynder
06. maj 2004 - 13:49 #8
Jeg prøvede med at skrive følgende i min Label 3:
Me.Textbox1
Og det lader til at det nu virker.
Sidste spørgsmål - Hvis jeg skal have flere tal i min Userform fra forskellige celler, hvad gør jeg så?
Avatar billede bak Forsker
06. maj 2004 - 13:52 #9
du skriver ingenting. når du kører formen, udfyldes label3 med automatisk med det der står i Sheets("Satser").Range("b4").
Avatar billede jjdk Nybegynder
06. maj 2004 - 15:48 #10
Så virker det, og det er sørme lykkedes for mig, at hente data fra flere celler ind i samme Userform.
Tak for hjælpen.
Gi'r du lige et svar.
Avatar billede bak Forsker
06. maj 2004 - 16:02 #11
ok :-)
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