Miten saan VBA:n avulla tehtyä sellaisen lomakkeen (avautuu buttonia painamalla), joka kysyy käyttäjältä tietoja ja tulostaa ne exceliin, esim. riville 3? Ja seuraavaksi kun avaa lomakkeen buttonista, niin se tulostaa ne taas seuraavalle riville.
Tarvitsen tätä toimintoa vedonlyöntiseurantaan.
Kiitoksia etukäteen.
Tarvitsen tätä toimintoa vedonlyöntiseurantaan.
Kiitoksia etukäteen.
Vastaukset 2
Vanhimmat
lisäke lomake ja sinne oletusnimillä
2 kpl label
2 kpl textbox
2 kpl commandbutton
ja liitä lomakkeelle koodi
Private Sub CommandButton1_Click()
Dim vika As Long
vika = Range("A65536").End(xlUp).Row 1
Range("A" & vika) = TextBox1
Range("A" & vika).Offset(0, 1) = TextBox2
TextBox1 = ""
TextBox2 = ""
TextBox1.SetFocus
End Sub
Private Sub CommandButton2_Click()
End
End Sub
taulukon komentopinikenappiin koodi (taulukon moduuliin)
Private Sub CommandButton1_Click()
Userform1.Show
End Sub
sitten vaan lisäät tarpeelisen määrän textboxeja ja lisäät offseteilla lisää tietoa riville tyyliin
Range("A" & vika).Offset(0, 2) = TextBox3
tai seuraavalle riville
Range("A" & vika).Offset(1, 2) = TextBox4 jne...
näillä koodeillahan tekee jo vaikka mitä
Kiitos, sain toimimaan.