Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Help! How do I Auto-Update?
I have a relatively simple code below. How do I code it so that when I rename my workbook from "text" to say, "text2", it will automatically update itself in vba? Is this possible? Thanks! Sub Convertdates() Windows("text").Activate Sheets("Sheet1").Select Range("I2").Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlDown)).Select For Each cell In Selection cell.Value = Mid(cell, 5, 2) & "/" & Right(cell, 2) & "/" & Left(cell, 4) Next Selection.NumberFormat = "m/d/yy" Cells.Find(What:="/0/0", After:=ActiveCell, LookIn:=xlFormulas, LookAt _ :=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False).Activate Cells.Replace What:="/0/0", Replacement:="0/0/00", LookAt:=xlWhole, _ SearchOrder:=xlByRows, MatchCase:=False End Sub -- Sethaholic ------------------------------------------------------------------------ Sethaholic's Profile: http://www.excelforum.com/member.php...o&userid=25113 View this thread: http://www.excelforum.com/showthread...hreadid=387598 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Sometimes formuli in workbook don't auto update with auto-recal on | Excel Worksheet Functions | |||
how to update data on sheet1 and have it auto update on sheet2 | Excel Programming | |||
excel links update not working in auto, calculations in auto | Excel Worksheet Functions | |||
auto update | Excel Worksheet Functions | |||
auto update | Excel Worksheet Functions |