Az InputBox funkcióval párbeszédpaneleket adhat hozzá Excel 2013 makróihoz. A makró futtatásakor a Visual Basic funkció hatására az Excel egy Beviteli párbeszédpanelt jelenít meg, ahol megadhatja az új munkalapnak megfelelő címet. A makró ezután a szöveget az aktuális cellába helyezi, és formázza a szöveget, ha erre tanította a makrót a következő lépésre.
Ha látni szeretné, milyen egyszerű az InputBox funkció használata interaktivitás hozzáadására egy egyébként makróhoz, kövesse a jelenleg a „Mind Over Media” szöveget beíró Company_Name makró konvertálásának lépéseit olyanná, amely ténylegesen a kívánt nevet kéri. belépett. Az InputBox függvény a következő szintaxist használja:
InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])
Ebben a függvényben csak a prompt argumentumra van szükség, a többi argumentum opcionális. A prompt argumentum megadja a Bevitel párbeszédpanelen megjelenő üzenetet, amely új érték (vagy ebben az esetben új cégnév) megadására kéri a felhasználót.
A prompt argumentum legfeljebb 1024 karakterből állhat. Ha azt szeretné, hogy a prompt üzenet a párbeszédpanel különböző sorain jelenjen meg, akkor írja be a Chr(13) és Chr(10) függvényeket a szövegbe (a kocsivissza és egy soremelés beszúrásához az üzenetbe).
Az opcionális title argumentum meghatározza, hogy milyen szöveg jelenjen meg a Bevitel párbeszédpanel címsorában. Ha nem ad meg cím argumentumot, az Excel megjeleníti az alkalmazás nevét a címsorban. Az opcionális alapértelmezett argumentum azt az alapértelmezett választ adja meg, amely automatikusan megjelenik a beviteli párbeszédpanel alján található szövegmezőben.
Ha nem ad meg alapértelmezett argumentumot, a szövegmező üres a Bevitel párbeszédpanelen.
Az xpos és ypos opcionális argumentumok a képernyő bal széle és a párbeszédpanel bal széle közötti vízszintes távolságot, valamint a képernyő felső széle és a párbeszédpanel felső széle közötti függőleges távolságot határozzák meg. Ha nem adja meg ezeket az argumentumokat, az Excel vízszintesen középre állítja a beviteli párbeszédpanelt, és függőlegesen a képernyőn lefelé körülbelül egyharmadára helyezi el.
A súgófájl és a kontextus opcionális argumentumai meghatározzák az egyéni súgófájl nevét, amelyet elérhetővé tesz a felhasználó számára, hogy elmagyarázza a beviteli párbeszédpanel működését, valamint az általa elfogadott adatok típusát.
Az Excel Súgórendszerben használható egyéni súgófájl létrehozásának folyamata részeként a témakörhöz a tartalmának megfelelő környezeti számot rendel, amely azután az InputBox függvény kontextusargumentumaként kerül megadásra .
Ha megad egy súgófájlt és kontextus argumentumot ehhez a funkcióhoz, az Excel hozzáad egy Súgó gombot az egyéni beviteli párbeszédpanelhez, amelyre kattintva a felhasználók hozzáférhetnek az egyéni súgófájlhoz a Súgó ablakban.
Mielőtt az InputBox funkcióval hozzáadhatná a kódsort a makróhoz, meg kell találnia azt a helyet a Visual Basic parancsokban, ahová a sornak el kell kerülnie. A Mind Over Media szöveg aktív cellába való beírásához a Company_Name makró a következő Visual Basic parancsot használja:
ActiveCell.FormulaR1C1 = "Mind Over Media"
A makró interaktivitásának hozzáadásához be kell illesztenie az InputBox függvényt egy sorba a Code ablakban, közvetlenül az ActiveCell.FormulaR1C1 utasítás felett, az alábbiak szerint:
Helyezze el a beszúrási pontot a Code ablakban az ActiveCell.FormulaR1C1 utasítás elejére, és nyomja meg az Enter billentyűt egy új sor beszúrásához.
Most, hogy hozzáadott egy új sort, fel kell mozgatnia a beszúrási pontot.
Nyomja meg a felfelé mutató nyíl gombot, hogy a beszúrási pontot az új sor elejére helyezze.
Ezen a sorban szeretne létrehozni egy változót, amely megadja a prompt argumentumot az InputBox függvénynek. Ehhez adja meg a változó nevét (ebben az esetben az InputMsg), majd az aktuális bejegyzést. Ügyeljen arra, hogy az egyenlőségjel jobb oldalán lévő üzenet szövegét zárt kettős idézőjelben tegye.
Írja be a következő kódot az InputMsg változó létrehozásához a 8. sorban, majd nyomja meg az Enter billentyűt egy új 9. sor indításához:
InputMsg = "Írja be a munkalaphoz tartozó cégnevet vagy címet az alábbi szövegmezőbe, majd kattintson az OK gombra:"
Ezután hozzon létre egy InputTitle nevű változót, amely megadja az InputBox függvény opcionális title argumentumát. Ez a változó a „Táblázat címe” szöveget jeleníti meg a beviteli párbeszédpanel címeként. Ismét ügyeljen arra, hogy a párbeszédpanel címsorának nevét idézőjelek közé tegye.
Írja be a következő kódot az InputTitle változó létrehozásához a 9. sorban, majd nyomja meg az Enter billentyűt egy új 10. sor beszúrásához:
InputTitle = "Táblázat címe"
Ezután hozzon létre egy DefaultText változónevet, amely megadta az InputBox függvény opcionális alapértelmezett argumentumát. Ez a változó a „Mind Over Media” szöveget alapértelmezett bejegyzésként jeleníti meg az egyéni cégnév bevitele párbeszédpanel alján található szövegmezőben.
Írja be a következő kódot a DefaultText változó létrehozásához a 10. sorban, majd nyomja meg az Enter billentyűt egy új 11. sor beszúrásához:
DefaultText = "Mind Over Media"
Ezután hozzon létre egy CompanyName nevű utolsó változót, amely az InputBox függvényt adja meg bejegyzésként (az imént létrehozott InputMsg, InputTitle és DefaultText változók használatával), és tárolja a függvény eredményeit.
Írja be a következő kódot a SpreadsheetTitle változó létrehozásához, amely az InputBox függvényt használja a 11. sorban:
SpreadsheetTitle = InputBox(InputMsg, InputTitle, DefaultText)
Végül lecseréli a „Mind Over Media” értéket az ActiveCell.FormulaR1C1 tulajdonságban a SpreadsheetTitle változóra (amelynek az értékét a Spreadsheet Title Input párbeszédpanelen beírt adatok határozzák meg), így a makróban ezt az állandót a következőre cseréljük. az eszközök annak érdekében, hogy ez a bemenet valóban interaktív legyen.
Válassza a „Mind Over Media” lehetőséget a 12. sorban, és cserélje ki a SpreadsheetTitle-re (idézőjelek nélkül).
Mentse el a szerkesztett makrót a Visual Basic eszköztár Mentés gombjára kattintva, majd térjen vissza a munkalaphoz a Microsoft Excel megtekintése gombra vagy az Alt+F11 billentyűkombinációval. Ezután kattintson az Elrejtés gombra a NÉZET lap Ablak csoportjában.
Most készen áll egy új munkafüzet megnyitására és a szerkesztett makró futtatására a Ctrl+N lenyomásával.
Az ábrán a Kód ablak látható a szerkesztett Cégnév makróval az interaktívvá tevő utasítások hozzáadása után.
A következő ábra a Táblázat címe párbeszédpanelt mutatja működés közben a munkalapon. Ez a beviteli párbeszédpanel most automatikusan megjelenik, és bevitelt kér, amikor futtatja a Company_Name makró szerkesztett és immár teljesen interaktív verzióját.
Ha tovább szeretne lépni, és beírja a Mind Over Media szót az aktuális cellába, majd formázza azt a többi makróparancs használatával, kattintson az OK gombra ezen az egyéni párbeszédpanelen. Egy másik cég nevének megadásához és formázásához egyszerűen írja be a cég nevét (amely automatikusan lecseréli a Mind Over Media szövegdobozában), mielőtt az OK gombra kattintana.
Lábjegyzetek és végjegyzetek létrehozása a Word 2013-ban. Részletes útmutató, hogyan készíthet különféle stílusú jegyzeteket bibliográfiai információkhoz vagy magyarázó megjegyzésekhez.
Tudjon meg mindent arról, hogyan lehet az Excelben kiemelni a statisztikailag kiugró értékeket, mégpedig egyszerű eszközökkel és módszerekkel. Kiemelt figyelmet fordítunk a kiugró értékek azonosítására és kezelésére.
Az Excel Mintavételi eszközével véletlenszerűen kiválaszthat elemeket egy adatkészletből vagy választhat minden n-edik elemet. Ismerje meg, hogyan használhatja ezt a hasznos funkciót az adatelemzéshez!
Fedezze fel a Microsoft Word 2019 legjobb trükkjeit, amelyek segítenek a hatékonyabb munkavégzésben. Tudd meg, hogyan használhatod ki a program funkcióit!
A Word 2019-ben a bekezdések igazítása és behúzása kulcsfontosságú a dokumentumok megfelelő megjelenítéséhez. Ismerje meg a formázási lehetőségeket és tippeket a hatékonyabb munkához.
Fedezze fel, hogyan használhatja az Excel 2019 Solver bővítményt a komplex problémák megoldására. A célcella, változócellák és kényszerek beállítása lépésről lépésre.
A Word lehetővé teszi dinamikus elemek hozzáadását a dokumentumhoz. Fedezze fel, hogyan lehet különböző mezőket használni a Word programban a dinamikus tartalom létrehozásához.
A SharePoint 2010 oszlopai az adatok tárolására szolgálnak. Fedezze fel a különböző oszlop típusokat és azok alkalmazását a SharePoint rendszeren belül.
A Word 2013 szövegtörlésének képessége kulcsfontosságú, legyen szó szövegalkotásról vagy törlésről. Ismerje meg a hatékony szövegtörlési módszereket!
A fotóalbum funkció a PowerPoint 2016-ban lehetővé teszi, hogy egyszerre több fényképet illesszen be egy prezentációba, megkönnyítve ezzel a többszörös képek kezelését.
