I spend a lot of time in spread sheets working with part numbers and sales figures. With a part # in column B and sales per month in adjacent columns, stretching back years. Is there any way to highlight an entire row automatically? ie. I use Ctrl F to search for a number and it goes to B24. I now want the entire row 24 highlighted as the active row.
When I move to another cell I want the entire row highlighted automatically. Can it be done.
if you click on a row, it highlights every cell in it, I want to do the exact same thing but then also when you click on a cell only.
Preferable (probably impossible though) without the use of VBA, because in my company
I think some are "carefull" with enabling macro
Need to have only active cell in in any worksheet highlighted or formatted in a different way than other cells
View 1 Replies View RelatedI found this code to highlight the active row. I tried to make it highlight the row and column, but I was not successful. What I really need is to highlight the active row and column above and to the left of the active cell, not the entire row and column. For example, if G10 is active, the highlighted cells would be G1:G10 and A10:G10.
Private Sub Worksheet_SelectionChange(ByVal Target As Excel. Range)
Dim i As Long
Cells.Interior.ColorIndex = xlColorIndexNone
If Application. CountA(Target.EntireRow) 0 Then
i = Target.Row
Else
For i = Me.UsedRange.Rows.Count To 1 Step -1
If Application.CountA(Me.Rows(i)) 0 Then
i = i + 1
Exit For
End If
Next i
End If
Rows(i).Interior.ColorIndex = 6
End Sub
Also, I have fill colors on the sheet and I just noticed that the code removes those fill colors. I need it to not remove my fill colors. The only fill colors it should remove are ones it previously colored.
Is it possible to have a specified shading (say 50%) applied to all rows except the currently picked row and the header rows to allow a user to focus on inputting across the row? I'd use this in conjunction with " Move Selection After Enter" to "Right" so the user would stay on the same row. I've tried the Help function, but can't find anything.
View 3 Replies View RelatedWhen looking at a spreadsheet with many columns, it would be nice of the row of the cell I have selected would remain highlighted in yellow, so that as I scroll across rows it's easy to view the data associated with the selected cell. Of course, if I select another cell, I would want the highlighting to change to THAT row. I'm guessing this would have to be in a this.workbook change event.
View 9 Replies View RelatedWhen I open any spreadsheet (new or already populated) the black box that normally frames the active cell is missing (showing which cell you have selected). Likewise when I 'select all' the sheet does not become shaded.
In addition:
Cannot fill series
Cannot change cell format (specifically to show Currency or Accounting w/$ symbol)
Is there something built in to excel that highlights the cell or cells that are currenyl selected and then not save any highlighted cells when the sheet is saved. Maybe if not something that is built in but a vba script?
View 1 Replies View RelatedI have a cover sheet to a workbook that holds hyperlinks to its relevent page. Several of the hyperlinks link to the same page but different relevant cells. However it is not overly clear which cell is active when you click the hyperlink. What I would like is for the active cell to be highlighted on the page. EG hyperlink 1 links to page 1 cell A2 & hyperlink 2 links to page 1 cell B6 - I would like A2 to be highlighted when accessed by hyperlink 1 & B6 highlighted when accessed by hyperlink 2.
View 9 Replies View RelatedI have a routine that highlights a selected Active Cell,
but when I printout the spreadsheet this highlight is not printed.
I have been pull my hair out (what's left!), to try to show this highlighted cell when printed.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Range("d22:u45"), Target) Is Nothing Then
Range("d12").Value = " Out"
Range("e14").Value = "0"
Else
If Intersect(Range("d22:u45"), Target) >= 3 Then
Range("d12").Value = Cells(19, ActiveCell.Column).Value
Range("e14").Value = Cells(21, ActiveCell.Column).Value
Static rngPrev As Range, PrevColor As Integer
Dim TempColor As Integer
TempColor = Target.Cells(1, 1).Interior.ColorIndex
If Not rngPrev Is Nothing Then
If PrevColor <> xlLineStyleNone Then .......................
whenever the active cell is within a given range, highlight the cell on the same row in column S (by changing its interior colour). This should occur each time the active cell is changed, whether by cursor keys or mouse. The effect would be similar to the row and column highlights at left and top of the worksheet.
This action should be restricted to one sheet in the workbook.
It's for Excel 2003.
Is there a way to highlight the row and column of the active cell? The highlighting will move as the active cell is moved around the spread sheet. I have a newbie manager that is bugging the pea-turkey out of me! He wants to be able to easily see where he is within some of our sheets while he is in a vehicle or outside on a job site...seems like an "accessibility" type issue, but can't find anything in Excel "Options."
View 5 Replies View RelatedI have found this code by searching witch is perfect
Code:
If Target.Cells.Count > 1 Then Exit Sub
Application.ScreenUpdating = False
Cells.Interior.ColorIndex = 0
With Target 'With the cell that was selected,
.EntireRow.Interior.ColorIndex = 8
.EntireColumn.Interior.ColorIndex = 8
End With
Application.ScreenUpdating = True
The point is that i want to retain the previous formatting of cells when i select another cell. And also i would like to create a switch to turn the Worksheet_SelectionChange event on and off. The tricky part is here i guess, becouse i would like when turned off to retain the previous formatting also.
As i navigate excel, I was wondering how to change the background or highlight (instead of bold border) the active cell?
View 3 Replies View RelatedUsing Excel 2010. Is it possible to change the default line thickness and fill color when selecting the ActiveSheet Target Row below?
I would like a thin border and a light grey fill - without interfering with any fomatting or conditional formatting that has been applied to the worksheet.
I have a range of amounts in Sheet 1 from F7:Q13 and im using the find method to search for the active and non active values in the cell. Which means that if there's a value in the cell it will transfer the value in Sheet 2, if nothing is found in the cell the cells in Sheet 2 will return as nothing or null.
I think the problem lies on the FindWhat variable. Im getting a compiled error which im not sure what is it.
I've attached the spreadsheet so you get a better idea of the problem that i encountered.
I currently have the following macro running to set a chart's data values:
Sub C3Quarter12013()
'
' C3Quarter32013 Macro
'
'
ActiveSheet.ChartObjects("Chart 2").Activate
ActiveChart.PlotArea.Select
ActiveChart.SeriesCollection(1).Values = _
[Code] ......
When I copy the tab and change some of the data within the cells, I want the macro refer to the chart on the current tab and the values in the current tab - as currently it refers to only "Chart 2" and the values in the tab 'Figure 2 - WE OPH'.
I've tried changing the sheet name to ActiveSheet.name but that doesn't seem to work.
I have got stuck on one piece of my code and having trouble fixing... Overall I am trying to find variable station name in cell L2 of Sheet 2 in Sheet 1 and then select and copy the data from the data in "cell L2 of Sheet 2" to the last entry of that row. I have attached an example test spreadsheet of the data and a macro is within Sheet 1 called test1. Please note that cell L2 in Sheet 2 will always be different station name and the station list in Sheet 1 will change with differing station name.
The code I am using is:
[Code] .....
The code that is not working and bringing up an error is:
[Code] .....
Attached File : Copy of Testexample.xlsm
Secondary Sub is located in the same project named, ClearItemtotals
I tried placing it as the last line prior to End Sub both as Call ClearItemTotals() and/or ClearItemTotals.
Neither work.
I have an activex combobox in my worksheet. I want the selected text in the combobox to be written to a defined cell when a button is clicked.
View 13 Replies View RelatedI want to arrange a dataset in blocks of 8 lines and for this I need to refer to the actual row of the active cell. Below code does not work - the "Row" does not change as the active cell moves down through the rows
View 5 Replies View RelatedI used the "record macro" and went through my data manipulation steps. But its not transferable to other worksheets because it imbedding the name of the worksheet in the some functions (sort, pivottable,...). How can I change the name of the worksheet to "activeworksheet"?
View 2 Replies View RelatedIn column A I have account numbers.
I press a button and the selected account number is transfered to another sheet (active invoices) and then is used as a criteria in a msquery.
heres the code ....
I have the following macro that works fine. But, I would like it to stop when it gets to the bottom of the active area.
Sub Insert_for_SQs()
Do
Selection.EntireRow.Insert
ActiveCell.Offset(6, 0).EntireRow.Activate
Selection.EntireRow.Insert
ActiveCell.Offset(12, 0).EntireRow.Activate
Loop
End Sub
My excel macro's run fine under Windows 2000 Pro, and Office 2000. The company got a new computer with Windows XP. I now have macros that run OK however I keep getting a pop up message stating. Warning..An active X component is being loaded. I must press OK and the program will run fine. How can I get rid of the Pop up active X message.
View 2 Replies View RelatedI am working on an application where I have several workbooks open at the same time. I need to know which one is active. How do I do that?
View 3 Replies View RelatedI'm trying to take the value of a cell and use the value as a name for the row.
If cell a1 has value = June. I want to change the name of row 1 to June.
I'm not sure what I'm doing wrong with the following code.
Sub Name_a_row()
'
'
Dim TheName As String
Dim RowNum As Integer
TheName = ActiveCell.Value
RowNum = ActiveCell.Row
ActiveWorkbook.Names.Add Name:="TheName", RefersToR1C1:="=Data!R&RowNum"
I've built a macro to run a loop that opens excel files, prints certain sheets and closes them. I have the macro working - to some degree. here is my code (this is excel):
Sub RMPProducer()
OldPath = "S:RMBS_Performance_Analytics Analysis1 Staging Folder For Monthly Model Templates2007200704VVDeals"
Dim t As Workbook
Dim s As String
Dim a As Window
With Application.FileSearch
.NewSearch
.LookIn = OldPath
.SearchSubFolders = False
.Filename = "*.xls"
.MatchTextExactly = True
If .Execute() > 0 Then
For i = 1 To .FoundFiles.Count
s = .FoundFiles(i)
I have 2 problems. First problem is that I am trying to add a function to make the window close once its finished printing. This actually works - but it limits my loop iterations from i = 1 to 2 (so it only runs 2 times and I'm not exactly sure why). If I don't include the statement - this can run for up to 7 - 8 times (these are very large files) then excel runs out of memory. Unfortunately, i can't set the loop to run from i = anything other than one.
So What I would prefer is to be able to make the "ActiveWindow.close" command work - because this way I can run the entire loop. But I'm not sure how to. I tried window referencing, I tried adding a new active Window so when the file opens, its opening in the active window already, but nothing works.
Preferably, I need to be able to reference both windows, as my next macro will involve referencing 2 windows (one static - always open) and the other the loop above.
how can i get the name of the button thats been pressed?
i know it will probably involve Application.Caller
but i just have no idea how to get it to work
Dim BtNm As String
BtNm = Application.Caller
MsgBox BtNm
this doesnt work but that would prob be obvios to you guys.
I am wanting to use the row number of the current active cell in another formula on a spreadsheet. I have only been able to find info in putting the active row number in a dialog box. Is there a method of returning the active row number and using in a number of formulas.
View 9 Replies View Related
