Moin ...
ich hab gerade ne Denkblockade:
Folgendes Problem; Ich habe diverse CheckBoxes die ich Box1 Box2 usw genannt habe meine Sheets heissen: Eingabedaten; Benutzerdeinierte Daten ... usw
Folgendes kleines Programm:
Sub Test()
Dim i, x, m, w, wert
Sheets("Eingabedaten").Select
MsgBox "test"
If Box1.Value = True And Box2.Value = True And Box3.Value = True _
Then
MsgBox "Bitte treffen Sie eine konkrete Auswahl!"
Exit Sub
Else
If Box1.Value = True _
Then
Range("G9").Select
x = Selection
Range("H9").Select
m = Selection
For i = 1 To 1000
w = Rnd
wert = Application.WorksheetFunction.NormInv(w, x, m)
Range("C9").Value = wert
Next i
End If
End If
Nun passiert es das er mir immer wieder ausspuckt das ihm erforderliche Objekte fehlen. Ich denke zu 99,9999% das es daran liegt das er die Boxen nicht findet.
Wie müßte ich den Programmcode korriegieren damit er den Wert trotzdem bekommt?
Wäre dankbar für ein paar Tipps... ;)
Bis denne
Markus