every time I run the macro it put the same data in a different column still I need something that will prevent this. His test function isnt working is there something wrong with it?

how do I do that?

3:00 77 65 65
3:30 77 67 67
4:00 77 72 72
4:30 77 62 62
5:00 77 49 49
5:30 79 79 79
6:00 77 91 91
6:30 77 285 285
7:00 77 321 321
7:30 77 196 196
8:00 77 253 253

total jobs 849

the first column is just the time of day. the other columns are filled with data. take notice that the 2nd and third columns have the same data in them. somebody ran the macro before the jobs were finished… hence it put out yesterdays data thats why the two columns are the same. I need to prevent this from happening again. but how?

3:00 77 65 65
3:30 77 67 67
4:00 77 72 72
4:30 77 62 62
5:00 77 49 49
5:30 79 79 79
6:00 77 91 91
6:30 77 285 285
7:00 77 321 321
7:30 77 196 196
8:00 77 253 253

total jobs 849

the first column is just the time of day. the other columns are filled with data. take notice that the 2nd and third columns have the same data in them. somebody ran the macro before the jobs were finished… hence it put out yesterdays data thats why the two columns are the same. I need to prevent this from happening again. but how?

HansV – this is my problem Every time I open the spreedsheet called data entry It not only updates todays date but yesterdays as well. How can I fix this? I need a solution ASAP before saturday night 05/15/04.
St. Louis
10-May 11-May 12-May 13-May 14-May 15-May 16-May
3:00 23 27 26 26 21 21
3:30 43 34 28 27 31 31
4:00 37 33 12 17 26 26
4:30 30 24 10 13 16 16
5:00 27 25 20 15 16 16
5:30 36 33 43 21 25 25
6:00 20 28 17 13 17 17 < ——see how it duplicates
6:30 46 59 39 32 59 59 the whole column
7:00 22 26 27 14 24 24
7:30 17 19 17 15 21 21
8:00 30 28 20 20 25 25

Total Jobs 331 336 259 213 281 281 0

Ohio
10-May 11-May 12-May 13-May 14-May 15-May 16-May
3:00 21 23 27 20 25
3:30 30 53 24 62 29
4:00 43 51 23 46 27
4:30 50 39 57 50 28
5:00 50 31 16 42 23
5:30 49 25 12 31 20
6:00 40 20 7 27 15
6:30 23 17 7 20 21
7:00 38 23 16 26 19
7:30 22 17 21 15 22
8:00 28 23 21 25 21

Total Jobs 394 322 231 364 250 0 0

this is the code i’m using.

Function CompareCols(col As Long) As Boolean
Dim i As Long
Dim s As Long
For i = 2 To 13
s = s – (Worksheets(“Sheet1”).Cells(i, 1) = Worksheets(“data entry”).Cells(i + 1, col))
Next i
CompareCols = (s = 12)
End Function

Sub Get12()
Dim LastCol As Long
LastCol = Worksheets(“data entry”).Range(“IV3″).End(xlToLeft).Column
If CompareCols(LastCol) = True Then
If MsgBox(” Please Check to ensure that the Jobs ran good. Is it past 10:15am EST? The new data is equal to the last data. Do you want to proceed?”, _
vbQuestion + vbYesNo) = vbNo Then
Exit Sub
End If
End If
Worksheets(“Sheet1”).Range(“A2:A13”).Copy Destination:=Worksheets(“data entry”).Cells(3, LastCol + 1)
ActiveWorkbook.Save
End Sub

this is my data that I import from a text file on another drive. (what you see is what it is).
21
31
26
16
16
25
17
59
24
21
25

The data is imported into sheet1 column A rows 2 through 12. I then on Sheet 2 have the macro (up above) bring the data in and update my columns.
The problem resides in when ever I open the spreedsheet it is automatically updated but it updates todays column and yesterdays column. I just want it to update todays column.

this is the code i’m using.

Function CompareCols(col As Long) As Boolean
Dim i As Long
Dim s As Long
For i = 2 To 13
s = s – (Worksheets(“Sheet1”).Cells(i, 1) = Worksheets(“data entry”).Cells(i + 1, col))
Next i
CompareCols = (s = 12)
End Function

Sub Get12()
Dim LastCol As Long
LastCol = Worksheets(“data entry”).Range(“IV3″).End(xlToLeft).Column
If CompareCols(LastCol) = True Then
If MsgBox(” Please Check to ensure that the Jobs ran good. Is it past 10:15am EST? The new data is equal to the last data. Do you want to proceed?”, _
vbQuestion + vbYesNo) = vbNo Then
Exit Sub
End If
End If
Worksheets(“Sheet1”).Range(“A2:A13”).Copy Destination:=Worksheets(“data entry”).Cells(3, LastCol + 1)
ActiveWorkbook.Save
End Sub

this is my data that I import from a text file on another drive. (what you see is what it is).
21
31
26
16
16
25
17
59
24
21
25

The data is imported into sheet1 column A rows 2 through 12. I then on Sheet 2 have the macro (up above) bring the data in and update my columns.
The problem resides in when ever I open the spreedsheet it is automatically updated but it updates todays column and yesterdays column. I just want it to update todays column.

HansV – this is my problem Every time I open the spreedsheet called data entry It not only updates todays date but yesterdays as well. How can I fix this? I need a solution ASAP before saturday night 05/15/04.
St. Louis
10-May 11-May 12-May 13-May 14-May 15-May 16-May
3:00 23 27 26 26 21 21
3:30 43 34 28 27 31 31
4:00 37 33 12 17 26 26
4:30 30 24 10 13 16 16
5:00 27 25 20 15 16 16
5:30 36 33 43 21 25 25
6:00 20 28 17 13 17 17 < ——see how it duplicates
6:30 46 59 39 32 59 59 the whole column
7:00 22 26 27 14 24 24
7:30 17 19 17 15 21 21
8:00 30 28 20 20 25 25

Total Jobs 331 336 259 213 281 281 0

Ohio
10-May 11-May 12-May 13-May 14-May 15-May 16-May
3:00 21 23 27 20 25
3:30 30 53 24 62 29
4:00 43 51 23 46 27
4:30 50 39 57 50 28
5:00 50 31 16 42 23
5:30 49 25 12 31 20
6:00 40 20 7 27 15
6:30 23 17 7 20 21
7:00 38 23 16 26 19
7:30 22 17 21 15 22
8:00 28 23 21 25 21

Total Jobs 394 322 231 364 250 0 0

how do I do that?

every time I run the macro it put the same data in a different column still I need something that will prevent this. His test function isnt working is there something wrong with it?