2016年2月25日星期四

[Solution] if value not found then ... vba

if value not found then ... vba

hello i am getting into vba and have built this little game 

this is a part of the code which works ok however the bit marked ****1 i want this to say "nothing found" if the the data inputted into the input box does not exist in the range! what happens at the moment if i type some rubbish into the input box i just
an error message!!! 

any ideas thanks 



dinoname:
dinoname = InputBox("what dinosaur do you want to be tested on??", "Dinotest")

Set findrange = Range("a2:a29") '.Find(dinoname).Select

findrange.Find(dinoname).Select

****1If findrange Is Nothing Then
MsgBox "nothing found"


End If

Keys to the Problem if value not found then ... vba

Download Error Fixer (Free)

Windows Restore - Totally Fix All Errors including if value not found then ... vba

  • Click on the Start button on the Taskbar.
  • Type "System Restore" (without quotes) in the Search box and hit Enter or,
  • Click on System Restore (when you see System Restore pop up  in the list of search results).
  • Make sure the "Recommended restore" radio button is checked on the restore utility window.
  • Click on Next and follow the instructions given.

Note: There is the option on the restore utility to select "Choose a different restore point". Unless you have a specific reason to select a different date and time than what Windows recommends, just select the recommended option stated in the steps above. If you choose to select another one, follow these steps:

Click on that desired date and time, and Windows 7 will perform a scan for any affected programs in that restore point.

Once completed, click Next and follow the instructions given.

Once you have selected the restore point, your system will start the restoring process, after which you will have to restart the system.

Another Safe way to Repair the Problem: if value not found then ... vba:

 

 

How to Fix if value not found then ... vba with SmartPCFixer?

1. Click the button to download Error Fixer . Install it on your system.  Open it, and it will perform a scan for your system. The junk files will be shown in the scan result.

2. After the scan is finished, you can see the errors and problems need to be repaired. Click Fix All.

3. The Repair part is finished, the speed of your computer will be much higher than before and the errors have been removed. You can also use other functions in SmartPCFixer. Like dll downloading, windows updating and print spooler error repair.


Related: Am logged on to the Wa State Empl page but cannot get the check boxes on the application to show up on my computer My computer is a Toshiba Laptop running MS Windows XP Home Edition 2002 I have pop up blocker turned off asus driver download How do you backup all files to an external harddrive with Windows XP asus drivers I see BLUE when trying to install Windows6 1 KB958559 x64 RefreshPkg msu asus motherboard drivers Samsung A50 5MP Digital Camera will not connect to my 64 bit laptop with Windows 7 asus mainboard driver download START screen on Windows 8 blank No applications visible asus driver Windows Media Center opens but the closes program by itself and offers no solution asus driver Windows updates failing with errors 800B0100 and 80073712 asus motherboard drivers Realtek AC97 audio drivers for Windows 10 Realtek AC97 audio drivers for Windows 8.1 Realtek AC97 audio drivers for Windows 8,All Programs On The Desktop Open The Windows Media Center,Adding Radial Dials To Forms In Word 2010,Adobe Flash Player Up-dates Will Not Download. Manage Add-ons Does Not Show Anything Disabled.,Anything I Type In The Search Engine Immediately Closes IE 8.,Alps Pointing Device Stops Working And Resumes.
Read More: Troubleshooter of Error: right click the blank space of desktop,menu popup very slow,Troubleshooting:my shut down button for Windows 7 always has a orange shield with an ! indicating that an one upgrade is required, but it is never is performed. Why?,Fast Solution to Error: Unprotect excel sheet,Cannot Connect to Windows Update on new Windows 7 Professional. Get Error 80072ee2. [Solved],Troubleshooting:my smart pad just stopped working so i plugged in my mouse but i don't know why my smart pad stopped working please help? Error,Programs Compatibility Application Applications App Apps Game Games Legacy Crash Crashes Hang Hangs,iMesh is not working only minimizes,How I can I restore MS-DOS backup (.bak) to Vista?,Won't connect to network, Ipconfig shows media state disconnected, Ipconfig release and renew not functional,On start-up I see: "Checking file system on C: The type of the file system is NTFS."

没有评论:

发表评论

注意:只有此博客的成员才能发布评论。