D
Dustin
I have a spreadsheet in which I would like the user to be able to enter
either a Square foot Dimension or a Square meter dimesion (Whichever one
they have handy) And have excel return the converted value in the "entry
cell" for appropriate dimension type.
For example Column 1 is Labeled Square Meter And Column 2 is labled Square
Feet
If the user enters a value in Column 1, Excel fills the cell in column 2,
with the converted value. This should work in reverse if the user enters a
value in column 2.
Here is some code provided to me by a fellow news groupie.
My question is how do I define the range of appropriate cells? and how do I
run the macro? (I would like it to run automatically, invisible to the user)
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target = "" Then Exit Sub
Application.EnableEvents = False
If Target.Column = 2 Then Target.Offset(, -1) = Target * 0.0929
If Target.Column = 1 Then Target.Offset(, 1) = Target * 10.76
Application.EnableEvents = True
Thank you for your help!
either a Square foot Dimension or a Square meter dimesion (Whichever one
they have handy) And have excel return the converted value in the "entry
cell" for appropriate dimension type.
For example Column 1 is Labeled Square Meter And Column 2 is labled Square
Feet
If the user enters a value in Column 1, Excel fills the cell in column 2,
with the converted value. This should work in reverse if the user enters a
value in column 2.
Here is some code provided to me by a fellow news groupie.
My question is how do I define the range of appropriate cells? and how do I
run the macro? (I would like it to run automatically, invisible to the user)
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target = "" Then Exit Sub
Application.EnableEvents = False
If Target.Column = 2 Then Target.Offset(, -1) = Target * 0.0929
If Target.Column = 1 Then Target.Offset(, 1) = Target * 10.76
Application.EnableEvents = True
Thank you for your help!