Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
I hope my subject line is appropriate to the request....
Running Excel 2003, I have a spreadsheet which tracks new contract opportunities for our company. There are many stages involved in the contract process, and many people involved. Each contract is listed on a single line, and column descriptions follow: A=Blank B-L=General information, such as Dealer Information, Acct. Exec Name & #, Acct Rep, Type of Location, Date Requested, and so on. M=Blank N-AH=Contract Stages, where user enters dates of stage completion. There are (9) different request types, which are entered into Column J. I need to color in/highlight different cells within the N-AH range, dependent on the Contract Type entered in Column J. This is to indicate need for information in those columns. For example, for contract type C, I need to highlight O:P, & W:X on the respective row. With my cursor in column B, I recorded the following macro for"contract type C": Sub Contract_C() ' ' Contract_C Macro ' Macro recorded 9/12/2007 by C11163 To highlight Contract Tracker cells for Type C. ' ' Keyboard Shortcut: Ctrl+Shift+D ' ActiveCell.Offset(0, 8).Range("A1").Select ActiveCell.FormulaR1C1 = "C" With ActiveCell.Characters(Start:=1, Length:=1).Font .Name = "Arial" .FontStyle = "Regular" .Size = 10 .Strikethrough = False .Superscript = False .Subscript = False .OutlineFont = False .Shadow = False .Underline = xlUnderlineStyleNone .ColorIndex = xlAutomatic End With ActiveCell.Offset(0, 5).Range("A1,A1:B1").Select ActiveWindow.SmallScroll ToRight:=4 ActiveCell.Range("A1,A1:B1,I1:J1").Select ActiveCell.Offset(0, 8).Range("A1").Activate With Selection.Interior .ColorIndex = 35 .Pattern = xlSolid End With ActiveCell.Offset(0, -21).Range("A1").Select End Sub The problem is, I want to be able to enter the "C" (or other designation), into column J, regardless of where on the particular row I am at, and color in cells O:P, W:X on same row, and then return to column K. I apologize for the lengthy post, however I am still new at macros & all help is appreciated! If this would be easier covered off-line, I am amenable to that also. TIA! Sandi |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Formula Assistance | New Users to Excel | |||
Assistance with Formula | Excel Worksheet Functions | |||
Set a constant from a formula in VBA | Excel Discussion (Misc queries) | |||
Formula Assistance | Excel Worksheet Functions | |||
Formula Assistance | Excel Worksheet Functions |