VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Zellwerte über SpinButton und ScrollBar hochzählen

Gruppe

Dialog

Bereich

ScrollBar

Thema

Zellwerte über SpinButton und ScrollBar hochzählen

Problem

Wie kann ich über in einem Tabellenblatt verankerte SpinButtons und ScrollBars Zellwerte hochzählen?

Lösung

Weisen Sie den Steuerelementen die LinkedCell-Eigenschaft zu.




ClassModule: frmHelp

Private Sub cmdOK_Click()
   Unload Me
End Sub

Private Sub tglHelp_Click()
   On Error Resume Next
   With txtHelp
      .Visible = tglHelp.Value
      .ScrollBars = fmScrollBarsBoth
      .SetFocus
      .SelStart = 0
   End With
End Sub

Private Sub UserForm_Initialize()
   txtHelp.Visible = False
   'txtHelp.Text = WorksheetFunction.Substitute(Range("A1").Value, vbLf, "")
   txtHelp.Text = Range("A1").Value
End Sub

StandardModule: Modul1

Sub DialogAufruf()
   frmHelp.Show
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Dialog und ScrollBar