ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

excel¥i¥H³]©wÀx¦s±ø¥ó¶Ü?

¨Ñ°Ñ¦Ò,®£¦³¤£©P

TOP

[attach]25769[/attach]¤£¦n·N«ä,·s¤HÁÙ¤£²M·¡¦^´_ªº¾Þ§@

TOP

  1. [attach]25769[/attach]
½Æ»s¥N½X

TOP

  1. Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
  2. If ¤u§@ªí3.Range("c104") < 0.4 Then
  3. MsgBox "¼Æ¦r«Ü¥iÆ[³á,¬O¤£¬O¹wºâ¦³问ÃD??"
  4. Cancel = True
  5. End If
  6. End Sub
½Æ»s¥N½X

TOP

¦^´_ 6# VANESSA
­×§ï¦n¤F½Ð°Ñ¦Ò[attach]25841[/attach]

TOP

¦^´_ 6# VANESSA
ªþ¥ó¤W¶Ç¤£¤F,ª½±µ¨BÆJ»¡©ú
1.«öAlt+F11¶i¤JVBE­¶­±,¥ªÃ䵡¤fThisworkbook¥ªÁä«ö¨â¤U
¦A¶K¤W¤U­±µ{¦¡
  1. Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
  2. If Range("c104") <= 0.04 Then
  3. MsgBox "C104 ¼Æ¦r<=4%,µLªk¦sÀÉ"
  4. cancle = True
  5. End If
  6. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¤Ó¶§¥ú¤j¡B¤÷¥À®¦¤j¡B§g¤l¶q¤j¡A¤p¤H®ð¤j¡C
ªð¦^¦Cªí ¤W¤@¥DÃD