Voiko TextBoxissa olevien merkkien määrän selvittää jollakin tapaa VBA:lla? Tai vaihtoehtoisesti taulukon jossakin solussa (yhdistetyssä) olevien merkkien määrän?
TextBoxin ominaisuuksissahan on SelLenght mutta miten tekstin voisi valita?
-Pasi-
TxtBoxin merkkien määrä?
-Pasi-
2
285
Vastaukset
tee lomakkeelle tekstiruutu ja komentopainike oletusnimillä
pituus - Len(TextBox1.Text)
ja valitsee koko tekstin ja muuttamalla esim. TextBox1.SelStart=2
TextBox1.SelLength=2
tekstistä merkit 3-4
Private Sub CommandButton1_Click()
TextBox1.SetFocus
TextBox1.SelStart = 0
TextBox1.SelLength = Len(TextBox1.Text)
End Sub
vastaavasti solusta - Len(Range("A1"))
sub Koe()
MsgBox Len(Range("A1"))
End sub- -Pasi-
Kiitoksia paljon.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Miksi juuri vasemmiston puolelta tulee niin paljon luusereita, kelapummeja jne.
Tämä asia ihmetyttää suuresti.1503795Putin lähti takki auki sotaan....
Luuli, että kolmessa päivässä hoidetaan, nyt on mennyt 3,5 vuotta eikä voitosta tietoakaan. Kaiken lisäksi putin luuli,843219SDP ylivoimainen ykkönen
En ole koskaan viitsinyt käydä äänestämässä, mutta nyt SDP:n etumatka on niin kutkuttava, että pakkohan se on vaivautua.852634Suomalainen lähti ilman takkia sotaan
Malli oli "kajander", johon kuului pelkästään kokardi, ja sotilaan itse metsästä katkoma puukeppi ryssien huitomiseen.72426Polttomoottoriauto on köyhän merkki
Kun ei ole varaa ostaa sähköautoa, niin joutuu köyhän autoa käyttämään.2472363Patteriauton ovia ei saatu auki - kuljettaja koki hirvittävän kuoleman!
”Oviongelma johti kuskin kuolemaan kolarissa – tämä ratkaisu saatetaan kieltää kokonaan Sivulliset pyrkivät tempomaan a392216Näitä venäjä-faneja tuntuu edelleen vaan riittävän - kummallista
ja lähinnä siis ihan suomalaisia. Mitä hienoa ja hyvää he näkevät maassa joka on diktatuuri, maassa jossa ei ole sananv821812- 42969
- 95958
- 53849