time interval

[earp_]

Hi I have this problem,
in cell A2 of sheet1 there is a timestamp in this format
12:00:00 PM
When cell A2 of sheet1 is between 12:00:00 and 12:59:59 I want to write 'hello' into another cell: A4 of sheet2

How does it work?

Thanks in advance

 

[earp_]

yep

 

[earp_]

I fixed it with

LastR.FormulaR1C1 = "=IF(AND(Sheet1!r2c1>=""15:37:00""*1,Sheet1!r2c1<=""15:38:00""*1),""Hello"","""")"

 

[earp_]

fixed it

 

[earp_]

with this,

LastR.FormulaR1C1 = "=IF(AND(Sheet1!r2c1>=""15:37<wbr>:00""*1,Sheet1!r2c1<=""15:38<wbr>:00""*1),Sheet1!r2c2,"""")"

I copy into LastR the formula of Sheet1!r2c2

What if I want to copy just the value and not the formula?

 

[Jonmo1]

Try this..

With LastR
    .FormulaR1C1 = "=IF(AND(Sheet1!r2c1>=""15:37<WBR>:00""*1,Sheet1!r2c1<=""15:38<WBR>:00""*1),Sheet1!r2c2,"""")"
    .Value = .Value
End With

 

[earp_]

it gives me an error on

.FormulaR1C1 = "=IF(AND(Sheet1!r2c1>=""15:37:00""*1,Sheet1!r2c1<=""15:38:00""*1),""Hello"","""")"
</pre>

 

[Jonmo1]

Worked for me...

I based that on your previous post #12

I fixed it with

Quote:
<TABLE cellSpacing=0 cellPadding=6 width="100%" border=0><TBODY><TR><TD class=alt2 style="BORDER-RIGHT: 1px inset; BORDER-TOP: 1px inset; BORDER-LEFT: 1px inset; BORDER-BOTTOM: 1px inset">LastR.FormulaR1C1 = "=IF(AND(Sheet1!r2c1>=""15:37:00""*1,Sheet1!r2c1<=""15:38:00""*1),""Hello"","""")" </TD></TR></TBODY></TABLE>

If that did indeed work, then my suggested solution should also work..

 

[earp_]

it works, perfect thanks a million.

 

[earp_]

is it possible to use the same method with a If statement?
Something like

IF(AND(Sheet1!r2c10>=""09:00:00""*1,Sheet1!r2c10<=""09:05:00""*1) then
....do something...

I don't really have any idea

 

[Jonmo1]

Why don't you ...

1. Show the code you currently have
2. Explain in FULL Detail what you want the code to do?


perhaps..

With Sheets("Sheet1").Range("A2")
    If.Value >= TimeSerial(21,0,0) AND .Value <= TimeSerial(21,5,0) Then
        Do Stuff
    End if
End With