Entering A Date Value Then Incrementing It In VBA
Jul 29, 2008
I am currently working on a button which does the following:
User wants to create a new sheet
Clicks button
Input box prompts user to enter sheet name
User enters the sheet name
The sheet is created and copies over formats and values from another sheet
I then want the user to also enter a date.
The date must then be places (always in "C2") then each second column after that the date entered + one day.
E.g. C2 = 01/08/2008 then C4 will have 02/08/2008
I want this entered for the whole month.
The code is below:
Sub copyformula()
Dim vsheet As String
Dim vdate As Date
vsheet = InputBox("Enter a sheet name:")
View 9 Replies
ADVERTISEMENT
Nov 24, 2008
Im trying to create a catalogue for our complaints that come in each day at work. Ive created a basic layout I like, it uses 3 cells for a week day and 1 cell for a weekend day. The date is listed on the side of each day. I would now like to be able to quickly use this format for the rest of the month/year but need a way to do this easily as I cant do each day separately in the future. Ive tried selecting cells and then dragging down but all it does is repeat the previous 7 days and the same dates instead of incrementing the date.
Ive attached an image ...
View 2 Replies
View Related
Feb 8, 2008
I have a sheet where users enter a date and other details on each row.
The number of rows where data is entered can be upto 20 at any one time.
I wish to allow users to drag the cell date down for the number of rows they wish, without the date incrementing.
View 4 Replies
View Related
Apr 11, 2009
I have few sheets in a workbook and last sheet named report, I update each sheet date wise except report, problem is that the report sheet contains formulas of last rows sum, if I update today date report then I should change all formulas in reports. Kindly see attached file.
View 5 Replies
View Related
Feb 2, 2014
I have a spreadsheet that records water consumption in L/s at 5 minute intervals. I've attached an example of the data collected during January 2012.
Is there any formula that will calculate the total amount of water consumed between a user-entered date range? For example:
From: 01/01/12 00:00 (User enters 'from date and time' in an allocated cell)
To: 20/01/12 23:55 (User enters 'to date and time' in an allocated cell)
Consumption: ______ (Formula generated result in Litres)
View 3 Replies
View Related
Mar 12, 2007
i want to let a user enter a date and then chk if the user entered the right format.
It is not working....In order to see if works i press entered without entering any value and a TYPE MISMATCH error msg appears.
here is my
NumberEntry = InputBox("Enter Start Date", "Start Date", "dd/mm/yyyy")
Do While Not IsDate(NumberEntry)
MsgBox "The FROM date is not a valid date."
NumberEntry = InputBox("Enter Start Date", "Start Date", "dd/mm/yyyy")
'NumberEntry = InputBox("Please enter the date (dd/mm/yyyy) FROM to work with.")
Loop
View 5 Replies
View Related
May 21, 2014
how to do the formula for highlighting whole row after entering a date in one of the columns.this spread sheet had over 300 rows so I can't do the conditional formatting, I need a formula for whole spreadsheet.
View 11 Replies
View Related
Jun 26, 2013
In the workbook the sheet names are month names e.g. july,august,September etc and 1st of each month is to be entered in a cell in each the sheets. By some trial and error I wrote this macro
VB:
Sub test()
Dim j As Integer, monthnr As Long, monthname As String
For j = 1 To Worksheets.Count
[Code]....
This worked in July sheet it is written as 7/1/2013 and in august sheet it is 8/1/2013 etc Then I shortened the macro like thlis
VB:
Sub test()
Dim dte As Date
dte = "july" & "/1/2013"
Range("A1") = dte
End Sub
It worked. Even if I use shortened 3 letter form of month like "Jul" or "aug" then also it works
But if type on the spreadsheet itself
="july"/1/2013
It Gives value error.
Perhaps it works only in vba and not spreadsheet.
I accept nobody is going to use "july" & "/1/2013" instead of 7/1/2013 But this will be useful if sheet names are month names so that when we write the date we can use sheet names Mine excel 2007 and windows 7.
View 2 Replies
View Related
Jul 26, 2013
I am entering data for ships arrived every month. There are about 200 records to be entered and for every record there are 4 date fields.
My question is : Is it possible to set default month (for ex = July) and year ( for ex = 2013 ) in these 4 cells so that
If I just type 16 it should be 16/07/2013. Because all my dates will be within that month July 2013.
View 2 Replies
View Related
Mar 31, 2007
I am trying to create/modify an XY scatterplot using VBA.
I declare local variables and point them to the chart and a new data series for the chart, such as:
Dim chartone As Chart
Dim chartseries As Series
Set chartone = ThisWorkbook.Charts("Chart1")
chartone.ChartType = xlXYScatterLines
Set chartseries = chartone.SeriesCollection.NewSeries()
I set the series data, using an array, such as:
chartseries.Values = Array(1, 3, 5, 7, 9, 11)
I can set the Xvalues to a set of dates by setting .Xvalues to a woksheet range that includes date-formatted data. (like this):
chartseries.XValues = Worksheets("sheet3").Range("m9:m14")
(where m9:m14) contains dates...
View 4 Replies
View Related
Jun 23, 2006
I am writing a module which have a different test based on for each of the previous 2 column cells. It calculate the days passed or in simple way calculate the date difference for the 2 columns and puts them in third. But i need to use a inputbox for entering the first date for monday of the month each time i use the worksheet.
When i try using the module for each cell of the column it display the input box for each cell. is there any way so that i just enter the value in input box and it can be used in rest of the module.Without using it again and again.
View 8 Replies
View Related
Jul 11, 2012
I have to complete information providing dates and names for a long number of individuals. Is it possible to set up the spreadsheet so that if you enter a date next a persons details in on worksheet their information is automatically updated in the relevant ones?
View 2 Replies
View Related
Apr 21, 2013
How do i calculate the time between 22:00hrs and 08:00hrs without entering a date? Is this possible or do i need to enter a date?
View 9 Replies
View Related
Jan 10, 2010
Im using the following HLOOKUP formula : =HLOOKUP($B$14,$DA$15:$EH$380,2,FALSE) and I need to drag it down 365 times, but the row index num, ie ‘2’ does not increment with the drag. Is this correct – or is there a way of making the 2 increment?
View 3 Replies
View Related
Oct 1, 2008
If I'm in a worksheet and I spot a row I'd like to copy into my second worksheet, how do I arrange to have it increment the rows?
EX: searching through a worksheet, I see a suspicious entry. I want to copy it into another worksheet. I use the macro. I go back to the original worksheet and see another suspicious entry that I'd like to copy. I'd need a macro that would copy the active row from sheet one, and increment the rows on sheet two before pasting.
View 3 Replies
View Related
Dec 14, 2007
I create inventory cards and each needs a unique 4 character sequence number. Currently I have it set up with 4 cards per sheet. If I need to print more than 4 cards, the worksheet will print one sheet of 4, reset itself and increment the sequence number by 4 and continue this cycle until I've printed the number I need.
Currently I have it only using numbers. I start at 1000 and it increments, by 4, up to 9995. Once it reaches 9995 or higher, the increment resets to 1000 and starts over. The problem I am facing is I am now starting to get several cards that have the same "unique" sequence number. What I would like to do is change it from numerical sequencing to alphanumeric sequencing.
This is the code I currently use for the incrementing....
View 9 Replies
View Related
Nov 19, 2008
In one of my rows I am a referencing another sheet:
The formula is =Sheet2!e4. In the row below it I have =Sheet2!E8. Now is there a way to drag these formulas down so they keep incrementing by 4?
View 9 Replies
View Related
Jul 31, 2006
I've got above basic VBA knowledge and learning very quickly (largely due to great forums like this) I'm now creating a userform for the first time. I'm trying to create a New Supplier form and one of the fields is going to be for Supplier ID where it takes the first 6 letters of the Supplier name (entered by the user) & tags on '001' at the end. I've managed to do this but I would like some code to search existing supplier ID's ( Column A on separate sheet) and check whether the ID created already exists and if it does add on '002' instead of '001'.
SO for example..
If user creates a supplier called Microsoft the supplier ID will be Micros001 - this I can do, but if Micros001 already exists then it will generate an ID
Micros002, Micros003 and so on...
View 3 Replies
View Related
Oct 8, 2008
I have a column that I want to insert number 1 through ? incrementing by one. Can I do this simply without having to type in each one manually?
View 4 Replies
View Related
Nov 25, 2008
I am having trouble with the following situation:
on the sheet PANEL in cell A2 I want to reference the information on sheet 480 in cell B5.
Then on sheet PANEL in cell A3 I want to reference the information on sheet 480 in cell B54.
'PANEL'A2 needs to equal '480'B5
'PANEL'A3 needs to equal '480'B54
And so on...
I need the reference to skip 49 cells each time so that I can just copy the formula on down the column.
View 6 Replies
View Related
Mar 11, 2009
I'm putting together a document where I'm trying to automatically create a reference number for each entry. The reference number needs to consist of a site ID (found in column A), an underscore, and then an incrementing number dependent on how many entries the reference number appears.
For example, in column A, the first time the site ID: 12345 appears, I'd like the reference number 12345_01 to be created. The second time it appears, the reference number would be 12345_02. And so on.
If possible, as illustrated above, the first nine references need to have a 0 before the number - i.e. 01, 02, 03, etc - when it hits the tenth instance the reference becomes 10, 11, 12, etc.
I've tried to solve this with COUNTIF, but cannot get it down.
View 2 Replies
View Related
Sep 28, 2009
Is there a way to count how many times a value is changed?
Cell A1 can be either “YES” or “NO”. Its' value is controlled by validation…
When Cell A1 is changed from “YES” to “NO” I want to increment the value in B1 by one.
When Cell A1 is changed from “NO” to “YES” I want to leave B1 as it is.
View 6 Replies
View Related
Feb 14, 2014
I have created below vba code but don't understand how to stop the auto incrementing.
[Code] ......
It end ups giving me see below.
Week 5+6
Week 5+7
Week 5+8
Week 5+9
Week 5+10
Week 5+11
And what I want is that it shows in all the lines “week 5+6”
Strange enough when I only enter a number like 5 it doesn’t auto increment.
And if I add a dot behind the 6 then either.
But I just want it AutoFill that what I have inserted in the box!
View 3 Replies
View Related
Mar 5, 2014
I have a piece of code that runs through multiple tables (they vary in length) and replacing values. All in the same worksheet
My code looks like this:
[Code] .....
How I get c to move to the next table and count the rows in that. In my code c stays constant, and I need it to change and match the new row count.
View 6 Replies
View Related
Jul 22, 2008
I have a spreadsheet which I need to remove all the blanks from, but instead of shifting cells up (I figured out how to do that in a macro), I want them to shift left.
I understand the basics of for...next loops etc, but I can't seem to understand how to make the selection in a range string variable. Not sure if this is a good explanation!
The code I have so far is....
View 10 Replies
View Related
Mar 16, 2009
I am running a macro where I pass it starting column and it processes the next 10 columns. How can I pass it "J" and have it increment K,L,M,N,O,P,...?
View 3 Replies
View Related
Oct 4, 2013
I need to complete what would seem a fairly simple incrementing task but I'm not getting the results that I'm looking for. I don't know much about macros so would prefer not having to use one but I'm willing to try if it's not too complicated.
I'm using Excel 2010 on a PC. For several projects, I need to increment cells that contain text and numbers. The column contains data in a cell (A1), followed by a blank cell (A2), then cell A3 contains new data followed by a blank in A4, etc. What I need to do is 1) copy the exact data in A1 to A2 and then 2) increment the number used in A1/A2 by 1 in A3, copy that into A4, and the pattern repeats down the column.
Here is an example of what I have in column A:
Test_01
[blank cell]
Test_02
[blank cell]
Test_03
[blank cell]
etc.
This is what I want as a result.
Test_01
Test_01
Test_02
Test_02
Test_03
Test_03
etc.
Do I need to save the data in the column as text, general, or numbers? Is there some function that would make incrementing the data possible as I've outlined above?
View 8 Replies
View Related
Jun 6, 2008
Incrementing line numbers is a simple task.
If line Identification starts with
AA
AB
AC, why doesn't the same rules apply?
Highlight the cells then click and drag the corner down.
View 9 Replies
View Related
May 3, 2006
Here is what I have at present:
At the beginning of a loop, my cursor is positioned on a row. I want to test two cells on that row.
Depending upon the result of the two cells, I want to make the row a certain color.
After that, I then want to move down to the next row, test the same two cells in THAT row, color accordingly and loop again until I reach the bottom of the spreadsheet.
My problem is this:
If I can use a loop that lists various conditions, along with the corresponding statements that color the row accordingly, how can I when finished increment the cell references so that the conditions change to refer to the cells the next row down?
If a loop is not possible, any suggestions you have for solving this problem would be appreciated. I have about 200 rows so am trying to condense my code; this may be hampering my ability to figure out the solution.
View 9 Replies
View Related
May 27, 2006
I have a sheet with all of my data sorted into columns. I am writing a macro to select and copy the value from column A if there is any value in column B on the same row. The output would be sent across consecutive columns.
As an example;if B3 is not blank, copy A3 to I5
if B4 is blank, do nothing
if B5 is not blank, copy A5 to J5
if B6 is not blank, copy A6 to K5
and so on.
I cannot figure out how to increase the output column identifier. Everything else I can get
View 4 Replies
View Related
