bei nachstehendem Code, der bei mir einwandfrei läuft, entsteht bei einem Kollegen von mir (der nicht Office XP sondern nur Excel 2002 auf seinem Rechner hat) in der Zeile TextBox8.Value....usw der Fehler:
Laufzeitfehler 13 Objekt unverträglich; welchen Hintergrund hat dies oder wie kann ich dem abhelfen?
Application.ScreenUpdating = False
If frmHauskalkulation.OptionButton1.Value = False Then
Sheets("finanzdaten").Activate
y = Range("A2:IV1000").Find(what:=frmHauskalkulation.TexteBoxe1).Row
TextBox8.Value = Sheets("finanzdaten").Cells(y, 37) * 1
TextBox9.Value = Sheets("finanzdaten").Cells(y, 38) * 1
TextBox10.Value = Sheets("finanzdaten").Cells(y, 39) * 1
myArr = Sheets("finanzdaten").Range("A2:IV1000")
Der gleiche Fehler kommt bei ihm wenn er eine Userform öffnet, die folgendermassen angesprochen wird:
UserForm2.show vbModeless
Dazu ist zu erwähnen, dass ich alle UF in diesem Programm mit dem Zusatz vbModeless öffne
Wer weiss da Rat?
Vielen Dank
PeterS.