Combobox caption nimeämiseen liittyvä ongelma

aakennus

Haluan nimetä taulussa "taul2" sijaitsevat comboboxit. Se onnistuu sijoittamalla seuraava koodi taul2 lehteen

Sub nimea_captions(c)
painike1.Caption = Sheets("xxx").Cells(8, c).Value
painike2.Caption = Sheets("xxx").Cells(9, c).Value
jne...
End sub

Ongelma on, että joudun kutsumaan tätä subia moduulista 1, eikä homma toimi.

Miten saan kutsuttua nimea_captions(c) toisesta moduulista? Tai miten voi muuttaa comboboxien nimet moduliin sijoitetulla subilla?

3

90

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • kunde

      comboboxilla ei ole caption ominaisuutta ...
      ehkä tarkoitit komentopainiketta tai vastaavaa
      no nimeä nyt Taul2:n ominaisuuksisa se eka Name vaikka Nappitaulu

      ja sitten koodissa
      ...
      Nappitaulukko.CommandButton1.Caption = Sheets("xxx").Cells(8, c)
      Nappitaulukko.CommandButton2.Caption = Sheets("xxx").Cells(9, c)
      ...

      • aakennus

        Juuh, tarkoitin komentopainiketta. Kiitos, nyt toimii.

        Mitenkäs tuo toinen vaihtoehto "Call nimea_captions(c)"? Onko mahdollista jotenkin?

      • kunde
        aakennus kirjoitti:

        Juuh, tarkoitin komentopainiketta. Kiitos, nyt toimii.

        Mitenkäs tuo toinen vaihtoehto "Call nimea_captions(c)"? Onko mahdollista jotenkin?

        Sub nimea_captions(c)
        Nappitaulukko.CommandButton1.Caption = NAppitaulukko.Cells(8, c)
        Nappitaulukko.CommandButton2.Caption = NAppitaulukko.Cells(9, c)
        End Sub

        Sub a()
        nimea_captions (1)
        End Sub

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. 4 kuoli kolarissa

      Kenen vastuulla tienhoito? Sohjoa ja vettä tie täynnä. Oliko säästetty tienhoidossa? Järkyttävä onnettomuus.
      Joensuu
      425
      16548

    2. Nainen, moraali on koetuksella sun kanssa

      Koen nyt olevani rappiolla ja kyllä, omaa syytäni ja itsekontrollin puutetta, mutta olethan kyllä puoleensavetävä, ettei
      Ikävä
      140
      2640

    3. Kuka on oikein

      Kaivattusi?
      Ikävä
      94
      1966

    4. Mikä on lempikuvasi

      Kaivatustasi?
      Ikävä
      86
      1849

    5. Onko kenelläkään tästä tietoo?

      https://www.haapavesi-lehti.fi/artikkeli/lukijalta-ilkka-repo-etsii-nimettoman-kirjeen-lahettajaa Olisi tärkeä saada te
      Haapavesi
      48
      1414

    6. Mitä sinä näet

      kun katsot peiliin?
      Ikävä
      98
      1295

    7. Ovatko miehet niin heikkoja ja lahjattomia, etteivät siedä tasa-arvoa?

      Muutenhan ei ole mitenkään perusteltavissa, miksi miesten pitäisi saada etuoikeuksia ja etumatkaa. Sehän tarkoittaisi, e
      Maailman menoa
      290
      1234

    8. Suomussalmi News -valvontakameran tunnisteet pojista

      Pojat on aina poikia, mutta kiusanteko ja muu ilkivalta ei ole hyväksyttävää. Suomussalmi News -ryhmässä on uunituore vi
      Suomussalmi
      34
      1230

    9. Se helpottaisi oloa jos

      Se toinen tietäisi että molemmat tykkäämme toisistamme. Se on asia mikä vaivaa ja ahdistaa minua vaikka tilanne olisikin
      Ikävä
      83
      1189

    10. Ihastukselleni

      Kun viimeksi nähtiin, niin sisälläni repesi myrsky ja salamat iskivät kuin rajuilma. En halunnut katsoa sinua, en halunn
      Ikävä
      21
      1153
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt