inputboxin automaattinen sulkeminen?

inputbox

Käytän makroa siirtämään valitun alueen arvot käyttäjän inputboxilla valitsemaan paikkaan:

Set Kohde = Application.InputBox("anna kohde", Type:=8) ' minne tiedot siirretään

Tuohon voi siis syöttää kohteen hiirellä. Nykyisellään käyttäjän pitää kuitenkin vielä hyväksyä kohde erikseen joko hiirellä tai painamalla enteriä. Onko mitään keinoa saada excel "painamaan automaattisesti enteriä" heti kohteen hiirellä valitsemisen jälkeen?

2

58

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • mitenkäs käyttäjä voisi sitten korjata vahinkovalinnan jos sattuisi klikkaamaan vahingossa väärää solua/aluetta ja ei olisi korjausmahdollisuutta?
      uskon, että impossible mission
      jos esim.käyttäisi selection change tapahtumaa sekin reagoi heti ekaan valintaan ja jos jotenkin kikkailisi, niin silti se valinta pitäisi sitten jotenkin kuitattua- eli unohda koko juttu.

      • inputbox

        Tiedossa olikin, ettei virhettä voisi korjata, mutta sen riskin olin valmis ottamaan. En löytänyt muualtakaan keinoa automaattiselle kuittaamiselle, joten kai se on sitten mahdotonta. Onneksi makrolla saa silti hoidettua muutamia siirtämiseen liittyviä vaiheita automatisoitua.


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. 603
      9802
    2. 24h Kirppis

      Olen muuttamassa paikkakunnalle ja mietin olisiko tälläiselle liikkeelle tarvetta alueella?
      Jämsä
      9
      2431
    3. Suomessa eletään liian pitkään

      "Ihmisten on kuoltava" Asiantuntija varoittaa: Suomi ei ole valmis siihen, että niin moni elää pitkään: ”Kaiken täytyy
      Maailman menoa
      208
      1748
    4. Kerotakaa joensuun kontiolahden paiholan laitoksesta jotain

      Mun kaveri joutuu paiholan laitokseen nyt lähi aikoina niin voisko ihmiset kertoa minkälaista siellä on tarinoita jne ja
      Joensuu
      22
      1521
    5. Näyttääkö kaivattusi

      Miten hyvältä ❤️
      Ikävä
      71
      1000
    6. Sun ulkonäkö on

      Kyllä viehättävä. Kauniit piirteet. Todella sievät. Ja olemus on ihana. Olet tehnyt vaikutuksen.
      Ikävä
      41
      947
    7. Oletko koskaan

      Tavannut/tuntenut ihmistä, jonka kanssa vuosisadan rakkaustarina olisi ollut mahdollinen, mutta joku este tuli väliin?
      Sinkut
      74
      852
    8. Olen niin haaveillut

      Sinusta. Ollut hullun rakastunut. Ajatellut kaikkea mitä yhdessä voisimme tehdä. Mutta ei ei yhtään mitään. Usko vaan lo
      Ikävä
      57
      842
    9. En voi ottaa

      Jos ikinä aiot ottaa yhteyttä, niin tee se nyt. On aika, kun todella todella tarvitsisin sinua. Naiselle.
      Ikävä
      43
      802
    10. Tuo yksi tampio vielä ilmeisesti kuvittelee

      Että joku itkee peräänsä täällä vinkuen jotain utopistista kadonnutta rakkauttaan kaksoisliekit silmissä leiskuen. Pyhä
      Ikävä
      75
      727
    Aihe