Changing Cell Background Colors
At the end of this macro, two adjacent cells are selected. I need to have those cells have an RGB background of 255/255/204. Then, when the user moves away from the selected cells, the color should return to its original color. Could
someone modify this macro?
Sub FindDate()
Dim rn As Long, offset As Long 'rn is row number
Dim stdate As Date, actdate As Date 'stdate is start date, actdate is actual date
actdate = Range("A6").Value 'A6 has formula =Today()
rn = IsoWeekNumber(actdate)
If rn / 2 <> Int(rn / 2) Then rn = rn - 1
stdate = Range("A" & rn + 7).Value
offset = actdate – stdate
Range(Cells(rn + 7, 3 + offset), Cells(rn + 8, 3 + offset)).Select
End Sub
Solutions to the Problem Changing Cell Background Colors
Download Error Fixer for Free Now
It's not difficult to change the background color of the selection:
Selection.Interior.Color = RGB(255, 255, 204)
But the macro ends then and there, and it cannot specify what will happen when the user moves away from the selection, since the macro isn't running any more by then.
Don't Download Malware
Where are you getting the download?
There are malicious people who download valid copies of a popular download, modify the file with malicious software, and then upload the file with the same name. Make sure you are downloading from the developer's web page or a reputable company.
Don't install download manager
Many sites suggest or require you to install an installer or a download manager before allowing you to download a program you may be interested in downloading. These tools almost always cause your computer more problems and may even have malware or other spyware. Avoid any site claiming anything must be installed first before you can continue with your download.
Avoid advertisements on download pages
To help make money and pay for the bandwidth costs of supplying free the software, the final download page may have ads. Watch out for anything that looks like advertisements on the download page. Many advertisers try to trick viewers into clicking an ad with phrases like "Download Now", "Start Download", or "Continue" and that ad may open a separate download.
Cancel or deny any automatic download
Some sites may automatically try start a download or give the appearance that something needs to be installed or updated before the site or video can be seen. Never accept or install anything from any site unless you know what is downloading.
Recommended Method to Repair the Problem: Changing Cell Background Colors:
How to Fix Changing Cell Background Colors with SmartPCFixer?
1. Download Error Fixer . Install it on your computer. Click Scan, and it will perform a scan for your computer. The errors will be shown in the scan result.
2. After the scan is finished, you can see the errors and problems which need to be repaired.
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: How Can You Update & Download Toshiba Satellite 5105-S501 Intel PRO 10/100 Driver v.8.0.43.0,How to Update & Download Toshiba Satellite C655D-S5139 BookPlace v.2.2.7530 driver,Method to Update & Download Toshiba Satellite L655-S5073 Realtek Wireless LAN Driver v.2.00.0011,Method to Update & Download Toshiba Satellite L840-ST2N01 Sleep Utility v.1.4.0022.000104 driver,Best Way to Update & Download Toshiba Satellite Pro S300-EZ2502 Extended Tiles for Windows Mobility Center v.1.01 driver,Best Way to Download NVidia GeForce 6100 VGA Driver v.304.51 Certified,How Can You Update & Download NVidia GeForce 9300/nForce 730i VGA Driver v.310.19 Certified,Method to Download NVidia GeForce GT 330M Driver v.340.65,How Can I Update & Download NVidia GeForce GTX 590 Driver v.280.26 WHQL,Method to Download NVidia Tesla C2050 Driver v.319.17,Way to Download RealTek RTL8100C(L) Driver v.5.01,Way to Download RealTek RTL8100E Drivers v.694,Way to Update & Download RealTek RTL8101L Auto Installation Program v.6.110 driver,Method to Update & Download RealTek RTL8111G PXE and RPL ROM code v.2.58 driver,How to Update & Download RealTek RTL8411B(N) Driver v.10.003,Best Way to Update & Download ASUS A53SV nVidia Graphics Driver v.8.17.12.6686,Method to Herunterladen ASUS K75VJ Intel Rapid Storage Technology Treiber v.11.6.0.1030,How Can You Update & Download ASUS CG8580 Intel Chipset Driver v.9.3.0.1019,Method to Update & Download ASUS K41VD Intel INF Update Driver v.9.1.1.1015,Way to Update & Download ASUS Pro70T NB Probe v.3.0.0026 driver,Can't Download PP Templates Automatically To Windows 7 W/IE 8,Can't Change Drive Letter - Vista,Can't Change Homegroup Sharing Permission,Can't Connect XP Shared Printer To Win7 Except As A Local Printer.__,Can You Connect The LAN Adapter For Wii On Your Windows 7 Laptop?
Read More: chkdsk log file is only showing the first 16kb Tech Support,Troubleshooting:cant burn CD in Windows XP mode Error,Fast Solution to Error: changing the language on windows 7 Home Premium 64-Bit, from German to English,How Can I Fix - check valid directx installation message on Skype?,How to Fix Error - Cant Print-Can't uninstall-Solved-printing queu?,Can't access c drive to open programs.,Can you use just one hard drive to store a backup disk image and restore for multiple computers?,can not install Mcafee due to Java script error,,Can Word's track changes comments print in the outside border?,cannot install old software program because computer missing indeo codec driver
No comments:
Post a Comment