Thema Datum  Von Nutzer Rating
Antwort
15.04.2019 14:46:39 Felix
NotSolved
15.04.2019 17:43:30 Gast88334
NotSolved
17.04.2019 13:28:01 Gast27855
NotSolved
17.04.2019 13:30:41 Gast47911
NotSolved
Rot textBox1 info per commandButton an neues
15.04.2019 19:30:09 Gast35679
NotSolved

Ansicht des Beitrags:
Von:
Gast35679		 Datum:
15.04.2019 19:30:09		 Views:
431		 Rating:
     
Antwort:
  Ja
Thema:
textBox1 info per commandButton an neues

Hallo,

gut vorab mal im Prinzip so, wenn's komplexer wird dann hör auf Alexandra...

Option Explicit

Private mobjWorkbook As Workbook

Private Sub CommandButton1_Click()
If mobjWorkbook Is Nothing Then Set mobjWorkbook = Workbooks.Add
With mobjWorkbook.ActiveSheet
     .Cells(3, 1).Value = TextBox1.Value
     .Cells(5, 4).Value = TextBox2.Value
     .Cells(8, 7).Value = TextBox3.Value
     .Cells(7, 1).Value = TextBox4.Value
End With
End Sub

Private Sub UserForm_Terminate()
Set mobjWorkbook = Nothing
End Sub

...oder einfach...

Private Sub CommandButton1_Click()
With Workbooks("MyBook.xlsm").ActiveSheet
     .Cells(3, 1).Value = TextBox1.Value
     .Cells(5, 4).Value = TextBox2.Value
     .Cells(8, 7).Value = TextBox3.Value
     .Cells(7, 1).Value = TextBox4.Value
End With
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
15.04.2019 14:46:39 Felix
NotSolved
15.04.2019 17:43:30 Gast88334
NotSolved
17.04.2019 13:28:01 Gast27855
NotSolved
17.04.2019 13:30:41 Gast47911
NotSolved
Rot textBox1 info per commandButton an neues
15.04.2019 19:30:09 Gast35679
NotSolved