Sådan indsættes et billede Dialog i Excel 2007 VBA

February 10

Microsoft Excel 2007 er mere end rækker og kolonner af data. Dens kraftfulde værktøjer omfatter formler, funktioner, diagrammer, pivottabeller og filtrering. Desuden Excel kommer med sit eget programmeringssprog, Visual Basic for Applications (VBA). Når du optager en makro, bag kulisserne, Excel oversætter dine tastetryk i VBA-kode. Med Visual Basic Editor, kan du redigere indspillede kode og skriv din egen. Brug VBA til at give dit projekt et professionelt kant. Opret en brugerdefineret dialogboks, så klæde det op med billedet af dit valg.

Vejledning

• Åbn Visual Basic Editor. Klik på "Visual Basic" i "Code" i fanen "Udvikler".

• Vælg Vis> Project Explorer i menuen, og vælg derefter Vis> Egenskaber.

• Vælg Indsæt> UserForm fra menuen. Du vil se en tom bruger formular og Controls værktøjskasse.

• Tilføj en tekstboks til formularen. I kontrollerne Værktøjskasse, svæve hen over ikonerne for at finde tekstfeltet, som ligner "AB". Klik på ikonet. Klik brugeren formular til at sætte tekstfeltet på formularen, placere den på retten til at give plads til en etiket, og give plads over og under.

• Tilføj en etiket til formularen. Find "Label" i værktøjskassen (det ligner en stor A). Ved hjælp af samme metode, placere en etiket til venstre for tekstboksen.

• Tilføj to kommandoknapper. Find "CommandButton" i værktøjskassen. Brug samme fremgangsmåde til at placere to kommandoknapper side om side i bunden af formularen.

• klik etiketten på brugerens formular. I vinduet Egenskaber, ved siden af "Caption" forandring "Label1" til "Enter Name".

• Klik på tekstfeltet på brugerens formular. I vinduet Egenskaber for, ved siden af "(Navn)," ændring "textBox1" til "Name_txt."

• Klik på første kommando knap på brugerens formular. I vinduet Egenskaber for, ved siden af "(Navn)," forandring "CommandButton1" til "OK_btn." Ved siden af "Caption" forandring "CommandButton1" til "OK".

• Klik på den anden kommando knap på brugerens formular. I vinduet Egenskaber for, ved siden af "(Navn)," forandring "CommandButton2" til "Cancel_btn." Ved siden af "Caption" forandring "CommandButton2" til "Annuller".

• Tilføj et billede til brugeren form. I kontrollerne Værktøjskasse, klik på billedet kontrol, som ligner to bjerge og solen. Klik brugeren formular placere billedet feltet på formularen.

• Klik på billedet kontrol du har placeret på brugerens form. I vinduet Egenskaber, ved siden af "Picture", klik de tre prikker (...) til højre. Gå til et billede gemt på din computer, såsom C: \ Brugere \ Public \ Pictures \ Sample Pictures \ Garden.jpg for en udstilling af orange blomster. Dobbeltklik på det valgte billede.

• flytte og ændre størrelse kontrol på brugerens formular indtil du er tilfreds med designet.

• Dobbeltklik på "OK" knappen på brugerens formular til at åbne en kode vindue. Du vil se starten og slutningen erklæringer til underprogrammet.

• Tilføj kode mellem "Private Sub" og "End Sub" udsagn, så det lyder som følger: Private Sub OK_btn_Click () Dim LastRow så længe LastRow = arbejdsark ("Ark1") Range ("A65536") End (xlUp.. ) .Row + 1 celler (LastRow, 1) .Value = Name_txt End Sub Denne kode placerer navnet fra tekstfeltet i celle A1 på Excel-regneark. Hver gang brugeren indtaster et nyt navn og klikker "OK", det vil blive tilføjet nedenunder.

• Dobbeltklik på UserForm1 I projektet vinduet. Dobbeltklik på knappen Annuller. I koden vinduet føje kode mellem "Private Sub" og "End Sub", så rutinen følgende ordlyd: ". Annuller" Private Sub Cancel_btn_Click () UserForm1.Hide End Sub Denne kode skjuler dialogboksen, når brugeren klikker

4. Udfør rutine. Vælg Kør> Kør Sub / UserForm fra menuen. Du vil vende tilbage til Excel og se dialogboksen, herunder din valgte billede.

• Skriv et navn i tekstboksen og klik på "OK". Du vil se navnet i celle A1. Skriv et andet navn, og klik "OK". Du vil se navnet i celle A2.

• Klik på "Annuller" for at skjule dialog boksen.