I have more than 50 different sheets with columns A to AA where i would like to hide all empty columns. If for example column K is empty auto hide column K. I also have rows 1, 2 & 3 which have headers which need to be ignored when checking the columns.
View 12 Replies
I need a formula, or a filter (or something?) to hide zeros in a column, but only when the corresponding cell in column A is empty.
View 11 Replies View RelatedI want to hide the row when value "x" is entered in column C
I tried this code in the sheet, but nothing happens.......
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 3 Then
ThisRow = Target.Row
If Not Target.Value = "" Then
ThisRow.EntireRow.Hidden = True
End If
End If
End Sub
So when a "x" is entered in cell (115,C), row 115 must be hidden. When a "x" is entered in cell((9,C) row 9 must be hidden to, and so on. When a cell in an other column is changed, the macro does not need to start.
I am getting values for my excel sheet from another department excel sheet . everything works fine. If there is no values in the rows in the Department sheet, then i need to hide the rows in my sheet. How to code this in VBA. When they add values to the rows then i should make the rows visble here. Kindy give me a sample of vba code to this or suggest me to solve.
View 9 Replies View RelatedI am looking to find all visible cells in column E that are blank, and then add ''B'' to those empty cells.
I am using code similar to the below:
[Code] .....
I'm looking for a way to hide a row if the cell is column A is empty. On the attached sheet I'm looking to hide the empty rows below the last vehicle registration.
View 2 Replies View RelatedI have the code for hiding rows. But the problems is it only works with numbers like 1, 2, 3, 4 etc.... I would like some help to modify this code so it work both for numbers and letter (A, B, C, D) etc ...
View 9 Replies View RelatedI have this code as mentioned below.
If a cell in column U is empty, I mean really empty, so no zero but a blank cell, I want to hide the whole row. Is this possible?
Sub kleuren()
For Each c In [U3:U500]
If c "" Then
Select Case c - Date
Case Is
I have code which will hide columns L to AA if cells are empty. It works fine.
I want to modify it to consider rows 3 onward down. It means even if rows 1 & 2 are populated and row 3 onwards down are empty, then it will hide it.
I tried but it is not working .....
I have about a dozen tabs, all of which have vlookups in them and calculate based on what a user pastes into Sheet 1. I need a macro that hides all tabs that have no data, essentially tabs where A1 = ""
However, it also needs to unhide tabs as soon as there is data. So if the user pastes new data into Sheet 1 the vlookups, on the other sheets, still need to run (even if they are hidden) and then check against the macro to determine whether to be hidden or unhidden.
I am trying to write a code that would hide when certain cells in the worksheet are empty. Also the sheet name should start with a -.
This is the code i have so far. The thing is that the sheet will always hide. The criteria on the cells doesnt work.
Sub Hide_all_filled_Templates()
Dim ws As Worksheet
Application.DisplayAlerts = False
For Each ws In Worksheets
If Left(ws.Name, 1) = "-" Then
If Not Range("I9").Value = "" Or Range("K9").Value = "" Or Range("M9").Value = "" Or Range("O9").Value = "" Then ws.Visible = False
End If
Next
Application.DisplayAlerts = True
End Sub
The code now hides all shees starting with "-". It does not take the cell criteria into account. Why?
Other point is that these cell references are just a few of what it should really be. How do I make this easier for myself to write the code. Point is that these cells come in row 9 (like the example) then in row 11 then in row 15, 17, 21,23, etc. Also the columns jump with uneven steps.
I am trying to hide empty columns, excluding the header, from data that has been auto filtered. I can accomplish this when the data is not filtered by hiding columns that are empty below the header.
My question is: How do I get the "For each Col in Activesheet..." loop to only apply to the filtered values and not those that are hidden.
Im looking for a macro that hide empty rows. I found some simple macro but that are long to execute. While looking for a faster code, I found two codes that work pretty fast. But as I don't understand VBA I am not able to adjust them to my situation.
First macro: I am able to specify my range (B6:B77), but the macro applies to blank cells and I need to apply to "" cells.
[Code] .....
Second macro: very fast as well. Here, it applies to "" cells, but I am unable to specify a range. So the rows 1 to 4, which are empty, are hidden but should not.
[Code] .....
I have read other posts about this but I am still a little confused as most macros that have been made are tweaked to suite the users individual needs.
What I want is something like this to work in the active sheet:
If cells D2:D55 = ""
Then Hide.EntireRow
If cells D2:D55 = "has any value"
Then Show.EntireRow
The values in D2:D55 are populated by a VLOOKUP depending on what someone chooses in a drop down validation list, however not all the rows are always required so I would like to hide them to save some space on my form.
I am looping thur an array to Format A range of cells. After the format is complete I need to validate that all of the cell in a range are empty if so hide the whole Column.I was Try to do it like this. I am not getting an error but nothing seems to happen either. Also The Boder of the cell only appers on the Last cell it should be on the cells....
View 3 Replies View RelatedI am trying to run a macro that will hide rows when one cell is empty and another is not. Example: hide row when cell g is empty, but cell b is not. Or something to that effect. So far I've only used this code, but I would like to know how I can modify the code to fit the parameters I need:
Sub HideRows()
On Error Resume Next
With Range("B1:B300")
.EntireRow.Hidden = False
For i = 1 To .Rows.Count
If WorksheetFunction. Sum(.Rows(i)) = 0 Then
.Rows(i).EntireRow.Hidden = True
End If
Next i
End With
End Sub
I've created an excel workbook to automatically create a report for my work. All you have to do is enter the data into the "DATA" worksheet. Easy. Only problem is that someone can easily ruin it if they try to run it when the "DATA" sheet is empty. I figure that if I can get two columns hide when it's empty and that would solve my problem. I've tried several VBA codes, but they don't work. Also, everything except the "DATA" sheet is protected to prevent accidently changes. This is the latest code I've tried:
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "DATA!$P$5" And Target.Value = 0 Then
ActiveSheet.Unprotect ("password")
[Code].....
My company has a canned template for some of the work we do and to avoid wasting too much paper I wanted to insert some extra code into an already programmed macro button (which sets the page breaks) to hide forms (both as individual worksheets and rows within separate worksheets) if the field that ought to auto-fill them is left empty.
View 3 Replies View RelatedI have a workbook with over 70 tabs whose position shouldn't be changed. Some of these tabs are colored in yellow (sorting by tab color is not allowed). I need to select these yellow tabs first and loop through them (only yellow tabs) and hide empty rows in the range of A1: G 50 on each of them. Grouping sheets wwon't work because each tab has different last row with data within that range.
View 6 Replies View RelatedI want to create a macro that checks whether a specified range of columns is hidden, and
a) hide them if they are not hidden, or
b) unhide them if they are hidden,
i.e. toggle the Hide state.
What method can I use to query the hidden state of a selected range of columns and return a boolean value?
I need to select all yellow tabs (color code 6) in a workbook with over 70 tabs and hide all empty rows within A1:I36 on each of these yellow tabs. the position of the tabs needs to be unchanged (sorting by tab color not allowed). I got this code from another excel forum but somehow it only works when i select one yellow tab and run it and the code only works on the one yellow tab i selected. can fix this code so that it can loop through all tabs (yellow and non color) and do what i mentioned above for each yellow tab?
Sub HideMT()
Dim Ws As Worksheet
Dim wsColor As Long
[Code].....
I am developing a spreadsheet that, once all the code is run has numerous sheets added. On these sheets I have a significant number of rows that contain no data and could be hidden (I dont want to remove them, because later I need to re- import all these rows back to my master sheet). I tried code I found in the forum to hide a row if it is empty but this doesnt work as some of the cells contain formulaes referencing back to another sheet that is hidden.
I am trying, and failing, to write code to hide a row that contains no actual data, but still has formulas in some of the cells.
(Excel 2010): Hide row if cell C in this row is empty.
I've just started using macros and I'm sure there is one for this problem.
I am trying to find a macro that look for last non empty cell in column A and them paste a formula/comment in all cells of column B.
View 3 Replies View RelatedI'm trying to write a program for work. One sheet (whereiseverything.xls) will have a list of parts column E and where it is in the process column (k). Column E of this sheet will have multiple part numbers. (Sometimes duplicated.) I would like to figure out how to write a code to Auto filter (whereiseverything.xls) sheet and copy only one P/N from (whereiseverything.xls) column E onto another Workbook Worksheet (Commit status.xls) column. After that the sheet must copy all of the locations of that P/N from whereiseverything.xls column K into and under the P/N of the Commitstatus.xls.
It will continue to autofilter and copy from where is everything, the "one" p/n and all of its locations into another empty column of Commitstatus.xls until it no longer has part numbers to autofilter on whereiseverything. I am extremely green on VBA programming but here is my first attempt.
Windows("Where is everything commits .xls").Activate
Windows("whereiseverything[1].xxx").Activate
Columns("D:D").Select
Selection.AutoFilter
Windows("Where is everything commits .xls").Activate
Windows("whereiseverything[1].xxx").Activate
Selection.AutoFilter Field:=1, Criteria1:="7516113-905" \<--this Is one p/n
Columns("J:J").Select
Selection.Copy....................................
I have a worksheet on which the data is already grouped. At the top of each group is a row that contains only the group name. Since the rest of that row is blank, I want to use a blank cell on that row as a reference, then copy the group name to a newly created column, then fill that column down to the next group.
The goal is to create a column that contains the group name, rather than just having the group name as a " header" at the top of each group.
I would like to rows based on multiple column conditions criteria. ie., if the columns N, O, P values are "", then hide the particular row. The logic given in the website here, i tried But, it is not 100% working. It works for a few rows at the start of the database & it works for the rows at the end of the database. In between, for a few rows, even if the column values are "" it does not hide those rows.
View 2 Replies View RelatedI need to write a VBA code to remove the value of the cells in column B if the value in column A is empty. In my excel sheet, the user will paste hyperlinks in column B. If any link does not meet certain conditions, the cell in the same row in column A will be empty.
I want to have a change event so that after pasting links, it automatically deletes the links from the cells in column B if the cell in column A is empty
Formula for this? If a cell in column T is empty, use column U (but make it negative)??
View 2 Replies View RelatedI was wondering if it is possible to hide a column(s) but still have data in that column be visible at the bottom of the spreadsheet. For example, if I hide column G can it only hide the column from rows 1 - 50 and then the column will appear after row 50?
View 3 Replies View Related
