Hi Friends,
I think this would be the solution to this problem.
Sub datee()
Dim rid As Integer
Sheets("Sheet1").Activate
Range("a1").Select
rid = ActiveCell.End(xlDown).Row
MsgBox rid
Range("A" & rid).Select
MsgBox ActiveCell.Value
If ActiveCell.Value = Date Then
Range("A" & rid).Select
Else
ActiveCell.Offset(1, 0).Value = Date
End If
End Sub
Regards,
Harish Bhatt
On Wed, May 27, 2009 at 5:44 PM, Dilip Pandey <dilipan...@gmail.com> wrote:
> Hi Frnds,
>
> Try using following code:-
>
> Sub datee()
> Range("b1").Select
> Selection.End(xlDown).Select
> 'Selection.End(xlUp).Select
> 'ActiveCell.Offset(1, 0).Select
> If ActiveCell.Value = Date Then
> Range("A1").Select
> Else
> ActiveCell.Value = Date
> End If
> End Sub
> The workbook is also attached having the same code. Thanks.
>
> --
> DILIP KUMAR PANDEY
> MBA-HR,B COM(Hons.),BCA
> Mobile: +91 9810929744
> dilipan...@gmail.com
> dilipan...@yahoo.com
> New Delhi - 110062
>
> On Wed, May 20, 2009 at 2:36 PM, Sergio Abadesso <
> groups.abade...@googlemail.com> wrote:
>
>> Hello Harmeet,
>>
>> I think I have a solution for your problem.
>>
>> see attached file.
>>
>> Regards,
>>
>> Sergio
>>
>> 2009/5/18 Harmeet Singh <harmeet.hew...@gmail.com>
>>
>>>
>>>
>>> ---------- Forwarded message ----------
>>> From: Nihar Turakhia <turakhia.ni...@gmail.com>
>>> Date: Mon, May 18, 2009 at 12:47 AM
>>> Subject: VBA help needed
>>> To: harmeet.hew...@gmail.com
>>>
>>>
>>> Harmeet,
>>>
>>> I've just started learning vba and stuck rightnow with something. Any
>>> help will be greatly appreciated.
>>>
>>> I receive the daily settlement data from external source for different
>>> commodity products in excel
>>>
>>> So I was thinking if I can write a macro which would grab that
>>> settlement data from that cell for each day and put in new row. ( so all
>>> the data would be in one column )
>>>
>>> So there will be a settlement data for 4/1/2009 in cell B1
>>>
>>> Tomorrow when i open my book, new settlement data for 4/2/2009 in cell
>>> B2
>>>
>>> and next day as 4/3/2009 in cell B3
>>>
>>> Only thing I would like to avoid is that if I open the workbook twice
>>> in a same day the macro should not populate new cell instead overwrite
>>> the previous cell which has todays date in it.
>>>
>>>
>>>
>>>
>>> --
>>> Thanks & Regards,
>>>
>>> Harmeet Singh
>>>
>>>
>>>
>>
>>
>>
>
>
>
> >
>
--
Regards
Harish Bhatt
--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---
