Sådan tilføjes dialogbokse til Excel-makroer med Visual Basic Editor

Du kan bruge InputBox-funktionen til at tilføje dialogbokse til dine Excel 2013-makroer. Når du kører makroen, får denne Visual Basic-funktion Excel til at vise en Input-dialogboks, hvor du kan indtaste den titel, der giver mening for det nye regneark. Makroen sætter derefter teksten ind i den aktuelle celle og formaterer denne tekst, hvis det er det, du har trænet din makro til at gøre næste gang.

For at se, hvor nemt det er at bruge InputBox-funktionen til at tilføje interaktivitet til en ellers stabil makro, skal du følge trinene for at konvertere Company_Name-makroen, der i øjeblikket indtaster teksten "Mind Over Media" til en, der faktisk beder dig om det navn, du ønsker ind. InputBox-funktionen bruger følgende syntaks:

InputBox(prompt[,titel][,standard][,xpos][,ypos][,hjælpefil,kontekst])

I denne funktion kræves kun promptargumentet , mens resten af ​​argumenterne er valgfrie. Den hurtige argument angiver meddelelse, der vises inde i dialogboksen Input boksen, hvilket fik brugeren til at indtaste en ny værdi (eller i dette tilfælde, et nyt firmanavn).

Den hurtige argument kan være op til maksimalt 1.024 tegn. Hvis du ønsker, at promptmeddelelsen skal vises på forskellige linjer inde i dialogboksen, indtaster du funktionerne Chr(13) og Chr(10) i teksten (for at indsætte henholdsvis en carriage return og en linefeed i meddelelsen).

Det valgfri titelargument angiver, hvilken tekst der skal vises i titellinjen i dialogboksen Input. Hvis du ikke angiver et titelargument , viser Excel navnet på programmet på titellinjen. Det valgfrie standardargument angiver standardsvaret, der automatisk vises i tekstboksen nederst i dialogboksen Input.

Hvis du ikke angiver et standardargument, er tekstboksen tom i dialogboksen Input.

De valgfrie xpos- og ypos- argumenter angiver den vandrette afstand fra venstre kant af skærmen til venstre kant af dialogboksen og den lodrette afstand fra den øverste kant af skærmen til den øverste kant af dialogboksen. Hvis du ikke angiver disse argumenter, centrerer Excel inputdialogboksen vandret og placerer den cirka en tredjedel af vejen lodret ned ad skærmen.

De hjælpefil og kontekst valgfrie argumenter angive navnet på den brugerdefinerede Hjælp-fil, som du stiller til rådighed for brugeren til at forklare funktionen af Input dialogboksen samt den type data, at den accepterer.

Som en del af processen med at oprette en brugerdefineret hjælpefil til brug i Excel-hjælpesystemet, tildeler du emnet et kontekstnummer, der passer til dets indhold, som derefter angives som kontekstargumentet for InputBox-funktionen.

Når du angiver en hjælpefil og et kontekstargument for denne funktion, tilføjer Excel en Hjælp-knap til den tilpassede Input-dialogboks, som brugere kan klikke på for at få adgang til den tilpassede hjælpefil i Hjælp-vinduet.

Før du kan tilføje kodelinjen til makroen med InputBox-funktionen, skal du finde det sted i Visual Basic-kommandoerne, hvor linjen skal gå. For at indtaste Mind Over Media-teksten i den aktive celle bruger Makroen Company_Name følgende Visual Basic-kommando:

ActiveCell.FormulaR1C1 = "Sind over medier"

For at tilføje interaktivitet til makroen skal du indsætte InputBox-funktionen på en linje i kodevinduet lige over denne ActiveCell.FormulaR1C1-sætning, som følger:

Placer indsættelsespunktet i kodevinduet i begyndelsen af ​​ActiveCell.FormulaR1C1-sætningen, og tryk på Enter for at indsætte en ny linje.

Nu hvor du har tilføjet en ny linje, skal du flytte indsætningspunktet op til den.

Tryk på pil op for at placere indsættelsespunktet i begyndelsen af ​​den nye linje.

