Excel msgbox bevitt mezők törlése

Excel msgbox bevitt mezők törlése
2017-05-30T09:04:31+02:00
2017-05-30T10:15:05+02:00
2022-10-15T22:45:33+02:00
Mravi2
A beviteli ablak a munka végén egy msgbox-al nyugtázza a feladatot. Viszont ha rossz adatokat adtunk meg akkor a mégse gomb nem törli a pillanatnyi bevitelt.

A kérdés az hogy hogyan tudom elérni hogy ha az msgbox-on a mégse gombra kattintva ne vigye fel az adatokat?

ws.Cells(iRow, 2).Value = Date ws.Cells(iRow, 3).Value = tt.Value ws.Cells(iRow, 4).Value = db.Value ws.Cells(iRow, 5).Value = ar.Value ws.Cells(iRow, 7).Value = all.Value Munka1.Cells(26, 7) = Date Munka1.Cells(26, 8) = all.Value Munka1.Cells(26, 11) = db.Value MsgBox "A bevételezés rögzitve." & vbCrLf & "Ennyi van most a raktáron: " & Munka3.Cells(8, 14), vbOKOnly + vbInformation, "Info", vbOKCancel
Mutasd a teljes hozzászólást!
If MsgBox("Akarod?",vbOkCancel,"Fejléc")=vbOk Then ws.Cells(iRow, 2).Value = Date : : : End If
Mutasd a teljes hozzászólást!

Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd