Hej!
Har två olika spar- och öppningsmöjligheter i Menu editor

Öppna bok
Private Sub Öppnabok_Click()

CommonDialog.ShowOpen
If CommonDialog.FileName = "" Then Exit Sub
Open CommonDialog.FileName For Input As #1
Line Input #1, Använd

'osv....
'respektive

'Öppna bok1
Private Sub Öppnabok1_Click()

CommonDialog1.ShowOpen
If CommonDialog1.FileName = "" Then Exit Sub
Open CommonDialog1.FileName For Input As #1
Line Input #1, Använd

'osv...

'Spara bok (Sparabok)
Private Sub Sparabok_Click()

If TxtLatNamn.text = "" Then
If TxtBokensNamn.text = "" Then
MsgBox "Boken saknar namn.", 0, "Fel"
Exit Sub
End If
'osv....

'och

'Spara bok1 (Sparabok1)
Private Sub Sparabok1_Click()

If TxtLatNamn.text = "" Then
If TxtBokensNamn.text = "" Then
MsgBox "Boken saknar namn.", 0, "Fel"
Exit Sub
End If
'osv.....

Enda skillnaden är några mindre värden mellan de olika sparmomenten, men är samma titel på boken
men med två olika filändelser .bok och .bok1

Vad jag vill förhindra är att .bok1 inte av misstag ska kunna gå att spara i .bok och tvärtom.
Vad jag förstår är en Msgbox som ska felmeddela och sedan avbryta kommandot. har testat lite olika varianter men inte fått att funka.



Mvh
Kenneth

För att få en messagebox att ställa en Ja/Nej-fråga så gör du så här :
<code>
If vbYes=MsgBox("Vill du spara?",vbYesNo + vbQuestion,"Spara...") Then
' Spara här
Else
' Avbryt utan att spara...
End If
</code>

Mycket bra Per!

Tack på förhand
Kenneth