# annual and daily serial calculation

• ### Question

• Hi Cimjet,

Thank you for you kind reply,

The annual and daily serial calculation I did up to some extent. please see the file

Both are same and old macro. Please forgive my ignorance.

Regards,

dockhem

Friday, August 15, 2014 4:51 PM

• If I understand again.

Try this :

ws.Cells(5, 5).Resize(i - 3, 1).Formula = "=CONCATENATE(IS5,""-"",IT5)"
ws.Cells(5, 6).Resize(i - 3, 1).Formula = "=CONCATENATE(IU5,""-"",IV5)"

Take note of the double quotes between the dash.

Cimjet

• Marked as answer by Monday, August 18, 2014 4:53 PM
• Unmarked as answer by Monday, August 18, 2014 4:53 PM
• Marked as answer by Monday, August 18, 2014 4:55 PM
Monday, August 18, 2014 4:05 PM

### All replies

• If I understand correctly.

Just remove the dash before IT4 in this formula.

Change this  Cells(4, 5).Formula = "=CONCATENATE(IS4,-IT4)"  to this

Cells(4, 5).Formula = "=CONCATENATE(IS4,IT4)"

Don’t forget, you have 4 lines of code to change.

Cimjet

If this answer is helpful, please mark the post Helpful and if it solved the problem, mark it as answered. Thank you

• Edited by Friday, August 15, 2014 7:49 PM
Friday, August 15, 2014 7:46 PM
• Hi Cimjet,

It removes - and space between two number and they are like this 12 and 1565 etc. instead 1-2 and 1-565 now. please see the example I gave.

1. The annual are entered "1-2", "3-4", "5-10" so on.

2. The daily entered as "1-2", "3-4", "5-10" so on until date changes. When date changes starts from "1-*" again.

3. Both are entered a "-" whenever there is entry in repeated cases. Repeated entry we can make in to column where we in put name alternatively too. (This what we do in records.)

dockhem

Saturday, August 16, 2014 12:19 AM
• If I understand again.

Try this :

ws.Cells(5, 5).Resize(i - 3, 1).Formula = "=CONCATENATE(IS5,""-"",IT5)"
ws.Cells(5, 6).Resize(i - 3, 1).Formula = "=CONCATENATE(IU5,""-"",IV5)"

Take note of the double quotes between the dash.

Cimjet

• Marked as answer by Monday, August 18, 2014 4:53 PM
• Unmarked as answer by Monday, August 18, 2014 4:53 PM
• Marked as answer by Monday, August 18, 2014 4:55 PM
Monday, August 18, 2014 4:05 PM
• Thank you Cimjet

regards,

dockhem

Monday, August 18, 2014 4:54 PM