Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cell data depending on column selected.
A pretty simple VBA problem in excel
I am trying to create a simple module to input either P1 or P2 in selected cells. If the column selected is D, E, F G D and E should equal P1 F and G should equal P2 This should work for any combination such as if only D or G is selected D = P1, G = P2. I have the following worked out but I cannot get it to fill in the cells properly, if I only select a single cell it works fine, but if I select D - G it fills it all with P1. code: Sub CellFill() If (ActiveCell.Column = 4 Or ActiveCell.Column = 5) Then ActiveCell.Value = "P1" Else ActiveCell.Value = "P2" End If End Sub /code Any help is appreciated |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cell data depending on column selected.
Sub CellFill()
Dim cell As Range For Each cell In Selection If (cell.Column = 4 Or cell.Column = 5) Then cell.Value = "P1" Else cell.Value = "P2" End If Next cell End Sub -- HTH Bob Phillips (remove nothere from email address if mailing direct) wrote in message oups.com... A pretty simple VBA problem in excel I am trying to create a simple module to input either P1 or P2 in selected cells. If the column selected is D, E, F G D and E should equal P1 F and G should equal P2 This should work for any combination such as if only D or G is selected D = P1, G = P2. I have the following worked out but I cannot get it to fill in the cells properly, if I only select a single cell it works fine, but if I select D - G it fills it all with P1. code: Sub CellFill() If (ActiveCell.Column = 4 Or ActiveCell.Column = 5) Then ActiveCell.Value = "P1" Else ActiveCell.Value = "P2" End If End Sub /code Any help is appreciated |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can I show a picture depending on what data is selected in a cell | Excel Discussion (Misc queries) | |||
splitting one column into rows depending on the data in the column | Excel Programming | |||
Want add color to the cell depending on the value selected from th | Excel Programming | |||
return a data list depending on a value selected within a drop dow | Excel Discussion (Misc queries) | |||
Populating dropdown list 2 with data depending upon what was selected in list 1 | Excel Programming |