Thema Datum  Von Nutzer Rating
Antwort
06.03.2018 15:02:38 excel0815
NotSolved
06.03.2018 15:10:00 Gast49247
NotSolved
06.03.2018 15:43:11 excel0815
NotSolved
Blau Kopieren von Textbox in nächste freie Zeile des Arbeitsblattes
06.03.2018 17:25:26 Gast36214
Solved

Ansicht des Beitrags:
Von:
Gast36214
Datum:
06.03.2018 17:25:26
Views:
580
Rating: Antwort:
 Nein
Thema:
Kopieren von Textbox in nächste freie Zeile des Arbeitsblattes

Hallo,

erstmal so, Du könntest auch noch loopen...

Option Explicit

Private Sub CommandButton1_Click()
Dim lngRow As Long
lngRow = Cells(Rows.Count, 2).End(xlUp).Row
Cells(lngRow, 2).Value = TextBox1.Value
Cells(lngRow, 3).Value = ComboBox1.Value
Cells(lngRow, 4).Value = ComboBox2.Value
Cells(lngRow, 5).Value = TextBox2.Value
Cells(lngRow, 6).Value = TextBox3.Value
Cells(lngRow, 7).Value = TextBox4.Value
Cells(lngRow, 8).Value = TextBox5.Value
Cells(lngRow, 9).Value = ComboBox3.Value
Cells(lngRow, 10).Value = TextBox6.Value
Me.Hide
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
TextBox5.Text = ""
TextBox6.Text = ""
ComboBox1.Text = ""
ComboBox2.Text = ""
ComboBox3.Text = ""
End Sub

Gruß,


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
06.03.2018 15:02:38 excel0815
NotSolved
06.03.2018 15:10:00 Gast49247
NotSolved
06.03.2018 15:43:11 excel0815
NotSolved
Blau Kopieren von Textbox in nächste freie Zeile des Arbeitsblattes
06.03.2018 17:25:26 Gast36214
Solved