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

464

    Vastaukset 4

    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. El Khamenein arkku K-Kaupan autossa?

      Kyllä kauppias hoitaa?
      Maailman menoa
      140
      1216
    2. Mahdoton tilanne

      Täällä monella tuntuu olevan jumissa oleva tilanne. Joillakin kaipuu ja ikävä on kestänyt jo vuosia. Osapuoli/puolet ova
      Ikävä
      97
      909
    3. Välillä tulee haikeus

      Et kaikki päättyi näin. Etten saanut vastauksia. Ei meitä oltu tarkoitettu. Niin se vain on.
      Ikävä
      78
      854
    4. Tunteilla leikkiminen

      Oletko leikkinyt kaivattusi tai jonkun kiinnostuneen tunteilla, pelannut jotain peliä tai pelleillyt asioilla? Miksi?
      Ikävä
      113
      805
    5. Ne katseet, ei niitä

      Voi unohtaa. Se, miten molemmat katsoi
      Ikävä
      32
      601
    6. Mä olin ihan peloissani sun lähellä

      Huomasitko? En uskaltanut edes katsoa sua. Näin sivu silmällä sun vinon hymyn. Oliko hyvä vai paha juttu kun tulit lähel
      Ikävä
      20
      519
    7. Miten jotkut kehtaa aikuisiällä kiusata

      Ihmisiä? Eikö se ole aika noloa?
      Ikävä
      97
      518
    8. On ikävä sinua ihana

      En jaksa syvempiä tuntoja enää kirjoittaa. Kaipaan sinun läsnäoloa ja läheisyyttä nainen. Hyvää yötä.
      Ikävä
      28
      513
    9. Mitä jos näkisimme

      Vyöryisikö samat tunteet uudelleen?
      Ikävä
      45
      494
    10. Kaipaamalleni naiselle

      Hyvää iltaa! Täytyy vain toivoa että törmäämme toisiimme pian Toivoo. mies
      Ikävä
      29
      447
    Aihe