Makrojen ja VB koodin ristiriidat?

outoa

Excelin makrossa on tällainen koodin pätkä:
Range("B:B,C:C,D:D,E:E,F:F,H:H,J:J,K:K,L:L").Select

Eli tämä valitsee BCDEFHJKL sarakkeet. Minkä takia VB koodi ei ymmärrä tätä valintaa vaan alkaa heti bugittamaan? Haittana siis se, että ei voi käyttää ohjausobjektien nappeja vaan ne täytyy tehdä lomake työkalurivin napeilla. Ärsyttävää. Vai onko VB:n koodiin olemassa yhtä yksinkertaista valintakoodia?

4

410

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • kyllä toi toimii ihan ok, jos excelissä VBA koodia väsäät-jos VB:llä niin sitten eri juttu.

      Private Sub CommandButton1_Click()
      Range("B:B,C:C,D:D,E:E,F:F,H:H,J:J,K:K,L:L").Select
      End Sub


      voit kokeilla lisätä koodiin taulukon aktivoinnin niin silloin ainakin toimii...

      esim.
      Private Sub CommandButton1_Click()
      Worksheets("Sheet1").Activate
      Range("B:B,C:C,D:D,E:E,F:F,H:H,J:J,K:K,L:L").Select
      End Sub

      • outo

        Aina tyssää koodi tuohon

        Range("B:B,C:C,D:D,E:E,F:F,H:H,J:J,K:K,L:L").Select

        kohtaan. Mikäli sitä yrittää ohjausobjekteissa käyttää.


      • outoa

        Eli tuohan toimii jos nappi on samalla välilehdellä, mutta jos haluaa esim. vaihtaa välilehteä ja sieltä tehdä valinnan niin se herkeää toimimasta.

        Private Sub CommandButton1_Click()
        Sheets("taul2").Select
        Range("A:A,B:B").Select
        End Sub

        Tuo koodin pätkä ei toimi, mutta jos ottaa Sheets("taul2").select rivin pois niin kyllä se sitten valitse taulukosta A ja B sarakkeen.


      • ....
        outoa kirjoitti:

        Eli tuohan toimii jos nappi on samalla välilehdellä, mutta jos haluaa esim. vaihtaa välilehteä ja sieltä tehdä valinnan niin se herkeää toimimasta.

        Private Sub CommandButton1_Click()
        Sheets("taul2").Select
        Range("A:A,B:B").Select
        End Sub

        Tuo koodin pätkä ei toimi, mutta jos ottaa Sheets("taul2").select rivin pois niin kyllä se sitten valitse taulukosta A ja B sarakkeen.

        ActiveSheet.Range("A:A,B:B").Select


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

    Luetuimmat keskustelut

    1. Vedonlyöntiä .

      Olen valmis lyömään ison vedon , että homma kaatuu . Jos kerta Sivonen ei lähde mukaan , niin ei tuoho usko kukaan muuka
      Ähtäri
      34
      3514
    2. rakastan jotakin

      en uskalla sanoa sitä täällä ääneen
      Ikävä
      11
      3138
    3. Mikä on sun mielestä suurin kusetus maailmassa?

      Mikä on sun mielestä suurin kusetus maailmassa?
      Ikävä
      142
      2932
    4. Mikä on pahinta, mitä kaivatullesi

      pelkäät tapahtuvan? Jos kuolemaa, vakavia sairauksia yms. ei lasketa?
      Ikävä
      103
      2635
    5. Turvaan tulleet lähettävät omia lapsiaan vaaraan - hullua

      MOT-ohjelman jakso ”Loma vaihtui kahleisiin” kertoi, kuinka Suomessa ja muualla Euroopassa asuvat somaliperheet lähettäv
      Maailman menoa
      74
      2605
    6. Minkä tunteen tunnet

      juuri nyt? ap kiitollisuuden.
      Tunteet
      44
      1435
    7. Hei Antti. Minähän varoitin jo 2 v sitten, ettei sinusta tule pääministeriä, vaikka kuinka

      voittaisit vaalit. Vasurit ovat aina puukottaneet toisiaan selkään, eivät koskaan edestäpäin. Marinistit varsinkin IL t
      6
      1308
    8. Päivi Räsänen sai kutsun kongressiin todistajaksi.

      Pystyykö Päivi pysymään totuudessa ja kertomaan kongressille, että raamattu ei ole lakikirja jota pitäisi noudattaa poli
      Maailman menoa
      396
      1145
    9. Minkä kouluarvosanan (4-10) annat Thank God, sä tulit! sarjalle?

      Katsoitko Thank God, sä tulit!? Uusi viihdeohjelma ei ollut kaikkien makuun, mutta jotkut tykkäsivät. Minkä kouluarvos
      Tv-sarjat
      50
      1043
    10. Kaikkea hyvää kaikki

      Kaikkea hyvää kaikki ja positiivisia ja hyviä asioita. Kylmää on kovia pakkasia. Pikku hiljaa kevättä kohti taas. Voimaa
      Ikävä
      6
      900
    Aihe