elect that option?
>
> Asa
>
> ** **
>
> *From:* excel-macros@googlegroups.com [mailto:
> excel-macros@googlegroups.com] *On Behalf Of *Sunny Kapoor
> *Sent:* Monday, May 14, 2012 12:55 PM
>
> *To:* excel-macros@googlegroups.com
> *Subject:* Re: $$E
to set up an additional printer with ONLY grayscale and call
>> it bw or whatever and then print to that printer for bw and the other for
>> color.
>>
>> Application.Dialogs(xlDialogPrinterSetup).Show
>>
>> Don Guillett
>> Microsoft MVP Excel
>> Sale
; dguille...@gmail.com
>
> *From:* Sunny Kapoor
> *Sent:* Monday, May 14, 2012 11:02 AM
> *To:* excel-macros@googlegroups.com
> *Subject:* $$Excel-Macros$$ Re: Printing sheets in colour using VBA in
> ecel
>
> Hi,
>
> I have attached the file...Please let me know wha
, Sunny Kapoor wrote:
> Hi Guys,
>
> I am trting to print sheets in colour using VBA.
> I am using the following code...
>
>
> Sub Print_sheet()
> With ActiveSheet
>
> .PageSetup.BlackAndWhite = False
>
> .PrintOut
Hi Guys,
I am trting to print sheets in colour using VBA.
I am using the following code...
Sub Print_sheet()
With ActiveSheet
.PageSetup.BlackAndWhite = False
.PrintOut Copies:=1, Collate:=True
End With
End Sub
_
i need to copy a file from one folder, break links and save it in a
new folder with a new nameI am able to copy it and paste it in the
other folder but i am not able to break the links...
i tried using break links but it gives me an error.i am not sure
if i should break the links in the hom
x27;Creates Files "Collection"
> For Each f In fc 'Loops through each file in the "Collection"
> If (UCase(Left(f.Name, 7)) = "EXTRACT") Then
> msg = msg & Chr(13) & f.Name
> Workbooks.Open Filename:=PathFldr & f.Name
> End If
> Next
I need to make a macro to open files whose name start with
Extract...the Folder has about 15 files and about 10 files begin with
"extract". I think i need a loop to do it but dont know how to do
it.plz help
--
---