Macro to update information if date changes

using Exel 2000..

I want excel to compare dates on two seperate worksheets and if the date on 
the first is greater than the second to insert rows and than copy cells on 
the second to different cells also on the second page.

ie..main sheet date is 11-05-08 compared to sheet2 date is 11-04-08...insert 
cells at a21:d21 and shift cells down (on sheet2) then copy cells b13:h13 to 
a21:b21

0
11/6/2008 2:23:01 AM
excel.newusers 15348 articles. 2 followers. Follow

1 Replies
176 Views

Similar Articles

[PageSpeed] 31

The description seems a bit inconsistent, but here is a shot


    With Worksheets("Main Sheet")

        If .Range("A1").Value > Worksheets("Second Sheet").Range("A1").Value

            Worksheets("Second Sheet").Rows(21).insert
            .Range("B13:H13").Copy Worksheets("Second Sheet").Range("A21")
        End If
    End With

-- 
__________________________________
HTH

Bob

"Wundrfulthing" <Wundrfulthing@discussions.microsoft.com> wrote in message 
news:1BE6596C-6E0A-47DC-8028-56A791D50483@microsoft.com...
> using Exel 2000..
>
> I want excel to compare dates on two seperate worksheets and if the date 
> on
> the first is greater than the second to insert rows and than copy cells on
> the second to different cells also on the second page.
>
> ie..main sheet date is 11-05-08 compared to sheet2 date is 
> 11-04-08...insert
> cells at a21:d21 and shift cells down (on sheet2) then copy cells b13:h13 
> to
> a21:b21
> 


0
BobNGs (423)
11/6/2008 3:14:43 PM
Reply:

Similar Artilces:

Splitting information
Hi and question, There a formula that splits information in one cell into two cells. The reverse of CONCATENATE. Many thanks Sid --- Message posted from http://www.ExcelForum.com/ Hi Sid! You'll probably have to use a parsing formula of some kind eg. A1 Norman Harker B1 =LEFT(A1,FIND(" ",A1)-1) Returns: Norman C1 =RIGHT(A1,FIND(" ",A1)-1) Returns: Harker You'll see that the main object will be to get a rule for determining the division between the two parts of the information. Also worth looking at will be: Data > Text to Columns -- Regards Norman H...

excel pivot table with sql query and visual basic macros
I have a pivot table that runs off a sql query, it has macros and parameters built into the report. It worked until the client updated their server and db software. When debugging this, on the module under the closedb it stops here: Sub CloseDB() 'IF CONNECTION IS OPEN IT NEEDS TO BE CLOSED SO AN ERROR IS NOT THROWN If rsData.State = 1 Then rsData.Close Set rsData = Nothing End If cnData.Close Set cnData = Nothing Set Cmd = Nothing End Sub Thanks ...

get number of monday, tuesday,... between 2 dates
Hi, how can I get number of monday, tuesday,... between 2 dates? Thanks, Racsus (Racsus@discussions.microsoft.com) writes: > Hi, how can I get number of monday, tuesday,... between 2 dates? DECLARE @offset int, @day varchar(10) SELECT @day = 'Tuesday' SELECT @offset = CASE @day WHEN 'Monday' THEN 1 WHEN 'Tuesday' THEN 2 WHEN 'Mittwoch' THEN 3 WHEN 'Thursday' THEN 4 WHEN 'Friday' THEN 5 ...

Change Contract Status
Hello, My CRM implementation does not change automatically the Contract Status from Active to Expired or from Invoiced to Active when the Contract End Date or, respectively, the Contract Start Date comes. This was happening also in the 1.2 version and now the same happens in 3.0 version. Any ideas? Thank you, Elena ...

How to change cell shading/fill based on value in another cell?
I have a sheet with two columns of experimental data. Let's say the data is in F10:F25 (column 1) & G10:G25 (column 2). There is a value in another cell (A1) that contains a 1 or a 2. If A1=1, I want to turn shading in column 1 agree and in column 2 off. If A1=2, I want to reverse that. If there a worksheet function that will do that? I was hoping for something like: =cellshading(range,color) I could then execute one of these two statements: If A1=1 then cellshading(F10:F25,"Green") cellshading(G10:G25,"None") Else cellshading(G10:G25,"Green&...

Time/Date stamp in Outlook 2003 msgs.
My friend with 2003 has reported another oddity to me which is that the time & date stamp on her messages seems not to have changed with daylight savings time (i.e. they are 1 hour behind). She says the system clock did automatically change. My question--does Outlook really have anything to do with the time/date stamp or is this just a function of the mail servers involved? TIA. -- ------------------------------------------- Stephen Porter Los Angeles, CA Check calendar options "Stephen Porter" <stp@pobox.com> wrote in message news:MPG.1ae37d24b618934c98969a@m...

