Thema Datum  Von Nutzer Rating
Antwort
20.07.2017 21:09:15 Daniel
NotSolved
21.07.2017 01:08:39 Gast13947
NotSolved
21.07.2017 01:41:44 Gast81667
NotSolved
22.07.2017 17:47:35 Daniel
NotSolved
22.07.2017 18:09:04 Gast80088
NotSolved
22.07.2017 19:44:45 Daniel
NotSolved
22.07.2017 19:59:10 Gast63907
NotSolved
24.07.2017 13:35:24 DanielPrivate Sub Tx
NotSolved
24.07.2017 14:59:07 Gast91885
NotSolved
24.07.2017 16:14:51 Daniel
NotSolved
24.07.2017 17:07:13 Gast4733
NotSolved
24.07.2017 17:26:40 Gast33335
NotSolved
Rot mehrere Textboxen gleichzeitig ausfüllen
24.07.2017 22:05:47 Daniel
NotSolved
25.07.2017 19:28:52 Gast37363
NotSolved

Ansicht des Beitrags:
Von:
Daniel
Datum:
24.07.2017 22:05:47
Views:
603
Rating: Antwort:
  Ja
Thema:
mehrere Textboxen gleichzeitig ausfüllen

Hallo,

ja für einen Anfänger ist das schon etwas schwierig aber im Internet gibt es zum Glück einiges dazu und in so Foren wie hier gibt es auch viele hilfsbereite Menschen. Danke :).

Wäre es nicht auch möglich in diese Funktionen:

 

Private Sub EFHFillBoxes()
Static EFHNoChange As Boolean
    If Not EFHNoChange Then
      EFHNoChange = True
      ActiveSheet.Cells(1, 2).VAlue = ActiveControl.VAlue
       EFHNoChange = False
End If
End Sub

Private Sub MFHFillBoxes()
Static MFHNoChange As Boolean
    If Not MFHNoChange Then
      MFHNoChange = True
      ActiveSheet.Cells(2, 2).VAlue = ActiveControl.VAlue
       MFHNoChange = False
End If
End Sub


Private Sub EWFillBoxes()
Static EWNoChange As Boolean
    If Not EWNoChange Then
      EWNoChange = True
      ActiveSheet.Cells(3, 2).VAlue = ActiveControl.VAlue
       EWNoChange = False
End If
End Sub

Private Sub WEFillBoxes()
Static WENoChange As Boolean
    If Not WENoChange Then
      WENoChange = True
     ActiveSheet.Cells(4, 2).VAlue = ActiveControl.VAlue
      WENoChange = False
End If
End Sub

jeweilis die Variablen zu definieren "Dim WENoChange As Boolean"? Sind ja nur 4 Variablen. 


Der erste Punkt mit dem Change-Events würde dann hier eingefügt werden:?

Private Sub MultiPage_Berechnung_Change()

End Sub

hab aber nicht ganz durchgeblickt wie dieses Change-Event angewendet werden kann


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
20.07.2017 21:09:15 Daniel
NotSolved
21.07.2017 01:08:39 Gast13947
NotSolved
21.07.2017 01:41:44 Gast81667
NotSolved
22.07.2017 17:47:35 Daniel
NotSolved
22.07.2017 18:09:04 Gast80088
NotSolved
22.07.2017 19:44:45 Daniel
NotSolved
22.07.2017 19:59:10 Gast63907
NotSolved
24.07.2017 13:35:24 DanielPrivate Sub Tx
NotSolved
24.07.2017 14:59:07 Gast91885
NotSolved
24.07.2017 16:14:51 Daniel
NotSolved
24.07.2017 17:07:13 Gast4733
NotSolved
24.07.2017 17:26:40 Gast33335
NotSolved
Rot mehrere Textboxen gleichzeitig ausfüllen
24.07.2017 22:05:47 Daniel
NotSolved
25.07.2017 19:28:52 Gast37363
NotSolved