VBA Adding Wrong Dates
Dec 22, 2011
The code is supposed to project review dates 1 month, 2 months and 3 months after the start date, but the first "cell offset" line on is projecting the next day instead of next month, its driving me nuts!!, the others are working fine
Code:
Sub reviews()
Dim cell As Range
For Each cell In Range("L1:L200")
If IsDate(cell) Then
cell.Offset(, 10).Value = DateAdd("m", 1, cell.Value)
cell.Offset(, 11).Value = DateAdd("m", 2, cell.Value)
cell.Offset(, 12).Value = DateAdd("m", 3, cell.Value)
cell.Resize(, 10).AutoFill cell.Resize(, 11)
End If
Next cell
End Sub
View 3 Replies
ADVERTISEMENT
Aug 19, 2013
This macro has a problem in that it totals up the colunmns in two places by error
The total should be at the end of the coumns only.
It gives me a total part way through the list which muddles things up a bit.
Sub prepareSAPexport()
'
' prepareSAPexport Macro
' prepare the sap export ready to be compared to CDS
'
' Keyboard Shortcut: Ctrl+s
'
Range("A1").Select
[code]....
View 1 Replies
View Related
Jun 27, 2014
I have 4 text boxes in a user form where user type numbers. At the end i have another text box(yellow one) that adds these numbers using this code.
[Code]....
In another text box(grey one) user types another number. Then using this code
[Code] .....
I try to add the values of the two previous text boxes. I get wrong result when i use decimals numbers and i can not understand what is wrong.
Attached File : add text boxes.xlsm
View 7 Replies
View Related
Apr 18, 2014
When copying data from a website to excel, excel recognizes the dates wrongly.
About half of the dates he sees as: DD/MM/YYYY, while it should be: nothing/MM/DD.
For example: The cell contains the date: 01/04/2029 (The first of April, 2029)
While it should actually be: 04/29 (The 29th of April, no year!)
For all dates it starts with the 1, followed by a month, followed by a year (which consists of the year 2000 + the actual day), which is totally wrong.
About the other half of the cells, it just contains text with the month and the day (which are correct), but excel doesn't recognize this as a day.
For example: The cell contains the text: June 12
When I set the cell format to date (or any other format for that matter), nothing happens, so excel does not see this as a date.
View 1 Replies
View Related
Sep 17, 2008
I have a VBA subroutine that builds a list of dates in an array and then copies this to the worksheet using worksheetfunction.transpose. The array is two dimensional and therefore uses the variant data type.
This works fine in Excel 2002. In Excel 2003 the array is fine until the Transpose function is used, at this point they are changed from dd/mm/yyyy to mm/dd/yyyy. This means that some dates are changed (eg: 01/Mar/2008 becomes 03/Jan/2008) and some are written as strings (eg: 17/Mar/2008 becomes the string "17/03/2008" and cannot be operated on as a date).
I'm aware that there was a hotfix to deal with a similar issue regarding recalculation but this is on Excel 2003 SP3 which should already have that hotfix in place.
I have reduced my code down to a basic demonstration showing the problem. This assumes the worksheet contains some dates in "A2:A32". I have also attached the workbook containing this code.
VB:
Private Sub CommandButton1_Click()
Dim a() As Variant, c As Integer
Redim a(1 To 31)
For c = 1 To 31
a(c) = Cells(1 + c, 1)
Next c
Range("D2:D32") = WorksheetFunction.Transpose(a)
End Sub
I have fixed this problem by looping through each element of the array and writing them individually in to cells but this is far slower so I'd like to know if there is a better solution than that.
View 2 Replies
View Related
Dec 9, 2013
I have attached an excel sheet for your reference. I have particular debit values that are to be added between the dates. And Dates are also derived by formula based of payment term.
The ones I need to modify is Highlighted in Yellow. The values to be added is in "Customer Statement" and in H Column
These dates also have formula by which there are derived
-------------------------Current Ageing-------------------------
Date Range
Bucket
Amount
Percent
Start Date
End Date[code].....
I am USing =SUMIFS('Customer Statement'!$A:$A,'Customer Statement'!$H:$H,"=" & E11) but does not work.
View 9 Replies
View Related
Mar 28, 2009
In this spreadsheet I am working on for calculating vacation time based on accrual rate. how to add pay period dates automatically based upon the first on entered. I have done this before in a personal budget spread sheet and this is what I have in that. First cell I enter the date Second and following cells I have the formula "=IF(DAY(E$8+7)>7,E$8+7,"")" Everything works perfectly. No matter what I put in the first cell the following cells will adjust and display dates 7 days later from the previous cell.
I am trying to do the same thing except pay period dates are 14 days apart so I put the same formula except change the "7's" to "14's). The problem I am having is that ONLY the first cell displays the correct date, the second displays a blank cell and the remaining displays "#VALUE!". What the heck is going on? I cannot figure out why this formula works in one circumstance but not the other.
I am not sure what I am doing wrong, but what I am trying to do basically is what ever I enter in the first cell, I want all remaining cells in the date column to enter the date of 14 days later. Example, I enter in the first cell 3/27/09, in the next cell I want 4/10/09 and in the next cell I want 4/24/09 to be entered and this all the way down.
View 2 Replies
View Related
Dec 29, 2008
it has various headings - but the ones I am stuck on are below.
BADGENAMEDATE Issued
He has set up a basic vlookup so that typing in his badge number also will type out his name. However, he also wants the current date to come up every time he does this.
As the names and badge number don't change and have no difference from row to row, how can I get it to date stamp it with a different date each time?
View 10 Replies
View Related
May 10, 2007
I have a spread sheet that shows the dates items were shipped. When trying to work out the value of parts shipped in a month using SUMIF I get the value zero, I believe this to be because (obviously), there are multiple dates of ships during the month, I therefore tried ignoring the day of ship in the SUMIF but this did not work, the date format is DD/MM/YYYY.
View 9 Replies
View Related
Mar 10, 2008
1) To be able to get the current date in the format of 3/10/2008
2) To be able to take dates from 2 cells and get an integer value for the number of days between the two dates
View 9 Replies
View Related
Dec 14, 2009
I'm trying to limit the information people can put into my format and therefore to ensure they put in a the correct date etc i'm wondering if it is possible to have a calendar pop up to click on the date for a particular cell?
View 9 Replies
View Related
Feb 15, 2007
I'm having great difficulty adding hours to dates in Excel. In cell A1 I have a number which is calculated from a formula, it will normally return whole number values between 1 and 100. In cell A2 I have a start date and time i.e. 14/2/07 06:00:00 in cell A3 I want to add the number in A1 as hours to the date in cell A2. I am using the formula in A3 as =A2+TIME(A1,0,0) it seems to work okay for numbers that don't take the date onto the next day but if I try to add 24 hrs or 48 hrs for example the date still stays the same.
View 7 Replies
View Related
Mar 25, 2009
how i can automatically add a week to a start date i have in a rotas for the whole year?.
View 3 Replies
View Related
Jun 30, 2014
The way the code works right now is that I have it run as a few loops. it will first loop through the first worksheet in the array and delete what I need and then when that loop finishes it will run two macros that I have added in, then it will loop to the next worksheet in the array. right now it is only 2 sheets but eventually it will be many more. just working out the code for now. What I would like to do is in the second loop. my second macro in the code formats each page and, what I would like to do is add a date column to my code. I need to start at 1/05/2014 and then for the next iteration in the loop add 7 days.
[Code] ......
View 5 Replies
View Related
May 8, 2014
There are 5 columns.
Engineer name, attended site(date), report received(date), commercial/heating and bonus(gbp)
Engineers will only get a bonus if they send the reports in 1 day after attended site date for commercial, and 2 days after for heating. If the report is received past this window, they do not get a bonus!
Weekends do not count as a day!
This should be on one row per engineer. I then want to see how much "John Doe" is owed in any given month...
View 3 Replies
View Related
Dec 17, 2006
a sample of my sheet first....
View 9 Replies
View Related
Apr 15, 2009
I am having a 2000 records of date and time in excel (see the below example). My query is I want to add 6 hrs to each Cell and accordingly the Date should get changed for e.g see the B Column after adding 6 hrs the data should look like this. I want an excel formula (don't want VBA Code) ...
View 9 Replies
View Related
Aug 20, 2009
How can i leave Cell D3 etc blank untill i have inserted the end date it will look tidier when i do my full spread sheet and also is there a calender on a toolbar i could put on my spread sheet for easy inputing of dates.
View 5 Replies
View Related
Jun 19, 2013
I have a column with dates and times, and an associated column with data for all the dates and times. I want to add every hour of every day to the date/time column, but want the data associated with the times to stay in the row next to the correct time. How would I do this? In the attached file, i want to make coulmns A and B look like Coulnds E and F. I have hundreds (if not thousands) of rows, so i need a way to do this easily. Also, the times are not all evenly spaced or exactly on the hour. I dont need the times to be exactly on the hour or spaced out evenly, but i would like to have at least one time from every hour.
DBdate time alter.xlsx
View 2 Replies
View Related
Jan 29, 2013
Problem,
A B C D E F (B+C-D-E)
Date Opening Stock Purchase Sales Consumption Closing Stock
17/7/2012 10000 5000 1000 2000 12000
17/7/2012 12000 2000 2000 1000 11000
18/7/2012 11000 0 1000 5000 5000
18/7/2012 5000 10000 3000 0 12000
Note : I want the above result as shown below datewise but no duplication of date but summing up of column C,D and E which is in above.Pls note that this is accounting question and also plz note that Opening stock(column B) from next date onwards must be equal to previous date closing stock(Column F).
Results :
A B C D E F (B+C-D-E)
Date Opening Stock Purchase Sales Consumption Closing Stock
17/7/2012 10000 7000 3000 3000 11000
18/7/2012 11000 10000 4000 5000 12000
(B=F)
if I could get the formula in excel ,since this is the sample data as I do have a numerous & huge data like shown above datewise where I need to add C ,D and E but Opening stock(column B) from next date onwards must be equal to previous date closing stock(Column F).
View 2 Replies
View Related
Feb 17, 2009
I am using a For Each Next to cycle through a list of names, check certain conditions and then will be adding a further lookup (instead of Result = Result+1), but all I get is #Value!
Function maxbarometer(Name As String, Round As Integer, NameList As Variant, RoundRange As Range, RoundRangeTwo As Range)
Dim Roundname As String
Dim Result As Double
Dim NameColRound As Integer
Dim ListObject As Variant
Roundname = "Round " & Round
NameColRound = Application.WorksheetFunction.Match(Name, RoundRange, 0)
For Each ListObject In NameList
If ListObject.Value = Name Then
Result = Result
ElseIf Application.WorksheetFunction.VLookup(ListObject.Value, RoundRange2, NameColRound, False) = Roundname Then
Result = Result + 1
End If
Next
maxbarometer = Result
End Function
View 9 Replies
View Related
Mar 19, 2007
when i try to get the final row witht the following:
KROGrow = Cells(65536, 1).End(xlUp).Row
i am getting a row that is consistently 27 rows off of when i manually do control up? i am pasting data from and existing workbook into a newly created workbook in the sub. i would assume that since the destination is new that they would never be any data in this?
View 9 Replies
View Related
Jul 3, 2013
I am trying to use the Vlookup function to return State name based on the corresponding state code.
I have the list of State along with the Codes in adjacent sheet, arranged in ascending order. I am using the Vlookup function to list the State name based on the State code.
Vlookup function: Vlookup(A4,Sheet2.A2:B51,1)
This function returns me a wrong value. It gives "Arkansas" for the state code "AZ", when it should be Arkansas.
Also, if I add "FALSE" as a 4th argument, it returns "#N/A".
View 9 Replies
View Related
Jan 29, 2014
I have the following formula: IF(SELL_INVESTMENT = "YES" , 1,2) It returns not 1 or 2 but 0. The worksheet contains over 1000 cells. Trace Precedents verifies that the formula evaluates the correct cell and that it contains "yes". I created a very simple worksheet to test the formula and here it correctly returns 1.
View 2 Replies
View Related
Nov 7, 2008
I'm trying to figure out an Internal Rate of Return for a spreadsheet. The answer is supposed to be: 29.42% however I'm getting 25.94%. Does anyone know what I'm doing wrong in my IRR function on the Profitability worksheet? I'm currently using Excel 2007 by the way.
View 4 Replies
View Related
Feb 18, 2010
I have a problem with my references when sorting in excel. I have been searching for the problem, but did not found a useful solution.
I'm using excel 2003.
Let me try to explain my problem with a simple exampel.
I have a column with numbers and one with formulas pointing at these.
A B
2 =A1
4 =A2
3 =A3
Now I want to sort column A, and the column B should keep pointing at the original number. So I want this:
A B
2 =A1
3 =A3
4 =A2
But I get this:
A B
2 =A1
3 =A2
4 =A3
This output is what I would expect if I used absolut reference($).
Using offset(B1;0;-1) will work, but I cannot use this, since I will add/delete rows and the reference is not neccessarily next to it. Plus it can be a rather large sheet.
I cannot use dynamically name definition either, because it is intended for other users, and this will be too much work for them. What I basically need is a simple formula they can enter.
My sorting is done via a VBA macro, so if there is anything I can do through macro/VBA that will be okay as well, since I can do this without the user seeing it.
View 14 Replies
View Related
Oct 22, 2013
I have modified this micro I found in a forum. All I changed was the Range on Sheet 1.
[Code].....
It works fine except when it cuts to sheet 2 it starts at on column B I need it to start with Column C. What do I need to add ?
Attached File : Survey.xlsm
View 7 Replies
View Related
Sep 25, 2006
I have the following code which saves my worksheet with a name extracted from particular cells:
Public Sub SaveAsMaximoWO()
ThisFile = Range("AC5").Value
ThisFile2 = Range("E3").Value
saveName = ThisFile & " - " & ThisFile2
ActiveWorkbook.SaveAs Filename:=saveName
End Sub
This (for reasons I don't understand) saves the file to My Documents by default.
What I would like it to do is save to another folder within my documents as default.
View 14 Replies
View Related
Mar 13, 2009
how to control this,it should be 0.55. is they a wat too round off too next highest hole number? Here is a example.
View 2 Replies
View Related
Apr 18, 2009
I have this workbook with 10 sheets. Each sheet has macros that are called from a floating toolbar. What I am trying to do:
I want to create a msgbox that warns me when I click in a toolbar's button to call a macro that not runs in the activesheet. Something like: "This code (or macro) doesn't match (or run) with the active sheet.
View 3 Replies
View Related