Hyperlink Information
For the active cell, how do you get the target URL information out in VBA. E.g. Cell A1 text is "Microsoft" Cell A1 Hyperlink is http://www.microsoft.com How do you get out the target URL http://www.microsoft.com Activell.Hyperlink(1).????? I have tried various options and nothing works for me. Any help would be welcome. The Insert Hyperlink dialog box allows you to enter 'Text to display' which will be shown in the cell in Excel. The hyperlink url will be hidden if you enter something different in the Text to display box, though it will still work as before. &...

pass tablename and update
Need help. I have 'Table A' with columns c1, c2, c3, c4 and sp to update Table A. proc_upd_tableA @tblname varchar (10) as declare @tbl as varchar(10) set @tbl = @tblname begin update @tbl set c1 = 'X' where c2 = '' end is it possible to do exec this sp from another sp? Need someone to show me how or if possible, sample to guide me. Thanks. The first thing is your proc isn't going to update 'Table A'. You can't replace a table name with a variable in a DML statement as you've done below. To do this type of t...

Updating several XP-computers
Hi! I have 4 PCs in my LAN and they are running under Windows XP (2 time PRO, 1 time Media Center, 1 time Home). I have a slow Internet connection with just 5 GB volume per months, so when I have to update all my PCs, it takes a lot of time and consumes my download volume. I would like to download all windows patches and updates just one time, store them in a file-server or NAS-server and then apply them to all my 4 PCs. Is there anyway to do that? Thank you very much for your help. gianni wrote: > I have 4 PCs in my LAN and they are running under Windows XP (2 tim...

Event ID 8284
Iam getting the following warning message in my event logs on my exchange serverv Event ID: 8284 'The Recipient Update Service could not find the Address List Root which is located in the Exchange Service entry under the attribute addressBookRoots. This might have been caused by a permissions problem. ' Im gettinga bout 4 of these messages every minute. They started happening after i added in two servers as Recipient Update Services. The user action suggested in windows help is 'Check the server permissions using ADSIEdit or LDAP support tools that are available on the Win...

Outlook 2003 Font Changes When Replying Plain Text
Outlook 2003 is exhibiting a strange behavior when replying to plain text messages. After clicking the "Reply" button, the message appears in the Arial font. In about two to three minutes, the font suddenly changes to Courier which is the correct font. Why is it taking so long for the font to change? Steve Lockridge steve@websitewarehouse.com ...

Parent / Child Price Updates
Is there an add-on that will update the cost of a "child" item when the "parent" item is purchased? This is a multi-part message in MIME format. ------=_NextPart_000_002A_01C705BB.BB763D20 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable This is what already happens! Whenever u do receiving by a parent, the = child cost is updated! This might happen to u if you have more than one item that is assigned = to the same parent item, in this case, the cost of one child only will = be updated, this's a bug that was reso...

Information Store cannot be opened.
Hi I have a problem with a NT Server. This server is on a VPN DLS setup connected to our office. They have Outlook 2000 installed but when they try to access the mailbox it gives them a message saying: Unable to expand the folder. The set of folders could not be opened. The Information store could not be opened. They are able to ping the exchange server by name and also do a Check Name in the mail Properties. Has anyone seen this before. ...

MNY 2006 Trial
Notice, I'm asking about Money 2006 Deluxe downloaded trial edition. I have set up my accounts (bank, broker, credit card) for automatic updates. If I manually "update accounts" it does (most of the time). But it never "automatically" updates the accounts. I have the banks on the default, no changes, Every Day setting. I've read the MS MNY Help topics, so please don't direct me to them. What else might I be missing? MEP ...

how can you change a "bitmap" to a jpeg??
After taking digital pictures in BITMAP, how can I change them to JPEGS? "TRM" <TRM@discussions.microsoft.com> wrote in message news:F5C091D7-377B-4F2F-A7BF-84794BC84F38@microsoft.com... > After taking digital pictures in BITMAP, how can I change them to > JPEGS? Get XnView or IrfanView. Both are free. Then use Save As and select the format. -- _________________________________________________________________ ******** Post replies to newsgroup - Share with others ******** Email: lh_811newsATyahooDOTcom and append "=NEWS=" to Subject. _________________...

Use Excel to update Outlook address book
hi all... Is there a way to update outlook address book using excel? Is there a macro available for it? Thank you for your answers Mike ...

sbs 2008 under Updates, "change the software update settings" crashes console
Running SBS 2008 SP2, fresh install with just a couple users, I noticed that under Security, Updates, in the Tasks window there is a "Change the software update settings". When I click this link, the "Software Update Settings" window appears for a split second then the SBS Console crashes saying "Windows SBS 2008 Console has stopped working" with these details: Description: Stopped working Problem signature: Problem Event Name: CLR20r3 Problem Signature 01: console.exe Problem Signature 02: 6.0.5601.8497 Problem Signature 03: 4a612b8b...

Conditional formatting dates 05-05-10
I have a range of dates that I want to conditionally format. Eg, todays date is the 5 May 2010. I want to highlight all of the dates in the range D14 to D120 that todays date passes on a daily basis. For eg, as we click over automatically to the 6 May 2010, any fixed dates in the range for the 5 May 2010 turn red. Any help would be great. Select your dates and use Custom in CF and the formula =D4=TODAY()-1 -- Regards Dave Hawley www.ozgrid.com "Sue" <Sue@discussions.microsoft.com> wrote in message news:E87D631B-E455-4698-92A1-BE915192ECDF@microsoft.co...

an outlook2000 macro programming question.....
an outlook2000 macro programming question..... I created a user-defind field "price" in outlook2000 "task", I want to count the all item of "price" field, and I know Excel can do this perfect, but when I export outlook "task" to an Excel file, the "price" field can't be converted , Outlook2000 can't convert user-defined field, so I try to find another way to do this statistic work, anybody know if Outlook2000's macro programming can do this? ...

Macro & Protect Commands
I am having a problem with the excel 'protect sheet' and 'macro' functions in Excel 2002. For some reason they are greyed out (not available) in the tools pull down menu. I have already tried the macro security settings and that is not it. Some additional information: I am not able to right-click on the worksheet tabs and if I log in under a different user name the functions are available. I have tried reinstalling office and it didn't help. I know it must be something in my user settings but I am not aware where to go to change settings concerning Excel. A...

Diable excel macro for DATES
Hi, everytime i copy and paste from a website in this format XX/YY excel sees it as a DATE. how can i disable this feature..I just want t paste it as its raw form of XX/YY. When i cut and paste it in my exce and try to change the format by using TExt. it comes up with rubbis numbers. Thank -- Message posted from http://www.ExcelForum.com try formatting, as text, before you import -- Don Guillett SalesAid Software donaldb@281.com "evo >" <<evo.18vufd@excelforum-nospam.com> wrote in message news:evo.18vufd@excelforum-nospam.com... > Hi, > > everytime i copy ...

Displaying Multiple Cell Information in Single Cell
Hi all, I'm trying to present (text) data from multiple cells in another workbook in a single cell. I've tried the following formula but it returns a #VALUE! in my destination cell: ='[Project1.xls]Dependencies'!$A$6, '[Project1.xls]Dependencies'!$A$7 Any ideas on if this is possible? TIA, SamuelT -- SamuelT ------------------------------------------------------------------------ SamuelT's Profile: http://www.excelforum.com/member.php?action=getinfo&userid=27501 View this thread: http://www.excelforum.com/showthread.php?threadid=503954 Use the "&...

Unable to update accounts
After recently updating my MS Money to the latest version I have not been able to update my accounts. My last successful update shows 10/13/07. I can't figure out the problem. I have tried to merge duplicate accounts, no luck.... I need some help. On Nov 13, 12:55 pm, Bobert <Bob...@discussions.microsoft.com> wrote: > After recently updating my MS Money to the latest version I have not been > able to update my accounts. My last successful update shows 10/13/07. I can't > figure out the problem. I have tried to merge duplicate accounts, no luck.... > I need some he...

Updating CDO.DLL on BlackBerry Server
Hello- We have Exchange 5.5 SP4 running on NT4 SP6a under native ADS. After applying the 828429 hotfix to our Exchange server, we now have a problem with our Blackberry Enterprise Server. According to Research In Motion (the makers of the Blackberry server) the version of CDO.DLL installed on the BES must match or exceed that of the CDO.DLL on the Exchange server (now 5.5.2657.67.) I tried to apply the 828489 hotfix to the BES, but got an error that it wasn't a valid Exchange installation. Research In Motion advised I extract the files from the 828489 hotfix package using the ...

Changing Quickbooks to Excel
Hey, I'm trying to get my QuickBooks Check Registry into a linear format, then put it on a disk, go to another computer and open it in Excel. Can anyone give me a link or a quick walkthrough on what I need to do, any help would be appreciated. Thanks! -- mattsides ------------------------------------------------------------------------ mattsides's Profile: http://www.excelforum.com/member.php?action=getinfo&userid=25015 View this thread: http://www.excelforum.com/showthread.php?threadid=385419 "mattsides" <mattsides.1rtnv9_1120777541.6085@excelforum-nospam.com>...