| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Require a macro for Excel 2007
I need a macro that will check out a given range( say a1 to z100)
As it checkd ther range(a1..z100) if there is NOT data in the cell, replace the blank cell with $0.00 I appreciate all the help I am getting from this site |
|
#2
Posted to microsoft.public.excel.newusers
|
|||
|
|||
|
Require a macro for Excel 2007
Hi
Try this: Sub FillRange() Dim TargetRange As Range Set TargetRange = Range("A1:Z100") For Each c In TargetRange If c.Value = "" Then c.Value = Format("0", "$0.00") Next End Sub Regards, Per "pcor" skrev i meddelelsen ... I need a macro that will check out a given range( say a1 to z100) As it checkd ther range(a1..z100) if there is NOT data in the cell, replace the blank cell with $0.00 I appreciate all the help I am getting from this site |
|
#3
Posted to microsoft.public.excel.newusers
|
|||
|
|||
|
Require a macro for Excel 2007
Just great. An now if I may.
How do I replace at these $0.00 with a blank Thanks very much "pcor" wrote: I need a macro that will check out a given range( say a1 to z100) As it checkd ther range(a1..z100) if there is NOT data in the cell, replace the blank cell with $0.00 I appreciate all the help I am getting from this site |
|
#4
Posted to microsoft.public.excel.newusers
|
|||
|
|||
|
Require a macro for Excel 2007
Hi again,
Thanks for your reply. Try this Sub EmptyRange() Dim TargetRange As Range Set TargetRange = Range("A1:Z100") For Each c In TargetRange If c.Value = Format("0", "$0.00") Then c.Value = "" Next End Sub Best regards, Per "pcor" skrev i meddelelsen ... Just great. An now if I may. How do I replace at these $0.00 with a blank Thanks very much "pcor" wrote: I need a macro that will check out a given range( say a1 to z100) As it checkd ther range(a1..z100) if there is NOT data in the cell, replace the blank cell with $0.00 I appreciate all the help I am getting from this site |
|
#5
Posted to microsoft.public.excel.newusers
|
|||
|
|||
|
Require a macro for Excel 2007
Thanks for the quick reply...BUT that last one did not work. Any other ideas
Thanks "Per Jessen" wrote: Hi again, Thanks for your reply. Try this Sub EmptyRange() Dim TargetRange As Range Set TargetRange = Range("A1:Z100") For Each c In TargetRange If c.Value = Format("0", "$0.00") Then c.Value = "" Next End Sub Best regards, Per "pcor" skrev i meddelelsen ... Just great. An now if I may. How do I replace at these $0.00 with a blank Thanks very much "pcor" wrote: I need a macro that will check out a given range( say a1 to z100) As it checkd ther range(a1..z100) if there is NOT data in the cell, replace the blank cell with $0.00 I appreciate all the help I am getting from this site |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| I require a macro to complete ignoring the following error | Excel Discussion (Misc queries) | |||
| Macro Help Needed - Excel 2007 - Print Macro with Auto Sort | Excel Worksheet Functions | |||
| I require code to run a macro dependant on the date | Excel Discussion (Misc queries) | |||
| require macro or code for purchase order to do the following: | Excel Worksheet Functions | |||
| Require Tmplwiz.exe for Excel 2003 | Excel Discussion (Misc queries) | |||
Hybrid Mode
