Strike-through an entire row.

MS EXCEL

    Sponsored Links

    Next

  • 1. Conditional Row Height
    I have a cell that may have no data or from 1 to 6 lines of data. Is there a way to make the Row Height conditional based on the number of lines of data in the cell? Thanks.
  • 2. Minimum With Two Criteria
    Hi all, I would like to run a variety of functions against a payrate table But I can't seem to get the first function to work The formula is returning 0, but should return $9.00 The table is setup correctly with no breaks in data I visibly reviewed all items since HR sent me the table-all looks correct Do you see any errors in my formula below or any other ideas? Thanks! goss =SUMPRODUCT(MIN((tbl!A$2:A$257=$A$1)*(tbl!$D$2:$D$257=$A4)*(tbl!$E$2:$E $257))) Where $A$1 = New Hire (sp is correct copied from tblPayRate) Where $A4 = Cashier (sp is correct, copied from tblPayRate) Where Col A is "New Hire" or other designation Where Col D is "Cashier" or other position Where Col E is range of values

Strike-through an entire row.

Postby HoundofCullin » Wed, 21 Jan 2004 08:31:51 GMT

OK... I need to know if there is a way I can strike through the text on
a row by highlighting the row with the defunkt information and
activating a macro.

Let's see if I can give an example.


Say I'm entering data in, row by row... Each row's data is SIMILAR but
not the same. 
Now let's say that apon review I notice that one of the row is
incorrect.
I need to be able to highlight the row (Presumably by selecting the
corresponding number on the left hand side {1,2,3 etc}) then I need to
run a macro (that will eventually be tied to a button) and then be done
the macro would turn the text .RED  and then strike through the
information. Is that even possible? if so... can you help me?!


Thanks a ton, Josh


---
Message posted from  http://www.**--****.com/ 


Re: Strike-through an entire row.

Postby Earl Kiosterud » Wed, 21 Jan 2004 08:46:11 GMT

Josh,

You can select an entire row with Shift-Space too.  The following code will
make the entire row red (that the cell pointer is in).

Sub RedStrike()
    With Selection.EntireRow.Font
      .Strikethrough = True
      .ColorIndex = 3
      End With
End Sub

I did this by recording a macro, then taking out a bunch of stuff and
tweaking it a bit.  You may wish to assign a shortcut to run it quickly from
the keyboard.  Tools - Macro - Macros.  Select the macro, and click Options.
There's a place to put in a shortcut.  I used Shift-R.  It wound up
Ctrl-Shift-R.  The Excel shortcuts don't use Shift, AFAIK.

-- 
Earl Kiosterud
mvpearl omitthisword at verizon period net
-------------------------------------------

"HoundofCullin >" << XXXX@XXXXX.COM > wrote in





Similar Threads:

1.Error--"try selecting only entire rows, entire columns, or just groups of cells"

I've looked online for help and found the following.  I tried following the
directions, but it doesn't seem to do anything.  The original row shows 2
selected rows (even when I try to select only one to delete the other) and
when I follow these directions, it inserts 2 rows.  :

>  That command cannot be used with selections that contain entire rows or
> columns, and also other cells.
> Try selecting only entire rows, entire columns, or just groups of cells.
> CAUSE
> This behavior occurs when all of the following conditions are true:
> 
> €    You merge cells in a column or row. -and-
> 
> €    You select the entire column or row in which you merged cells. -and-
> 
> €    The column or row that you select contains a merged cell that extends
> over another column or row that you do not select. -and-
> 
> €    You click Columns or Rows on the Insert menu.
> RESOLUTION
> To resolve this behavior, select a single cell in the column or row in which
> you merged cells (not the entire column or row), and click Columns or Rows on
> the Insert menu. 


Michelle York
Literacy Coach (1-5)
Highland Park Central Elementary School
Topeka, Kansas

2.Row and Column Strikethrough

  Why are my Row and Column Headers shown with a Strikthrough each of the 
letters and numbers?
  I can email a screen shot in PDf if anyone would like to see.

Thansk,
Craig

3.remove rows that have any cells values strikethrough to a blank Sheet2

4.delete rows that have strike-through values in column A

5.Strikethrough cells B2 to E2 (a "row", in essence) when A2 has a c

Place this code in the "sheet" module that corresponds to the sheet you want 
to monitor.

Regards,
Bill


Private Sub Worksheet_Change(ByVal Target As Range)
    Dim strAddress                  As String
    Dim rngFormat                   As Range

    If (Target.Cells(1).Column = 1) Then
        strAddress = "B" & Trim$(Target.Cells(1).Row) & ":E" & 
Trim$(Target.Cells(1).Row)
        Set rngFormat = Target.Parent.Range(strAddress)
        
        If (Len(Target.Cells(1).Value) = 0) Then
            rngFormat.Font.Strikethrough = False
        ElseIf (Asc(Target.Cells(1) = 118)) Then   ' 118 is the ascii code 
for the sq rt symbol
            rngFormat.Font.Strikethrough = True
        End If
    
        Application.Calculate
    End If

End Sub



"StargateFanFromWork" wrote:

> The reason this is tricky is because all the other columns have all 3
> possible conditional formatting slots taken, so it seems one would need to
> use code for this.
> 
> I use the square root symbol (representing a checkmark) in a pulldown menu
> in column A.  So column A is either empty or it has this symbol.  When
> empty, nothing happens; but if user chooses this "checkmark" symbol, the
> cells in column B to E of that row should then have a strikethrough applied
> to the text in that row.  Also, where would one put the vb code to do this?
> I've searched the archives but so far no mention has been made on where this
> type of code to augment conditional formatting should go.
> 
> tia   :oD
> 
> 
> 

6. strikethrough row number

7. Row-Entire row changes color (and stays) selecting first entry

8. i want to highlight entire row when selecting a cell in that row



Return to MS EXCEL

 

Who is online

Users browsing this forum: No registered users and 63 guest