Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
save as command in macro
Hi. Can someone help me please. I have two things that some help.
1. I've created workbook with multiple sheets, i made changes to one of the sheet and i want to save that worksheet into new excel file. I've created a macro but its not working. 2. I've created workbook with multiple sheets, eg, Sheet2 and Sheet 3. I have a checklist template on Sheet 2 (see below), and on Sheet3, I need to get the value from SHEET2 where FINDINGS=N (please see below), on SHEET 3 I need the valud of CODE, DESCRIPTION and REMARKS EG. SHEET2 (CHECKLIST) CODE DESCRIPTION FINDINGS REMARKS W32 STAIN N STAIN ON FLOOR W33 WALL PAINT Y W34 TIMBER N TIMBER DOOR EG. SHEET3 (REPORT) CODE DESCRIPTION REMARKS W32 STAIN STAIN IN FLOOR W34 TIMBER TIMBER DOOR Appreciate your help. thanks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
save as command in macro
1. Post the macro!
2. Sub test() Columns("C:C").Select Selection.AutoFilter Selection.AutoFilter Field:=1, Criteria1:="N" Selection.CurrentRegion.Select Selection.SpecialCells(xlCellTypeVisible).Select Selection.Copy Destination:=Worksheets("Munka2").Range("A1") End Sub Regards, Stefi €žexploringmacro€ť ezt Ă*rta: Hi. Can someone help me please. I have two things that some help. 1. I've created workbook with multiple sheets, i made changes to one of the sheet and i want to save that worksheet into new excel file. I've created a macro but its not working. 2. I've created workbook with multiple sheets, eg, Sheet2 and Sheet 3. I have a checklist template on Sheet 2 (see below), and on Sheet3, I need to get the value from SHEET2 where FINDINGS=N (please see below), on SHEET 3 I need the valud of CODE, DESCRIPTION and REMARKS EG. SHEET2 (CHECKLIST) CODE DESCRIPTION FINDINGS REMARKS W32 STAIN N STAIN ON FLOOR W33 WALL PAINT Y W34 TIMBER N TIMBER DOOR EG. SHEET3 (REPORT) CODE DESCRIPTION REMARKS W32 STAIN STAIN IN FLOOR W34 TIMBER TIMBER DOOR Appreciate your help. thanks |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
save as command in macro
#1.
Option Explicit Sub testme() Dim wks As Worksheet Set wks = ActiveSheet 'or worksheets("Somesheetnamehere") wks.Copy 'to a new workbook With ActiveSheet 'just overwrite the .xls file, don't give me a warning Application.DisplayAlerts = False .Parent.SaveAs _ Filename:="C:\" & Format(Now, "yyyymmdd_hhmmss") & ".xls", _ FileFormat:=xlworkbooknormal Application.DisplayAlerts = True .Parent.Close savechanges:=False End With End Sub exploringmacro wrote: Hi. Can someone help me please. I have two things that some help. 1. I've created workbook with multiple sheets, i made changes to one of the sheet and i want to save that worksheet into new excel file. I've created a macro but its not working. 2. I've created workbook with multiple sheets, eg, Sheet2 and Sheet 3. I have a checklist template on Sheet 2 (see below), and on Sheet3, I need to get the value from SHEET2 where FINDINGS=N (please see below), on SHEET 3 I need the valud of CODE, DESCRIPTION and REMARKS EG. SHEET2 (CHECKLIST) CODE DESCRIPTION FINDINGS REMARKS W32 STAIN N STAIN ON FLOOR W33 WALL PAINT Y W34 TIMBER N TIMBER DOOR EG. SHEET3 (REPORT) CODE DESCRIPTION REMARKS W32 STAIN STAIN IN FLOOR W34 TIMBER TIMBER DOOR Appreciate your help. thanks -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Command Button Save As Application.ExecuteExcel4Macro ("SAVE.AS?() | Excel Discussion (Misc queries) | |||
disable save and saveas from menubar and save via command button | Excel Programming | |||
Disable save, save as, but allow save via command button | Excel Programming | |||
set up a command button or macro for open file to "save as" | Excel Programming | |||
Specify a default file name in VB when the Save / Save As command. | Excel Programming |