På denne linje vil du oprette en variabel, der leverer promptargumentet til InputBox-funktionen. For at gøre dette skal du angive navnet på variablen (i dette tilfælde InputMsg) efterfulgt af dens aktuelle indtastning. Sørg for at omslutte beskedteksten på højre side af lighedstegnet i et lukket par dobbelte anførselstegn.

Indtast følgende kode for at oprette InputMsg-variablen på linje 8, og tryk derefter på Enter-tasten for at starte en ny linje 9:

InputMsg = "Indtast firmanavnet eller titlen for dette regneark i tekstboksen nedenfor, og klik derefter på OK:"

Dernæst opretter du en variabel med navnet InputTitle at leverer den valgfri titel argument for funktionen InputBox. Denne variabel får teksten "Regnearkstitel" til at blive vist som titlen på Input-dialogboksen. Igen skal du sørge for at sætte navnet på dialogboksens titellinje i anførselstegn.

Indtast følgende kode for at oprette InputTitle-variablen på linje 9, og tryk derefter på Enter for at indsætte en ny linje 10:

InputTitle = "Regnearks titel"

Dernæst opretter du et variabelnavn DefaultText, der leverede det valgfrie standardargument til InputBox-funktionen. Denne variabel får teksten "Mind Over Media" til at blive vist som standardindgangen i tekstboksen nederst i den tilpassede dialogboks til indtastning af firmanavn.

Indtast følgende kode for at oprette standardtekstvariablen på linje 10, og tryk derefter på Enter for at indsætte en ny linje 11:

DefaultText = "Sind over medier"

Dernæst opretter du en endelig variabel ved navn CompanyName, der angiver InputBox-funktionen som dens indgang (ved hjælp af variablerne InputMsg, InputTitle og DefaultText, som du lige har oprettet) og gemmer resultaterne af denne funktion.

Indtast følgende kode for at oprette SpreadsheetTitle-variablen, der bruger InputBox-funktionen på linje 11:

SpreadsheetTitle = InputBox(InputMsg, InputTitle, DefaultText)

Til sidst erstatter du værdien, "Mind Over Media", i ActiveCell.FormulaR1C1-egenskaben med SpreadsheetTitle-variablen (hvis værdi bestemmes af, hvad der er indtastet i dialogboksen Spreadsheet Title Input), og erstatter dermed denne konstant i makroen med midlerne til at gøre dette input virkelig interaktivt.

Vælg "Mind Over Media" på linje 12 og erstat det med SpreadsheetTitle (uden anførselstegn).

Gem den redigerede makro ved at klikke på knappen Gem på Visual Basic-værktøjslinjen og vende tilbage til regnearket ved at klikke på knappen Vis Microsoft Excel eller trykke på Alt+F11. Klik derefter på knappen Skjul i vinduesgruppen på fanen VIS.

Nu er du klar til at åbne en ny projektmappe og køre den redigerede makro ved at trykke på Ctrl+N.

Figuren viser kodevinduet med den redigerede Company_Name-makro efter tilføjelse af de udsagn, der gør den interaktiv.

Sådan tilføjes dialogbokse til Excel-makroer med Visual Basic Editor

Følgende figur viser dialogboksen Regnearktitel i aktion i regnearket. Denne inputdialogboks vises nu automatisk og beder dig om input, hver gang du kører den redigerede og nu fuldt interaktive version af Makroen Firmanavn.

Sådan tilføjes dialogbokse til Excel-makroer med Visual Basic Editor

For at gå videre og indtaste Mind Over Media i den aktuelle celle og derefter formatere den ved at bruge resten af ​​makrokommandoerne, skal du blot klikke på OK i denne brugerdefinerede dialogboks. For at indtaste og formatere navnet på en anden virksomhed, skal du blot skrive navnet på virksomheden (som automatisk erstatter Mind Over Media i tekstboksen), før du klikker OK.


Sådan blokerer du Microsoft Word fra at åbne filer i skrivebeskyttet tilstand på Windows

Sådan blokerer du Microsoft Word fra at åbne filer i skrivebeskyttet tilstand på Windows

