i woul like to make a macr which will check the system date on the computer to see what month it is and the populate cells A14 - A44 with the dates from the 1st till the end of the month.
View 9 RepliesI'm trying to find a way to create an excel sheet for my company. It will be used to import into our CMDB. Its for computers(ID) and their monitors(LINKED TO)
We have made 3 rows: ID, CHECK and LINKED TO which consist of the ID's of each computer and the attached monitor. The CHECK row is where we put the word "OK" if that computer is physically present at that location. After this list was made, we decided NOT to link the monitors to the computers, so afterwards we will delete the row LINKED TO.
What i need to do now, in order to not have to seek every monitor manually, is to have a formula which looks up an id (i.e. WBE01111) in the LINKED TO row, and if that one exists in the ID row, it will place the word "OK" in the CHECK row.
Example: (with WBE01111 being a monitor attached to computer WBE03333)
[ID]_____________[CHECK]______[LINKED TO]
WBE03333________ OK _________WBE01111
WBE09999________ OK ________ WBE08888
WBE01111________(**)_________
**=formula must put OK here
So the WBE01111(monitor) below [LINKED TO] exists in the [ID] row, i want the formula to see that, and put OK below [CHECK] for WBE01111
I work for a equipment hire company, where various computers and structure are hired out on different jobs. We are getting to a point where keeping track of stock is a problem, we need to quickly be able to check if an item is already booked on an upcoming job, and keep track of home many are in stock. ETC.
View 1 Replies View Relatedhow can i count the positive days to a inserted date value or the past days (negative value) to the system date (today).
View 5 Replies View RelatedI'm working on a spreadsheet which needs to refer to the current date. My PC checks the system date/time daily. Can I assume that if an end-user regularly connects to the internet, their PC will have a correct system date? Does anyone know if Win2000 or Win98 automatically update the system date/time when connected to the internet?
View 4 Replies View RelatedI have a form to imput a date but the problem is that it changes the computer date aswell. Is there another code i can use? Im using CDate code.
Private Sub CommandButtonProceed_Click()
Sheet2.Cells(2, 57) = TextBoxInitials
Cells(1, 2) = TextBoxSiteName
Cells(2, 2) = CDate(TextBoxDate)
Date = Cells(2, 2)
Sheet2.Cells(3, 28) = TextBoxPlant1
Sheet2.Cells(3, 31) = TextBoxPlant2
Sheet2.Cells(3, 34) = TextBoxPlant3
Sheet2.Cells(3, 37) = TextBoxPlant4
Sheet2.Cells(3, 40) = TextBoxPlant5
Sheet2.Cells(3, 43) = TextBoxPlant6
Sheet2.Cells(5, 27) = ExtractElement(Date, 3, "/")
Unload Me
DataImput.Show
End Sub
I need to allow only the cells covered in the date (example today is 30 May) to be unlock for data entry. However i need the rest of the cells to be lock. The date should refer as =today().
View 6 Replies View RelatedHow do you convert a range of dates in this format: 39843 (i.e today 30th of Jan 2009). To text like: 20080130. Secondly, For the same date, how do you make the weeknum function give answer '05' and not just '5'
View 2 Replies View RelatedI am currently using Excel 2007 and I am looking for an easier way to enter the system date and time into a cell. I am aware of the MS-Excel shortcuts but work in an environment where data capturers still often get it wrong.
Is it possible to use a Excel function/button to auto insert the system date and time by clicking on a cell/button or Alternatively use a calendar to do so.
I am thinking of commanding macro to select worksheet tab based on the system date to do some pasting.
My worksheet tab is as follow:
Nov-12, Dec-12, Jan-13, Feb-13 and .........
What should be the macro script required to select the worksheet tab based on today's date?
how I could have a range of B15-F15 to place Today's System-date in the Cell: A1, anytime anything is entered in that range?
View 9 Replies View RelatedI have the formula where i can change a date to its equivalent in terms of quarters system with a date:
=CHOOSE(MATCH(MONTH(A2),{1,4,7,10}),"Winter","Spring","Summer","Fall")&YEAR(A2)
This is a school year configuration.
ex.
A2 = 10/1/2005: with the formula up there it turns into Fall 2005
i want to be able to add any number of years and the formula will still come up with the quarters system
also i would like A2 to be stationary and create a list of quarters for each year i add on
ex.
A2= 10/1/2005 B2=Fall 2005
B3=Winter 2006
B3=Spring 2006
B5=Summer 2006
B6=Fall 2006
etc.
If this is all possible lastly I would like to negate summer quarters
I have written a few macros, which use date type variables. Because VBA uses the 1900 date system, and some workbooks use the 1904 date system, I have to first check and see if a workbook uses the 1904 date system, and if so, subtract off 1462 days where appropriate. My macros used to check the date system by using the command:
If ( ActiveWorkbook.Date1904 = True) Then
nh_stringToDate = nh_stringToDate - 1462
End If
But, sometimes the macro resides in one workbook (call it macro.xls) but the currently active workbook is some other workbook (something.xls). What I really care about is the date system of macro.xls and NOT something.xls. So, instead of "ActiveWorkbook" is there some other object I can use to refer to the workbook in which the macro itself resides? I don't want to rely on using the name of the macro workbook (macro.xls) because this could change! So I need a way to simply refer to the workbook in which the macro resides.
I have a user form that when a command button is clicked it enters the data from the from into coloums a,b,c,etc. I have code to do this but I want to add code to add a static date in coloum B based on if coloum A had data entered from the form. I need the date not to change to current date when the file is reopened. I am trying to elimate a date text box in the form. I have a link to the file http://www.box.net/shared/zdtsjv0qos
View 7 Replies View RelatedI'm sent a file every day where column A contains a month & year but in "general" format.
For example;
Column A, starting with cell A1 with the next date in A2, etc
Jan15
Feb15
Mar15
Apr15
Is there a way through a formula or macro that I can use in order to run through all the dates in this column to make sure that the next cell down is always the month after the cell above it? The dates go all the way through to 2018 in the above format.
I have a sheet(Sample.xlsx) in which weekly data is collected and this is done by using the VBA code(Present in Copy 1 and Copy 2 button in Master US.xlsm) written by me. But in my code, it inserts a new after asking two parameters, i.e. line range(i.e. row no for eg A64) and date. I want it to automatically search row containing last date and inserts row below it and this needs to be implemented in "Insert Automatically" and "Insert Date" button using VBA code in Master US.xlsm sheet.I dont have problem with second paramenter.
Logic i want to use :
Itergation of whole page
{
If (col A<>Date)&& col A=Average(i.e. contains average word)
then
inserts row above that row
And then ask for date to enter using date variable.
then inserts row above that row containing last week data in col A.
}
"Insert Automatically" in Master US.xlsm sheet is the button which takes system date and implements the above logic.
"Insert Date" in Master US.xlsm sheet is the button which ask for only date and implements the above logic.
Sheets attached.
Master US.xlsm
Sample.xlsx
How to check cell from a " DATE" column has todays date or not?
View 9 Replies View RelatedI want to check if Date in field B2 (which is 25/10/2013) falls between 21/10/2013 - 28/10/2013 (Using UK date format, not sure if that's relevant). And apply that to all other fields in the column.
I got it to work using the Today() function, and Today()-7 but I can't get it to work with regular dates, and some of the checks I want to be able to do are from further back.
what is the vba code to check this conditon.
my excel file .sheet name "abc" . if cell "a3" have any value . and cell x3 values >=cell x10 ,then it show the input box to call new password "1234"
msgbox showned " true password you can work it now"
if user put wrong password .the workbook is cloesd with the msgbox "wrong password" then the application closed exit.
-cell x3 is datetime values "now" to compare with the cell x10 is the datetime "01012009 8:00" to check the outof date of the application
i am trying to see if a date is between 2 dates. i have a sql dump and want to create additional colums before creating a pivot. each line was created with a date and i want to create 2 new colums financail year, month. not sure if it is possible with vlookup and that is about as advanced as i get. attached is a summary table.
View 5 Replies View RelatedI have a spreadsheet (obviously), I want to click a check box and have it date stamp with text, in the next available cell... if you know what i mean! I have attached a screenshot of what i have (the check boxes) and what i need (the writing in blue).
View 7 Replies View RelatedHow i can create a Validation rule on my form (that i made using Microsoft Visual Basic) to make sure that they key in a date later than that of todays date
My excel worksheet is a Project Status Log with many rows and columns. My code goes through each row and sorts the projects Unique_ID by Launch Date. On the Launch & Revised (12 & 13) columns, I need to perform the following for each row (I reference Column 2 which is a Unique_ID).
Check if Revised value is populated
If yes then use Revised value else use Launch value
Check if value is a date else store Unique_ID in array Other
If the value is a date then check # of days from today to value
My problem is that if the value is not a date it does not store in array Other but may store to any of the alternate arrays I am utilizing. (I believe this is due to the string being converted to a date and then checked for date difference but don't know why this is happening.)
I have added more than the code I described in an effort to provide more understanding, so if you need more detail I can attempt to explain but right now my brain is hurting.
Do Until Sheets("Project Log").Cells(aRow, 2).Value = ""
On Error Resume Next
'Separate Top 10
If Sheets("Project Log").Cells(aRow, 3).Value = "Y" Then
a = a + 1
Redim Preserve arrT10(UBound(arrT10) + 1)
arrT10(a) = Sheets("Project Log").Cells(aRow, 2).Value
Else
I need to confirm that a date is entered correctly into a userform.
This code works for a command button, but not for a WorkSheet_Change event.
My textbox is the first in the userform, and needs to be checked immediately, as the labels in the rest of the userform all change to reflect the date that was entered.
What is the best way to do this? I tried a keycode = vbKeyReturn option, but cannot get it to work?
Code:
Private Sub DateCheck()
Dim DateString As String
Dim DateProper As Date
Dim EntryOK As Boolean
EntryOK = False
[code]....
I am trying to work out if today is in a sequence of +30 days from a specific date (and not past a specific date)
so, for example i have a start date of 25/1/11 and an end date of 25/1/16.
i want to know if today falls as part of a 30 day cycal from the start date.
i need to be able to do it without working it maunally such as just "=25/1/11+30" and fill across.
dim MyRange as range
dim Col as integer
Set MyRange = ActiveSheet.Range(2,1), Cells(102, 1))
if application.worksheetfunction.Match(ActiveSheet.Cells(5, col),MyRange,0) > 1 then
' it was in the list.....
else
'it is not....
end if
I imagine this isn't the best way and I since I couldn't get past the Set statement. What am I missing? Is the range of dates causing the problem? If my range is one cell in the range it sets the range?
I have software that generates an excel worksheet with data with dates. In this column of dates, there are either valid dates or dates with all zero's (00-00-00). I need to setup a formula that checks this column, if they have a valid date (anything greater than 00-00-00) then mark that row with "Contract", if hit has all zero's (00-00-00) then mark it as "CP". One thing, this column is not formatted as "Date", it is formatted as general. I didn't know if that made a difference.
Also, is there a way to setup this WHOLE column with this formula so that as soon as the data is extracted, it will automatically change the cell value to CP or Contract?
Let's say that i have a list of dates on column A. Then I enter a "Start date" in "B1" and an "End date" in "B2" What I want is to find all dates that falls between "start date" and "end date".
View 9 Replies View RelatedI am looking for a single formula I can run along a single row that looks at several columns of data, and then checks if the date range falls between the running row, take it's relevant number, and multiply it by a single rate. The attached probably explains it clearly - I think the solution would be some sort of Sumproduct, but my attempts have failed!Example - Date Range with Calculation.xlsx
View 10 Replies View RelatedI have some code here that I am using to find matches in Column D and then remove colored cell once the match is found. I am in putting the data line by line from a Barcode scanner and only want to run the macro if the date in Column A is today. Here is the code I am using.
[Code] .....