2
Powerpoint-Wie mit 1Button 2 Textboxen auf zwei verschiedenen Folien steuren?
Vorab ich habe nur sehr wenig Ahnung von Visual Basic
Ich will durch klick eines Buttons, ein Textfeld hochzählen lassen
(Das bekomme ich noch hin durch
Private Sub CommandButton1_Click()
Me.TextBox1.Text = Me.TextBox1.Text + 1)
aber auf der nächsten Folie soll auch eine Textbox sein, die den wert der vorherigen Textbox übernimmt.
Und auf dieser Folie ist wieder ein Button der den Wert der Textbox wieder erhöhen kann
Vielen Dank
(Das bekomme ich noch hin durch
Private Sub CommandButton1_Click()
Me.TextBox1.Text = Me.TextBox1.Text + 1)
aber auf der nächsten Folie soll auch eine Textbox sein, die den wert der vorherigen Textbox übernimmt.
Und auf dieser Folie ist wieder ein Button der den Wert der Textbox wieder erhöhen kann
Vielen Dank
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 147546
Url: https://administrator.de/contentid/147546
Printed on: April 26, 2024 at 21:04 o'clock
2 Comments
Latest comment
Hallo,
Private Sub CommandButton1_Click()
Me.TextBox1.Text = Me.TextBox1.Text + 1
Folienbezeichnung.TextBox2.Text = Me.TextBox2.Text + 1
oder auch
Private Sub CommandButton1_Click()
Me.TextBox1.Text = Me.TextBox1.Text + 1
Folienbezeichnung.TextBox2.Text = Me.TextBox1
Grüße aus Rostock
Wolfgang
(Netwolf)
(Das bekomme ich noch hin durch
Private Sub CommandButton1_Click()
Me.TextBox1.Text = Me.TextBox1.Text + 1)
aber auf der nächsten Folie soll auch eine Textbox sein, die den wert der vorherigen Textbox übernimmt.
Und auf dieser Folie ist wieder ein Button der den Wert der Textbox wieder erhöhen kann
Private Sub CommandButton1_Click()
Me.TextBox1.Text = Me.TextBox1.Text + 1)
aber auf der nächsten Folie soll auch eine Textbox sein, die den wert der vorherigen Textbox übernimmt.
Und auf dieser Folie ist wieder ein Button der den Wert der Textbox wieder erhöhen kann
Private Sub CommandButton1_Click()
Me.TextBox1.Text = Me.TextBox1.Text + 1
Folienbezeichnung.TextBox2.Text = Me.TextBox2.Text + 1
oder auch
Private Sub CommandButton1_Click()
Me.TextBox1.Text = Me.TextBox1.Text + 1
Folienbezeichnung.TextBox2.Text = Me.TextBox1
Grüße aus Rostock
Wolfgang
(Netwolf)
hat alles prima funktioniert!
vielen Dank
vielen Dank