Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Creating Inventory Macros
I am using Excel to keep track of monthly inventory and I need to
input stock on daily basis. Column A has a 6 didget stock numbers approx. 300 items and I have an in & out column for each day of the month. I need to remain in one column while I find the stock no. according to the day. Ex. #112233 input 2 to day March 7 #112233 being Column A98, March 7 being column Q entered into Q98 in 2 pcs. Stock no. #2666 A56 entered to Q56. Each time I enter a stock no. the highlited cell will remain in column Q until request to change day of month. Need macro to enter date, another to find stock cell. Currently using macro below but offset would not be used because offset continuously changes daily. Sub Macro1() Dim ans Dim cell As Range ans = InputBox("Enter Stock number") If ans < False Then Set cell = Cells.Find(What:=ans, _ After:=Range("A1"), _ LookIn:=xlFormulas, _ LookAt:=xlWhole, _ SearchOrder:=xlByRows, _ SearchDirection:=xlNext, _ MatchCase:=False, _ SearchFormat:=False) If Not cell Is Nothing Then cell.Offset(0, 4).Select End If End If End Sub Thanks, Rube |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how do I run excel 4.0 macros on excel 2000 | Excel Discussion (Misc queries) | |||
Excel crashes while opening excel file imbeddied with macros | Excel Discussion (Misc queries) | |||
creating macros in multiple worksheets | Excel Worksheet Functions | |||
Creating a macros to copy and paste cells | Excel Discussion (Misc queries) | |||
Creating a Multiple Warehouse Inventory Spreadsheets | Charts and Charting in Excel |