Check date and act on it
I have a set of data imported to my spreadsheet using a macro. One of
the fields in that set is a Date... I want to compare the month of the date to a string and add the line of data to another spreadsheet accordingly.... How can this be done? regards, ladyhawke |
Check date and act on it
Hi,
If I understand correctly your request, most probably conditionnal formatting would provide you with what you are looking for ... HTH Cheers Carim |
Check date and act on it
if lcase(format(cell,"mmmm")) = "february" then
-- Regards, Tom Ogilvy "ladyhawke" wrote: I have a set of data imported to my spreadsheet using a macro. One of the fields in that set is a Date... I want to compare the month of the date to a string and add the line of data to another spreadsheet accordingly.... How can this be done? regards, ladyhawke |
Check date and act on it
I need to pick up the month part of the date (should be easy) and the
select the spreadsheet to recieve the data some how... The idea is the the sheets are named jan - feb - mar etc. and every date found that fits into one of these months should be put in the corresponding sheet... need to check the year though if its next year it should be put in a "parking sheet" to be copied into a new file... does this make sense regards, Ladyhawke |
Check date and act on it
Hi,
Believe you are looking for something like : If Sheet.Name = Text(month(yourcell),"mmm") then your code End If HTH Cheers Carim |
Check date and act on it
Dim sh as Worksheet
if year(cell) = 2006 then set sh = Worksheets(format(cell,"mmm")) else set sh = worksheets("Parking") End if There is not "TEXT" function in VBA. However, based on the OP's original response, I don't know if this is helpful. Perhaps http://www.rondebruin.nl/copy5.htm -- Regards, Tom Ogilvy "Carim" wrote: Hi, Believe you are looking for something like : If Sheet.Name = Text(month(yourcell),"mmm") then your code End If HTH Cheers Carim |
Check date and act on it
Your code snippet worked fine, except I'm not getting the date from a
cell but from an object. I solved it easily thought so thx for helping out all of you! This got me quite a step further into the VBA world :oD //ladyhawke Tom Ogilvy skrev: Dim sh as Worksheet if year(cell) = 2006 then set sh = Worksheets(format(cell,"mmm")) else set sh = worksheets("Parking") End if There is not "TEXT" function in VBA. However, based on the OP's original response, I don't know if this is helpful. Perhaps http://www.rondebruin.nl/copy5.htm -- Regards, Tom Ogilvy "Carim" wrote: Hi, Believe you are looking for something like : If Sheet.Name = Text(month(yourcell),"mmm") then your code End If HTH Cheers Carim |
All times are GMT +1. The time now is 07:00 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com