Please see attached.
What I would like to do is for each column within range("a1").currentregion that has dates, select the blanks in those columns and put the date 1/1/1900.
The result is in the Result sheet.
I know how to do a standard loop through columns but I'm not sure how to do this for just the current region and just for those columns with dates.
I have two worksheets in which I am trying to get the blue bold data (not text) derived from a formula.
Main
A
B
C
1
Site #
First Apt Date
Last Apt Date
[Code]....
Apt Report (month/day/year)
A
B
1
Site #
Apt Date
2
1001
[Code]....
I have some restrictions:
I cannot alter the format of Main, except I can add columnsI cannot alter at all the data or format on Apt Report (I cannot sort, filter, pivot, add columns...etc)
Any way for Main to look at Apt Report and give me the earliest and latest appointment?
I have tried the DMIN function but am limited it seems to being able to change Main to accommodate it. I have tried an array with MIN(If but ran into issues with the cells on Apt Report that are blank...it would return those as the earliest appointment....albeit it is correct...but not what I need!!!
The Apt Report will continually be updated to, so I need to be able to search the entire Apt Date column.
I have data that gets seperated into different cells and what i need is for all the data to line up from left to right with no empty cells in between.. so basically shift delete on each cell and shift the data left.
So i thought i know, ill simply f5, select the blanks, delete and shift left... however that option doesnt come up.. it simple says delete row?
What is the best way to select all the blanks in a range and delete them and have the cells that contain data move to the left so all data is next to each other.
In cells A71:A140 I have the following formula: =IF(A4"";A4;"").
How can I select only the cells in range A71:A140 where the formula has returned a value (number or text) and not the blank cells? When I try ctrl + shift + down arrow, all cells in the range are selected...
I am currently setting up a project timeline, and at each stage i need the cell to change color depending on input. so for instance stage one happen -50 days. i work the date out need for completing and then the actual date is then put in the cell below which i want to go either
Green because it was done early or on time Amber if it has been done but was late Red if has not been done and the current date is now past the date of completion Stay Blank if it is Blank and their is still time to do it
for the green i am using a A2 <=A1
Amber i am using A2 > A1
for the red i'm using =And(A2<Today(),A1="")
the red one conditioning does not seem to be working and if their is nothing in the cell an its within the time its going green !
I found this code on Ozgrid to sort all columns of a worksheet that were continuous with no gaps or spaces that works well:
Sub CopyToA()
Do While ActiveCell <> ""
Range(ActiveCell, ActiveCell.End(xlDown)).Cut Destination:=Range("a65535").End(xlUp).Offset(1, 0)
ActiveCell.Offset(0, 1).Select
Loop
End Sub
However, I've tried to manipulate the code myself to 1) find all columns that aren't empty then 2) sort each column individually (WITHOUT expanding the sort to other columns) and 3) combining all the numbers into one seperate column. There are many posts concerning sorting but not one that addressed this particular situation.
I'm brand new to using formulas for conditional formatting. How to achieve the following...
Red highlight for todays date and past dates
Yellow highlight dates up to 30 days before today
No highlights for blank cells or text
I'm using excel 2010.
I have 2 columns one with blanks one without, the data can be anything. I need the 2 columns to line up, data matching up and blanks matching up. I'm attaching a spreadsheet with an example.
View 3 Replies View RelatedIs there a way that when looking at selected cells you can check their formatting?
I am trying to write some vba code to check for blank spaces in a number of columns (doing it one column at a time at the moment).
However, the current code im using messes up as at the bottom of the data there is a Total: column which is formatted in blue. Total: is only in the A column so the code I have won't work for other columns when no data is in them..
Range("A65536").Select
Selection.End(xlUp).Select
If Selection.Cells.Row > 6 Then ' there's some data in the sheet since we didn't hit the header row - now look for blank currency cells next to occupied lessee prospect cell
While Selection.Cells.Row > 6
If Selection.Value = "" Then ' there's a blank entry in the sheet - add error to 'passed' string
passed = "Blank spaces in ACC column " & Selection.Cells.Column & Selection.Cells.Row & " - please correct." & vbCrLf
End If
Selection.Cells.Offset(-1, 0).Select
Wend
End If
If there isnt any data at all up to the header row but blank rows between the header and the bottom total (blue) row it doesnt work.. how can i get around this? I thought perhaps checking that it isn't blank OR the total row somehow by checking the color (ie formatting)?
I am trying to delete all the rows that have blanks in both columns "D" and "F".
VB:
With Sheets("2012")
For k = 6 To 1000
If (.Range("D:" & k) = "" & .Range("F:" & k) = "") Then
[Code]....
This is driving me crazy. I have a sheet with 5 columns, and 13k + rows of data.
I attached an example of how its is formatted...
The problem is, in column A "DBA" and D, "Address", some of the data contain 2 rows, and others contain 3 rows.
When I try to sort by DATE, for example, it ends up splitting up the addresses alphabetically...
How can I sort this data, by any of the columns, while still keeping the ADDRESS together?
I hope this makes sense to someone because it is driving me NUTS.
I typically use the following formula to create a list with no blanks, when I have a single column of data. Is there a way to do the same thing when you have multiple columns of data (side by side to make it simple) and you want to create a master list that gets rid of the blanks, and keeps them in the order they appear (by column)?
[Code] .....
For example, if I had data (with some blank cells randomly placed) in columns AM and AN, and I wanted a singe master list in one column of all non-blank cells in column AL, followed by column AM, etc.? Is there a formula to do this, or must I resort to a macro?
combining multiple rows of related data into one row but have not seen one that matches my situation. My experience level with excel only includes some basics like vlookup, match and recorded macros, although I have used vba code for a macro that met my needs. I have a parts list for a PCB that has many different parts. Some of the parts are used multiple times across different reference designations("Reference" column in the file). I have shown a desired format and the original format below. Since the item number has blanks across the reference designators I haven't found a solution that would work for me.
Desired output:
Item
Quantity
[Code]....
I need to be able to count all the blanks in columns other than A but only until the last used cell in column A. I am using a formula right now that counts the blanks in column A until the last used cell but I don't know how to apply the range of column A to other columns like B and C. Here is an example of what I hope to accomplish:
Formula used in A1 that I need applied to other columns but with the range of column A
="Total Blanks: "&COUNTIF(INDEX(A2:A8,MATCH(TRUE,A2:A8<>"",0)):INDEX(A2:A8,MATCH(2,1/(A2:A8<>""))),"")
Here is an example of what B1 and C1, with the formula, would look like if it counted blanks but with the range of column A
Total Blanks: 3
Total Blanks: 6
Total Blanks: 2
[Code].....
Some code that will remove blank cells from across five columns (A:E) so that after running code all data in each column moves to the top of sheet?
View 9 Replies View RelatedI am trying to create a straight column list that can take the rows and columns of a table, and list only the nonblank items. The formula I am using only seems to work with one column, not multiple.
Formula:
[Code] .....
I have 5 columns with different dates to track when certain items expire per employee. Conditional Formatting is working like a champ but the data is growing.
I'd like a way to 'quick glance' at all my people that are expired, coming up on expired (this month and next).
I was thinking if there was a script to run through all 5 columns, if the date was less than today, throw the 1st,2nd and 5-9 column (in that row) into a new table. That way i can keep my big sheet but have another sheet or table that i can see QUICKLY who all needs to get their stuff up to date.
I want to make a calculation on a spreadsheet only if the date is a Friday. (weekly returns calculation) I can't seem to find out how to test the date to see if it is a Friday.
View 7 Replies View RelatedIs there a way to have a calendar pop up when a particular cell is selected and only have Sunday dates as optional selections? Needs to be able to scroll by month.
View 8 Replies View RelatedI have a cell pulling the date from another page and the dates comes across as "2/1/2013- 4/15/2013"in cell B2 and I have the code in sheet 1[code]=IF(OR(Safeway!A43=""),"",Safeway!A43)[code] pulling data from the sheet 2 already in the middle with a code for later use to hide a certain character. I have a condition code set so if the date is past current date, it will turn red but with the 2 dates in the same cell, I am unable to get it to turn red. How do I go about only having the 2nd date show up so the condition works while already having this one code in the cell? I attempted to add the early stages of this program for review.
View 5 Replies View RelatedIn column B is a list of dates, which are broken out by fiscal year (FY=7/1/ to 6/30). Column C is a list of dollar amounts. Cell F3 is the query ‘start date’
Cell F4 is today's date, which will be the formula: =today()
Using a date range of F3:F4, I'm trying to get each cell bordered in red to query the dates in column B for each FY; then display the matching sum from column C.
For illustrative purposes I went and manually determined what the values should be displaying as of 7/22. Here are a couple of examples of how I am trying to get the formula to work.
Example 1
FY’08:
Start date- 7/1
End date- 7/22
Searching cells B1:B94, cells B1:B13 fall within the start and end date parameters listed above. Sum of cells C1:C13 is $45,112.00, which should display in cell F6.
Example 2
FY’09:
Start date- 7/1
End date- 12/13
Searching cells B95:B222, cells B95:B149 fall within the start and end date parameters listed above. Sum of cells C95:C149 is $150,873.03, which F7 should display in cell F7. How to I type up this formula; its way more challenging that I first thought!
I might be using something completely wrong here, but can anyone tell me if this code is possible or am I being very naive.
H4 and I4 are cells in which I want to enter dates, and then I want these dates to be used in a custom filter on another page.
Below is what my limited understanding of VB came up with.
Sub Date_Range()
Dim First As Date
Dim Last As Date
First = Range("H4").Value
Last = Range("I4").Value
Sheets("Graph Data").Select
Selection.AutoFilter Field:=1, Criteria1:=">=First", Operator:=xlAnd _
, Criteria2:="
I have a workbook with 2 sheets I want to make an autofilter by two method :
- select case statement
- two dates
I have developed a user form in VBA which is used for entry into an excel worksheet. From this data, I need to do the following:
1) Create 2 output files for Job data entitled "J" and another file entitled "S". The "J" and "S" is captured in a field in the data. I need to hit a button that allows these 2 output files to be produced, so I need to 'loop' through rows of the data to do this/
2) In addition to 1), the user needs to be able to 'select' the date range they would like to see 'J' and 'S' data over. This will be based on a field called "Startdate'. How could I do this with the button above-can I parse an input value to a form and select the 'J' and 'S' files on this.
I have an data in a columns. Here I need to count the non-blanks and blank records.
View 5 Replies View RelatedI have a column of dates that are not being recognized as dates unless if I manually select each cell and press enter. For example the cell value is "Jul/13' and isn't recognized as "01/06/2013" until I select it and hit enter. How can I get around this?
View 8 Replies View RelatedI need to use the VLOOKUP feature from the most latest files, I am using VLOOKUP in VBA code which is working fine, however the problem is that the files from where I do VLOOKUP are added randomly in a week.
Ex:
There are 2 Files, 1st File where the data would be looked up from the 2nd File, Now the 2nd File has names like this "Offline Data as on 10th May 14", "Offline Data as on 13th May 14", "Offline Data as on 23rd May 14", etc.
Now these files are send by another department, and each time the most recent data has to be searched from these files.. All of these files have to be maintained separately for record purposes.
Hence in the VLOOKUP, Lookup file keeps on changing...so is it possible to make a code in such a way that the code picks up the most recent file for reference, from the above example we would need to pull the data from the most latest file which is "Offline Data as on 23rd May 14" , if any other file is added in that folder more recent than the one mentioned than the code should automatically link it to that file.
I have managed to codify the lookup but due to this filenames being changed always I have to do this manually..as this has to be done at several columns in several sheets its extremely time-consuming.
So, logic code to pick the most recent date which is embedded in the filename...
If MonthView control can be set to allow users to select multiple ranges and enter different dates into those ranges? I know I was able to do with with the previous Datepicker control and I thought it was as easy as setting the Show Modal property to true.
View 1 Replies View RelatedTo select multiple columns I can use Union but can I use something that will cicle through the values from an array?
Example (how do I see this)
VB :
columnsToDelete= array("UM","Post","Pre")
For i=0 To UBound(columnsToDelete)
Set columnsFound=Range("1:1").find(what:=columnsToDelete(i), lookin:=xlvalues,lookat:=xlwhole, matchcase:=True)
columnsFound.select
Selection delete
Next i
I want to select a number of columns. I know the column indexes.
I want to use something like (Doesn't work):
[Code] ......
Instead of (Works):
[Code] ....
Rows can be selected according to:
[Code] ....
I have written this code that works. But there must be an easier way:
[Code] ....