Sådan blokerer du Microsoft Word fra at åbne filer i skrivebeskyttet tilstand på Windows Microsoft Word åbner filer i skrivebeskyttet tilstand, hvilket gør det umuligt at redigere det? Bare rolig, metoderne er nedenfor

Sådan rettes forkert udskrivning af Microsoft Word-dokumenter

Sådan rettes forkert udskrivning af Microsoft Word-dokumenter

Sådan rettes fejl ved udskrivning af forkerte Microsoft Word-dokumenter Fejl ved udskrivning af Word-dokumenter med ændrede skrifttyper, rodede afsnit, manglende tekst eller tabt indhold er ret almindelige. Men lad være

Slet pen- og highlighter-tegninger på dine PowerPoint-dias

Slet pen- og highlighter-tegninger på dine PowerPoint-dias

Hvis du har brugt pennen eller highlighteren til at tegne på dine PowerPoint-dias under en præsentation, kan du gemme tegningerne til næste præsentation eller slette dem, så næste gang du viser den, starter du med rene PowerPoint-dias. Følg disse instruktioner for at slette pen- og highlighter-tegninger: Sletning af linjer en ved […]

Indhold af stilbibliotek i SharePoint 2010

Indhold af stilbibliotek i SharePoint 2010

Style-biblioteket indeholder CSS-filer, Extensible Stylesheet Language-filer (XSL) og billeder, der bruges af foruddefinerede mastersider, sidelayouts og kontrolelementer i SharePoint 2010. For at finde CSS-filer i Style-biblioteket på et udgivelsessted: Vælg Site Actions→ View Alt webstedsindhold. Indholdet af webstedet vises. Style-biblioteket ligger i […]

Formater tal i tusinder og millioner i Excel-rapporter

Formater tal i tusinder og millioner i Excel-rapporter

Overvæld ikke dit publikum med gigantiske tal. I Microsoft Excel kan du forbedre læsbarheden af ​​dine dashboards og rapporter ved at formatere dine tal, så de vises i tusinder eller millioner.

Sådan deler og følger du SharePoint-websteder

Sådan deler og følger du SharePoint-websteder

Lær, hvordan du bruger SharePoints sociale netværksværktøjer, der lader enkeltpersoner og grupper kommunikere, samarbejde, dele og forbinde.

Sådan konverteres datoer til julianske formater i Excel

Sådan konverteres datoer til julianske formater i Excel

Julianske datoer bruges ofte i produktionsmiljøer som et tidsstempel og hurtig reference for et batchnummer. Denne type datokodning giver detailhandlere, forbrugere og serviceagenter mulighed for at identificere, hvornår et produkt blev fremstillet, og dermed produktets alder. Julianske datoer bruges også i programmering, militæret og astronomi. Forskellige […]

Sådan opretter du en Access Web App

Sådan opretter du en Access Web App

Du kan oprette en webapp i Access 2016. Så hvad er en webapp overhovedet? Nå, web betyder, at det er online, og app er kun en forkortelse for "applikation". En Custom Web App er en online databaseapplikation, der tilgås fra skyen ved hjælp af en browser. Du bygger og vedligeholder webappen i desktopversionen […]

Hurtig startlinje i SharePoint 2010

Hurtig startlinje i SharePoint 2010

De fleste sider i SharePoint 2010 viser en liste over navigationslinks på linjen Hurtig start langs venstre side af siden. Hurtig startlinjen viser links til fremhævet webstedsindhold såsom lister, biblioteker, websteder og udgivelsessider. Hurtigstartlinjen indeholder to meget vigtige links: Linket Alt webstedsindhold: […]

Hvad betyder Solver-fejlmeddelelserne i Excel?

Hvad betyder Solver-fejlmeddelelserne i Excel?

Ved simple problemer finder Solver i Excel som regel hurtigt de optimale Solver-variableværdier for objektivfunktionen. Men i nogle tilfælde har Solver problemer med at finde de Solver-variableværdier, der optimerer objektivfunktionen. I disse tilfælde viser Solver typisk en meddelelse eller en fejlmeddelelse, der beskriver eller diskuterer det problem, der […]