InputBox-funktion käyttäminen Excel 2016 VBA:ssa

VBA InputBox -toiminto on hyödyllinen yksittäisen käyttäjän Excle 2016:ssa kirjoittaman tiedon saamiseksi. Tieto voi olla arvo, tekstimerkkijono tai jopa alueosoite. Tämä on hyvä vaihtoehto UserFormin kehittämiseen, kun tarvitset vain yhden arvon.

InputBox-syntaksi

Tässä on yksinkertaistettu versio InputBox-funktion syntaksista:

InputBox(kehote[, otsikko][, oletus])

InputBox-funktio hyväksyy tässä luetellut argumentit.

Perustelu Mihin se vaikuttaa
Kehote Syöttöruudussa näkyvä teksti
Otsikko Syöttöruudun otsikkorivillä näkyvä teksti
(valinnainen)
Oletus Käyttäjän syötteen oletusarvo (valinnainen)

Esimerkki InputBoxista

Tässä on lausunto, joka näyttää, kuinka voit käyttää InputBox-toimintoa:

TheName = InputBox("Mikä on nimesi?", "Tervehdys"

Kun suoritat tämän VBA-käskyn, Excel näyttää tämän valintaikkunan. Huomaa, että tämä esimerkki käyttää vain kahta ensimmäistä argumenttia eikä anna oletusarvoa. Kun käyttäjä syöttää arvon ja napsauttaa OK, koodi määrittää arvon muuttujalle TheName.

InputBox-funktion käyttäminen Excel 2016 VBA:ssa

InputBox-toiminto näyttää tämän valintaikkunan.

Seuraava esimerkki käyttää kolmatta argumenttia ja tarjoaa oletusarvon. Oletusarvo on Excelin tallentama käyttäjänimi (sovellusobjektin UserName-ominaisuus).

Sub GetName()
  Dim TheName merkkijonona
  TheName = InputBox("Mikä on nimesi?", _
    "Tervehdys", Application.UserName)
Lopeta ala

InputBox näyttää aina Peruuta-painikkeen. Jos käyttäjä napsauttaa Peruuta, InputBox-funktio palauttaa tyhjän merkkijonon.

VBA:n InputBox-toiminto palauttaa aina merkkijonon, joten jos haluat saada arvon, koodisi on tehtävä lisätarkistus. Seuraava esimerkki käyttää InputBox-funktiota numeron saamiseksi. Se käyttää IsNumeric-funktiota tarkistaakseen, onko merkkijono numero. Jos merkkijono sisältää numeron, kaikki on kunnossa. Jos käyttäjän syötettä ei voida tulkita numeroksi, koodi näyttää viestiruudun.

Sub AddSheets()
  Himmeä kehote merkkijonona
  Himmeä kuvateksti merkkijonona
  Dim DefValue As Long
  Dim NumSheets merkkijonona
  Prompt = "Kuinka monta arkkia haluat lisätä?"
  Kuvateksti = "Kerro minulle…"
  Oletusarvo = 1
  NumSheets = InputBox (kehote, kuvateksti, oletusarvo)
  Jos NumSheets = "" Poistu alivalikosta Peruutettu
  Jos IsNumeric(NumSheets) Sitten
    Jos NumSheets > 0 Sitten Sheets.Add Count:=NumSheets
  Muu
    Viestilaatikko "Virheellinen numero"
  Loppu Jos
Lopeta ala

Tarkista tämän rutiinin tuottama valintaikkuna.

InputBox-funktion käyttäminen Excel 2016 VBA:ssa

Toinen esimerkki InputBox-toiminnon käytöstä.

Toinen InputBox-tyyppi

Tässä esitetyt tiedot koskevat VBA:n InputBox-toimintoa. Microsoft näyttää rakastavan sekaannusta, joten sinulla on myös pääsy InputBox- menetelmään , joka on Application-objektin menetelmä.

Yksi Application InputBox -menetelmän käytön suuri etu on, että koodisi voi pyytää alueen valintaa. Käyttäjä voi sitten valita alueen laskentataulukosta korostamalla solut. Tässä on nopea esimerkki, joka kehottaa käyttäjää valitsemaan alueen:

Sub GetRange()
  Dim Rng As Range
  Virheestä Jatka seuraavaksi
  Aseta Rng = Application.InputBox _
    (prompt:="Määritä alue:", Tyyppi:=8)
  Jos Rng ei ole mitään, poistu Subista
  MsgBox "Valitsit alueen" & Rng.Address
Lopeta ala

Tältä se näyttää.

InputBox-funktion käyttäminen Excel 2016 VBA:ssa

Käytä Application InputBox -menetelmää alueen saamiseksi.

Tässä yksinkertaisessa esimerkissä koodi kertoo käyttäjälle valitun alueen osoitteen. Tosielämässä koodisi tekisi jotain hyödyllistä valitulle alueelle. Hieno asia tässä esimerkissä on, että Excel huolehtii virheiden käsittelystä. Jos syötät jotain, joka ei ole väli, Excel kertoo sinulle siitä ja antaa sinun yrittää uudelleen.

Application.InputBox-menetelmä on samanlainen kuin VBA:n InputBox-toiminto, mutta siinä on myös joitain eroja. Katso täydelliset tiedot ohjejärjestelmästä.


Kuinka estää Microsoft Wordia avaamasta tiedostoja vain luku -tilassa Windowsissa

Kuinka estää Microsoft Wordia avaamasta tiedostoja vain luku -tilassa Windowsissa

Kuinka estää Microsoft Wordia avaamasta tiedostoja vain luku -tilassa Windowsissa Microsoft Word avaa tiedostot vain luku -tilassa, jolloin niiden muokkaaminen on mahdotonta? Älä huoli, menetelmät ovat alla

Microsoft Word -asiakirjojen virheellisen tulostuksen korjaaminen

Microsoft Word -asiakirjojen virheellisen tulostuksen korjaaminen

Virheiden korjaaminen virheellisten Microsoft Word -asiakirjojen tulostuksessa. Virheet tulostettaessa Word-asiakirjoja, joissa on muuttuneet fontit, sotkuiset kappaleet, puuttuva teksti tai kadonnut sisältö ovat melko yleisiä. Älä kuitenkaan

Pyyhi kynä- ja korostuspiirrokset PowerPoint-dioistasi

Pyyhi kynä- ja korostuspiirrokset PowerPoint-dioistasi

Jos olet piirtänyt PowerPoint-dioihin esityksen aikana kynää tai korostuskynää, voit tallentaa piirustukset seuraavaa esitystä varten tai poistaa ne, jotta seuraavan kerran näytät ne. Aloitat puhtailla PowerPoint-dioilla. Pyyhi kynä- ja korostuskynäpiirrokset noudattamalla näitä ohjeita: Pyyhi rivit yksi kerrallaan […]

Tyylikirjaston sisältö SharePoint 2010:ssä

Tyylikirjaston sisältö SharePoint 2010:ssä

Tyylikirjasto sisältää CSS-tiedostoja, Extensible Stylesheet Language (XSL) -tiedostoja ja kuvia, joita käyttävät ennalta määritetyt sivupohjat, sivuasettelut ja säätimet SharePoint 2010:ssä. CSS-tiedostojen etsiminen julkaisusivuston tyylikirjastosta: Valitse Sivuston toiminnot→ Näytä Kaikki sivuston sisältö. Sivuston sisältö tulee näkyviin. Style-kirjasto sijaitsee […]

Muotoile numerot tuhansiksi ja miljooniksi Excel-raporteissa

Muotoile numerot tuhansiksi ja miljooniksi Excel-raporteissa

Älä hukuta yleisöäsi jättimäisillä numeroilla. Microsoft Excelissä voit parantaa koontinäyttöjesi ja raporttiesi luettavuutta muotoilemalla numerot näyttämään tuhansia tai miljoonia.

SharePoint-sivustojen jakaminen ja seuraaminen

SharePoint-sivustojen jakaminen ja seuraaminen

Opi käyttämään SharePointin sosiaalisen verkostoitumisen työkaluja, joiden avulla yksilöt ja ryhmät voivat kommunikoida, tehdä yhteistyötä, jakaa ja pitää yhteyttä.

Kuinka muuntaa päivämäärät Julian-muotoihin Excelissä

Kuinka muuntaa päivämäärät Julian-muotoihin Excelissä

Juliaanisia päivämääriä käytetään usein valmistusympäristöissä aikaleimana ja pikaviitteenä eränumerolle. Tämän tyyppisen päivämääräkoodauksen avulla jälleenmyyjät, kuluttajat ja huoltoedustajat voivat tunnistaa tuotteen valmistusajankohdan ja siten tuotteen iän. Julian-päivämääriä käytetään myös ohjelmoinnissa, armeijassa ja tähtitiedessä. Erilainen […]

Access-verkkosovelluksen luominen

Access-verkkosovelluksen luominen

Voit luoda verkkosovelluksen Access 2016:ssa. Mikä verkkosovellus sitten on? No, verkko tarkoittaa, että se on verkossa, ja sovellus on vain lyhenne sanoista "sovellus". Mukautettu verkkosovellus on online-tietokantasovellus, jota käytetään pilvestä selaimen avulla. Rakennat ja ylläpidät verkkosovellusta työpöytäversiossa […]

Pikakäynnistyspalkki SharePoint 2010:ssä

Pikakäynnistyspalkki SharePoint 2010:ssä

Useimmat SharePoint 2010:n sivut näyttävät navigointilinkkien luettelon pikakäynnistyspalkissa sivun vasemmassa reunassa. Pikakäynnistyspalkki näyttää linkit esitellyn sivuston sisältöön, kuten luetteloihin, kirjastoihin, sivustoihin ja julkaisusivuihin. Pikakäynnistyspalkki sisältää kaksi erittäin tärkeää linkkiä: Koko sivuston sisältö -linkki: […]

Mitä Ratkaisijan virheilmoitukset Excelissä tarkoittavat?

Mitä Ratkaisijan virheilmoitukset Excelissä tarkoittavat?

Yksinkertaisille ongelmille Excelin Ratkaisija löytää yleensä nopeasti optimaaliset Ratkaisijamuuttujien arvot tavoitefunktiolle. Mutta joissakin tapauksissa Ratkaisijalla on vaikeuksia löytää Solver-muuttujan arvoja, jotka optimoivat tavoitefunktion. Näissä tapauksissa Ratkaisija näyttää yleensä viestin tai virheilmoituksen, joka kuvaa tai käsittelee ongelmaa, jonka […]