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?
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?
Vastaukset 3
Vanhimmat
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)
...
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