OOPS
Put a space between select and case
selectcase
select case
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguille...@gmail.com
-Original Message-
From: jonnie...@gmail.com
Sent: Monday, June 18, 2012 4:10 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Need he
Try
Sub FooterSAS()
selectcase InputBox("Enter 1=Confidental, 2=For Internal Use Only 3=Other")
Case Is = 1: x = "Confidental"
Case Is = 2: x = "For Internal Use Only"
Case Is = 3: x = "Restricted"
Case Else
End Select
For Each wk In Application.Workbooks
For Each sh In wk.Worksheets
'
Thanks a lot NOORAIN
I got it...
On Thu, Apr 19, 2012 at 2:47 PM, NOORAIN ANSARI wrote:
> Dear Vijay,
>
> Please try below code to change folder path in red color...
> See attached sheet..
>
> Sub Spilit_in_Workbook()
> Dim rng As Range
> Dim i, j, c As Long
> Dim wb As Workbook
> Appl
Hi Don,
Thanks for reply
see I have team with 30 members and I have to allocate exceptions or cases
to each team member on daily basis. Once they complete the work then they
send same file to me with updated status,reason.
I have macro which collate the all files. But what i want is-- I
w
Why create a workbook for each user when all you have to do is filter
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguille...@gmail.com
From: Vijay Mane
Sent: Wednesday, April 18, 2012 12:03 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Need help--macro
Hi Experts,
