ich habe den folgenden Codeschnipsel:
---
Option Explicit
Public Const Planungsjahr = 2018
Public Const Schichtsprung = "25.02.2018"
Sub Datum_und_Dienst_zuweisen()
Dim Monat As Byte
Dim r As Range
Dim s As Integer
Dim TD(4) As String
Dim ND(4) As String
Dim summandA As Integer
Dim I As Object
Dim WS_Count As Integer
Dim Z As Integer
Dim Rahmenplan As Range
Dim x As Integer
'''Application.ScreenUpdating = False
' Schleife für Datumszuweisung an allen Tabellenblättern
WS_Count = ActiveWorkbook.Worksheets.Count
For Z = 1 To WS_Count
---
und möchte die beiden fett gedruckten Variablen mittels zweier Textboxen (1 und 2) in einem Userform verändern und die Änderung mittels CommandButton1 bestätigen. Aber wie stelle ich das an?