Zelle in Spreadsheetbereich ?
19.04.2005 19:39:32
Vliegen
Versuche seit einer Weile per VBA-Code zu prüfen ob eine bestimmte doppelt angeklickte Zelle Teil eines Bereichs (Spalte B) auf einem Spreadsheet ist das ich auf einem Userform eingebunden habe. Leider recht erfolglos. Das klappt bei einem normalen Excelblatt sehr gut. Was ist beim Spreadsheet Objekt anders ? Weiss da jemand weiter ?
Gruss,
François
Hier mein Code :
Privat
Sub Spreadsheet1_DBlClick()
Dim Bereich as Range
With Me
Set Bereich = .Spreadsheet1.ActiveSheet.Columns("B:B")
If Intersect (Spreadsheet1.ActiveCell, Bereich) Is Nothing Or _ .Spreadsheet1.ActiveCell.Value = "" _
Then MsgBox "Zelle ausserhalb der Spalte B oder leer"
Else
MsgBox "Sie haben den Code " & Spreadsheet1.ActiveCell.Value & " ausgewählt
End If
End With
End Sub