Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row > 6 And Target.Row < 51 Then
Rem nur im bereich Zeile 7 bis 50
Select Case Target.Column
Case Is = 8
Rem Spalte H
SpinButton1.LinkedCell = Target.Address
Case Is = 10
Rem Spalte J
SpinButton2.LinkedCell = Target.Address
Case Is = 12
Rem Spalte L
SpinButton3.LinkedCell = Target.Address
Case Is = 14
Rem Spalte M
SpinButton4.LinkedCell = Target.Address
Case Else
Rem Andere Zellen
Debug.Print Target.Address
Exit Sub
End Select
End If
End Sub
activex steuerelement instalieren
hennes55 05.01.2007 - 380 Hits - 1 Antwort
xp achtive steuerelement deaktiviren
Win.L. 19.03.2007 - 93 Hits -
Excel VBA-Formular mit Webbrowser Steuerelement
Seradest 05.11.2007 - 149 Hits -
Kalender Steuerelement unter Vista
MichelB 06.01.2008 - 52 Hits -
Instalieren ActiveX Steuerelement
Spinnrad 30.05.2008 - 180 Hits - 1 Antwort