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

357

    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. JOKO OLETTE KUULLET, MITÄ KIURUVEDELLÄ ON SATTUNUT!

      Oletteko jo kuulleet, mitä Kiuruvedellä on sattunut, voi hyvänen aika? Aivan viime tuntien aikana olisi sattunut, jos t
      Kiuruvesi
      36
      12231
    2. V*ttuu että mä haluan sua

      Jos jotain ihmistä voi kunnolla haluta, niin hän on se. Voi Luoja auta jo! Joku jeesus hjelppa mej!
      Ikävä
      89
      4138
    3. Nolointa ikinä miehelle

      On ghostata nainen jonka kanssa on ollut ystävä tai ollu orastavaa tapailua pidemmän aikaa. Osoittaa sellaista moukkamai
      Ikävä
      108
      3921
    4. Katsoitko mua yhtään

      Kun nähtiin 🥺.
      Ikävä
      51
      3618
    5. Eli jos toisen hiki haisee ns. omaan nenään siedettävältä

      Se kertoo hyvästä yhteensopivuudesta. Selvä! Olet mies minun. 🫵🥳
      Ikävä
      53
      3288
    6. Mikä sinua eniten

      Huolestuttaa tässä tilanteessa?
      Ikävä
      110
      3240
    7. Sattuma ja muutama väärinkäsitys

      vaikuttivat siihen millaiseksi tämä kaikki muodostui. Pienet aikanaan huomaamattomat käänteet. Seuraava näytös on jo tul
      Ikävä
      34
      2109
    8. Koska olet viimeksi nähnyt ikävän kohteesi?

      Ja mitä tarjoat hänelle kun koputtaa oveesi?
      Ikävä
      38
      2082
    9. Keskusta hajoaa Palojärvi lähtee

      Suomen Keskustan ryhmä hajoaa Kemijärvellä. Kalastaja Palojärvi sai tarpeekseen ja loikkasi Sitoutumattomat Aati Virkkul
      Kemijärvi
      26
      1915
    10. On sillä rääpyä

      Tuo ex kuntajohtaja Lea Tolonen kehtaakin tulla Ähtäriin. Ajoi laivan Karille. Kari Heikkilä oikaisi taloutta, sai laiva
      Ähtäri
      11
      1603
    Aihe