Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Conditional Numerical Formatting
I'd like the number format for the value in cell a3 to be a general number if
a1 is empty and i'd like the format to be a percentage if a1 contains a value. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Conditional Numerical Formatting
Since one cell can't change another cell's formatting, this will require
an Event macro. Put this in your worksheet code module (right-click on the worksheet tab and choose "View Code")" Private Sub Worksheet_Change(ByVal Target As Excel.Range) With Target(1) If .Address(False, False) = "A1" Then If IsEmpty(.Value) Then Range("A3").NumberFormat = "General" Else Range("A3").NumberFormat = "0%" End If End If End With End Sub In article , Qaspec wrote: I'd like the number format for the value in cell a3 to be a general number if a1 is empty and i'd like the format to be a percentage if a1 contains a value. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Conditional Numerical Formatting
What if A1 was on sheet1("Data") and A3 were on sheet2("Daily")? How would I
change the code? "JE McGimpsey" wrote: Since one cell can't change another cell's formatting, this will require an Event macro. Put this in your worksheet code module (right-click on the worksheet tab and choose "View Code")" Private Sub Worksheet_Change(ByVal Target As Excel.Range) With Target(1) If .Address(False, False) = "A1" Then If IsEmpty(.Value) Then Range("A3").NumberFormat = "General" Else Range("A3").NumberFormat = "0%" End If End If End With End Sub In article , Qaspec wrote: I'd like the number format for the value in cell a3 to be a general number if a1 is empty and i'd like the format to be a percentage if a1 contains a value. |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Conditional Numerical Formatting
Put the code in the Data sheets
Private Sub Worksheet_Change(ByVal Target As Excel.Range) set sh = Worksheets("Daily") With Target(1) If .Address(False, False) = "A1" Then If IsEmpty(.Value) Then sh.Range("A3").NumberFormat = "General" Else sh.Range("A3").NumberFormat = "0%" End If End If End With End Sub -- Regards, Tom Ogilvy "Qaspec" wrote in message ... What if A1 was on sheet1("Data") and A3 were on sheet2("Daily")? How would I change the code? "JE McGimpsey" wrote: Since one cell can't change another cell's formatting, this will require an Event macro. Put this in your worksheet code module (right-click on the worksheet tab and choose "View Code")" Private Sub Worksheet_Change(ByVal Target As Excel.Range) With Target(1) If .Address(False, False) = "A1" Then If IsEmpty(.Value) Then Range("A3").NumberFormat = "General" Else Range("A3").NumberFormat = "0%" End If End If End With End Sub In article , Qaspec wrote: I'd like the number format for the value in cell a3 to be a general number if a1 is empty and i'd like the format to be a percentage if a1 contains a value. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel Numerical Formatting | Excel Discussion (Misc queries) | |||
Conditional Formatting; finding numerical data in mixed text. | Excel Discussion (Misc queries) | |||
Custom Currency/Numerical Formatting? | Excel Discussion (Misc queries) | |||
Formatting columns with either a date OR a numerical figure | Excel Worksheet Functions | |||
can a conditional formulas be setup using text to get a numerical | Excel Worksheet Functions |