Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Dear Experts:
I want to make an Addin, to perform conversion of worksheet to value which can be done by 4 clercks. My question is how can we make it LET US CHOOSE the file, the name of the sheet is the same for all workbooks; This is my macro which I will make it as an Addin. As you CAN see below, the clerck will open the worksheet first named(' E10-7-012 -DAIHATSU PAINT.xls"). but this is variable, because there are hundred of files that they will do the same process, coz I will write again a macro to pick up those values. Sub FrankctoValue() ' ' FrankctoValue Macro ' Macro recorded 6/27/2007 by Frank ' ' Keyboard Shortcut: Ctrl+s ' Windows("E10-7-012 -DAIHATSU PAINT.xls").Activate Sheets("PO New (2)").Copy After:=Sheets(2) Cells.Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Columns("A:AV").Select Application.CutCopyMode = False Selection.Delete Shift:=xlToLeft Cells.Select Selection.Sort Key1:=Range("A1"), Order1:=xlDescending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal Selection.Replace What:="", Replacement:="$", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False Selection.Replace What:="$", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False End Sub I appreciate your precious help. Frank |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Choose File To SaveAs | Excel Programming | |||
Get data from ext. file when i choose an option from combobox | Excel Programming | |||
Import Txt file via vba but still choose column types | Excel Programming | |||
Drop-Down List to Choose File to Open | Excel Programming | |||
Choose file for query | Excel Programming |