Idézet: r2r - Dátum: 2007. okt. 1., hétfő - 11:53
ha látszik (van előtte lévő szlopokban érték) se éppen az történik ami nekem kellene, elokod alatt semmi érték
Mellékleteink: HUP | Gamekapocs
Elküldve: 2007. 10. 01. 21:35
Idézet: r2r - Dátum: 2007. okt. 1., hétfő - 11:53
Elküldve: 2007. 10. 15. 09:18
Elküldve: 2007. 10. 15. 10:01
Idézet: Kisq - Dátum: 2007. okt. 15., hétfő - 10:18
Szerkesztette: r2r 2007. 10. 15. 10:45 -kor
Elküldve: 2007. 10. 17. 10:17
Szerkesztette: r2r 2007. 10. 17. 10:22 -kor
Elküldve: 2007. 10. 17. 12:48
Idézet: r2r - Dátum: 2007. okt. 15., hétfő - 10:01
Elküldve: 2007. 10. 18. 11:16
Idézet: r2r - Dátum: 2007. okt. 17., szerda - 11:17
Szerkesztette: r2r 2007. 10. 18. 11:23 -kor
Elküldve: 2007. 10. 18. 16:17
Idézet: r2r - Dátum: 2007. okt. 18., csütörtök - 12:16
Elküldve: 2007. 10. 19. 07:49
Idézet: negyvenketto - Dátum: 2007. okt. 18., csütörtök - 17:17
Szerkesztette: r2r 2007. 10. 19. 07:50 -kor
Elküldve: 2007. 10. 19. 13:03
Idézet: r2r - Dátum: 2007. okt. 19., péntek - 8:49
Szerkesztette: negyvenketto 2007. 10. 19. 13:04 -kor
Elküldve: 2007. 10. 19. 13:25
Idézet: negyvenketto - Dátum: 2007. okt. 19., péntek - 14:03
Elküldve: 2007. 10. 19. 15:16
Elküldve: 2007. 10. 21. 07:01
Elküldve: 2007. 10. 21. 19:46
Elküldve: 2007. 10. 21. 20:16
Idézet: zsabi - Dátum: 2007. okt. 21., vasárnap - 20:46
Elküldve: 2007. 10. 22. 20:14
Idézet: negyvenketto - Dátum: 2007. okt. 21., vasárnap - 8:01
Szerkesztette: r2r 2007. 10. 22. 20:17 -kor
Elküldve: 2007. 10. 23. 10:04
Idézet: r2r - Dátum: 2007. okt. 22., hétfő - 21:14
Szerkesztette: r2r 2007. 10. 23. 10:13 -kor
Elküldve: 2007. 11. 12. 11:14
Elküldve: 2007. 12. 06. 16:36
Elküldve: 2007. 12. 06. 21:50
Idézet: kekeckukac - Dátum: 2007. dec. 6., csütörtök - 17:36
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If IsEmpty(Sheets("Munka1").Cells(1, 1).Value) Then
MsgBox "Üres az A1 cella, így nem zárható be a munkafüzet!"
Cancel = True
End If
End SubPrivate Sub Workbook_BeforeClose(Cancel As Boolean)
If IsEmpty(Sheets("Munka1").Cells(1, 1).Value) Then
MsgBox "Üres az A1 cella, így nem zárható be a munkafüzet!"
Cancel = True
ElseIf Not ThisWorkbook.Saved Then
MsgBox "A munkafüzetet el kell menteni bezárás előtt!"
Cancel = True
End If
End Sub