ich habe ein Problem mit Excel und VBA. Ich will eigentlich nur verhindern, daß ein Beutzer das Tabellenblatt wechsel kann. Ich kenne mich im VBA so gut wie nicht aus, aber die Ereignisse, die man dafür abfragen muß habe ich herausgefunden. Leider treten diese nie ein. Mein Makro sieht wie folgt aus:
/* Tritt überhaupt nie ein
Private Sub Worksheet_Activate(ByVal Sh As Object, _
ByVal Source As Range)
' runs when a sheet is changed
MsgBox ("ciao")
End Sub
/* Tritt nur ein, wenn auf einem Blatt etwas geändert wurde. Der Aufruf soll aber verhindert werden.
Private Sub Workbook_SheetChange(ByVal Sh As Object, _
ByVal Source As Range)
' runs when a sheet is changed
MsgBox Sh.Name
If Sh.Name = "Tabelle2" Then
Worksheets("Tabelle1").Activate
End If
End Sub
Prinzipiell will ich nur ein zweites Blatt haben, das Daten aus dem ersten Blatt übersichtlicher darstellt. Der Benutzer soll das zweite Blatt drucken können, jedoch nicht aufrufen können (technisch bedingt, da Excel von außen angesteuert wird und der Benutzer beim Beenden der Anwenung nicht in diesem Blatt stehen darf). Das Drucken würde ich dann wieder mit einem Makro versuchen.
Kann mir jemand weiterhelfen, oder bin ich sowieso auf dem Holzfällerweg?
mfg
Christian