- #1
0
0815User
Mitglied
Themenersteller
- Dabei seit
- 21.12.2005
- Beiträge
- 17
- Reaktionspunkte
- 0
Hi,
ich habe in Excel 2000 mehrere Listenfelder (Listboxen) aus der Steuerelement-Tollbox integriert, welche die Auswahl in die aktuellste Zeile eintragen. Dies funktioniert auch recht gut.
Doch mein Problem liegt darin, dass ab und zu einige dieser Listboxen nach dem Öffnen der Datei inaktiv sind, andere aber nicht. Erst wenn ich den Entwurfsmodus mehrmal aktiviere und beende sind auch diese inaktiven Boxen verwendbar und verrichten ihren Dienst. Beim Erneuten Öffnen das gleiche Spiel wieder.
Alle Listboxen verwenden das gleiche VBA Script.
Hier ist das Script, recht einfach, vielleicht auch umständlich, aber es tut: ;D
Hat jemand eine Idee, wie ich das lösen kann?
Danke & Gruß
Markus
ich habe in Excel 2000 mehrere Listenfelder (Listboxen) aus der Steuerelement-Tollbox integriert, welche die Auswahl in die aktuellste Zeile eintragen. Dies funktioniert auch recht gut.
Doch mein Problem liegt darin, dass ab und zu einige dieser Listboxen nach dem Öffnen der Datei inaktiv sind, andere aber nicht. Erst wenn ich den Entwurfsmodus mehrmal aktiviere und beende sind auch diese inaktiven Boxen verwendbar und verrichten ihren Dienst. Beim Erneuten Öffnen das gleiche Spiel wieder.
Alle Listboxen verwenden das gleiche VBA Script.
Hier ist das Script, recht einfach, vielleicht auch umständlich, aber es tut: ;D
Code:
Dim var As Integer
Dim offset As Integer
Dim last As Integer
Private Sub Agent1_Click()
offset = 13
last = Range(a12).Value
var = offset + last 'Berechnung der aktuellen Zeile'
Worksheets(Table).Range(h & var).Value = Agent1.Text
End Sub
'dieser Abschnitt diente als Vorlage für die anderen Listboxen'
Hat jemand eine Idee, wie ich das lösen kann?
Danke & Gruß
Markus