Try again in case an error : Error « Language Basics « VBA / Excel / Access / Word

VBA / Excel / Access / Word
1. Access
2. Application
3. Data Type
4. Data Type Functions
5. Date Functions
6. Excel
7. File Path
8. Forms
9. Language Basics
10. Math Functions
11. Outlook
12. PowerPoint
13. String Functions
14. Windows API
15. Word
16. XML
Java
Java Tutorial
Java Source Code / Java Documentation
Java Open Source
Jar File Download
Java Articles
Java Products
Java by API
Photoshop Tutorials
Maya Tutorials
Flash Tutorials
3ds-Max Tutorials
Illustrator Tutorials
GIMP Tutorials
C# / C Sharp
C# / CSharp Tutorial
C# / CSharp Open Source
ASP.Net
ASP.NET Tutorial
JavaScript DHTML
JavaScript Tutorial
JavaScript Reference
HTML / CSS
HTML CSS Reference
C / ANSI-C
C Tutorial
C++
C++ Tutorial
Ruby
PHP
Python
Python Tutorial
Python Open Source
SQL Server / T-SQL
SQL Server / T-SQL Tutorial
Oracle PL / SQL
Oracle PL/SQL Tutorial
PostgreSQL
SQL / MySQL
MySQL Tutorial
VB.Net
VB.Net Tutorial
Flash / Flex / ActionScript
XML
XML Tutorial
Microsoft Office PowerPoint 2007 Tutorial
Microsoft Office Excel 2007 Tutorial
Microsoft Office Word 2007 Tutorial
VBA / Excel / Access / Word » Language Basics » Error 
Try again in case an error
 
Sub TryAgain()
  Dim Value As Double
  On Error GoTo Except
  
    Value = CInt(InputBox("Enter a number:""Number"))
    Value = 10 / Value
    MsgBox "10 / " 10 * Value & "=" & Value
  
  Exit Sub
  
Except:
  If (MsgBox(Err.Description & ". Try again", vbYesNo, _
    "Try Again"= vbYesThen TryAgain

End Sub

 
Related examples in the same category
1. Properties of the Err Object
2. Raising an Error
3. Deal with the error
4. Create an error, and then query the object for the error number and description
5. Check the error number
6. Get the Error source
7. Creating a User-Defined Error
8. Viewing the Errors Stored in the Errors Collection
9. Using the LogError Routine
10. Writing Information to a Textual Error Log File
11. The Mail your Error Routine
12. Move through the Errors collection and display properties of each Error object
13. Trap the error with On Error GoTo
14. Show Error discription in MsgBox
15. Show Error Number
16. Runtime Error 9: Subscript Out of Range
17. RunTime Error 1004: Method Range of Object Global Failed
www.java2java.com | Contact Us
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.