Avatar billede fagpoler Novice
03. april 2009 - 14:19 Der er 3 kommentarer og
1 løsning

Tekst Dialogboks

Jeg har en dialogboks med en liste med en Redegeringsboks på med følgende kode!

Sub Makro1()
    DialogSheets("Dialogboks1").Show
End Sub

Sub Makro2()
    Selection.Characters.Text = [A1]
End Sub

Makro2 er knyttet til Ok knappen.

Det jeg gerne vil have er den tekst der står i [A1] skal sættes ind i Redegeringsboksen når man køre Dialogboksen, og når når man Trykker på Ok skal teksten der står i Redegeringsboksen indsættes i [B1]
Avatar billede supertekst Ekspert
03. april 2009 - 14:49 #1
Du skal være velkommen til at sende filen.

¨Måsle lidt nemmere at se sammenhængen!
Avatar billede eagleeye Praktikant
03. april 2009 - 15:02 #2
Du kan indsætte teksten ved det før .show linjen i macro1:

UserForm1.TextBox1.Text = Worksheets("Sheet1").Range("A1")

UserForm1: er navnet på din form
TextBox1: er navnet på dit text felt på formen
"Sheet1": er navnet på det worksheet den skal tage fra celle A1

På samme måde bør du kunne indsætte data fra dit textfejl når man trykke på ok knappen:


Worksheets("Sheet1").Range("B1") = Selection.Characters.Text
Avatar billede fagpoler Novice
07. april 2009 - 12:29 #3
Jeg har fundet en løsning på problemet.

Sheets("Dialogboks2").Select
    ActiveSheet.DrawingObjects("Edit Box 4").Select
    Selection.Characters.Text = [Oplysninger!BE1]
    Sheets("Klade").Select
    DialogSheets("Dialogboks2").Show
'===============================================

Sheets("Dialogboks2").Select 'Første trin Oplysninger
    ActiveSheet.DrawingObjects("Edit Box 4").Select
    x = Selection.Characters.Text
    Sheets("Klade").Select
    [Oplysninger!BF1] = x

Men mange tak for dit svar, hvis du ligger et svar får du dine point, eagleeye.
Avatar billede eagleeye Praktikant
09. april 2009 - 17:54 #4
Ok her et svar :-)
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
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

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