Private Sub OptionButton15_Click()
If OptionButton15 = True Then
Worksheets("C:\Eigene Dateien\NameTabelle1").Activate
INP = Range("D4, F7")
End If
End Sub
dies geht nicht aber irgendwie so muss es doch gehen?
Private Sub OptionButton1_Click()
Static bIsOpen As Boolean
If OptionButton1 Then
If Not (bIsOpen) Then
Workbooks.Open "C:\Eigene Dateien\NameTabelle1.xls" 'Arbeitsmappenname anpassen
bIsOpen = True
End If
End If
End Sub
Die Eigenschaft .ShowModal der Userform im VBE auf False setzen.
GreetZ Renée
Private Sub OptionButton15_Click()
Static bIsOpen As Boolean
If OptionButton15 Then
If Not (bIsOpen) Then
Workbooks.Open "C:\Eigene Dateien\NameTabelle1.xls" 'Arbeitsmappenname anpassen
bIsOpen = True
End If
End If
End Sub
Renée
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen