Please give clear before/after examples and how you get from before to
after.
Be advised that
a file is called a workbook
a sheet within a workbook is called a sheet or worksheet.
There is NO such term as SPREADSHEET
-Original Message-
From: Jose Costa
Sent: Thursday, September 08,
Did you get what I sent?
From: Steve Weaver
Sent: Saturday, September 10, 2011 1:56 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Need help with advance filter
Thank you very much Ashish!!!
How would you modify the code below to place the appropriate data from the
.
On Sat, Sep 10, 2011 at 8:24 PM, dguillett1 dguille...@gmail.com wrote:
Please give clear before/after examples and how you get from before to after.
Be advised that
a file is called a workbook
a sheet within a workbook is called a sheet or worksheet.
There is NO such term as SPREADSHEET
One way
Sub ReplaceDuplicateBracketsInStringSAS()
lr = Cells(Rows.Count, 1).End(xlUp).Row
On Error Resume Next
For Each c In Range(a2:a lr)
x = Left(c, 1)
If x = ( Then
y = InStrRev(c, ()
z = InStrRev(c, ), y)
c.Value = Mid(c, 2, z - 2) Mid(c, z + 1, 256)
End If
Next c
End Sub
-Original
Why not
convert to values
copy to NEW
rename
save
close
close original
-Original Message-
From: rajan verma
Sent: Sunday, September 11, 2011 1:23 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Moving Sheets
Hi
Try This
Sub GetALlSheet()
Dim sh As Worksheet
try
Sub OpenFile()
Workbooks.Open Filename:= _
C:\Users\user\Desktop\2011_ InputBox(Vnesi nalog).xlsx
End Sub
-Original Message-
From: Seba
Sent: Sunday, September 11, 2011 3:31 PM
To: MS EXCEL AND VBA MACROS
Subject: $$Excel-Macros$$ Open file using criteria from input box
Hi all,
\Desktop\2011_ File .xlsx)) 0
Then
Workbooks.Open Filename:=C:\Users\user\Desktop\2011_ File
.xlsx
Else
MsgBox File does not exists!
End If
End Sub
On Sun, Sep 11, 2011 at 11:51 PM, dguillett1 dguille...@gmail.com wrote:
try
Sub OpenFile()
Workbooks.Open Filename
contributor, and we
need you here.
Mods, I would still be interested to know why D wasn't able to see my post
before he posted.
Regards,
Sam
On Mon, Sep 12, 2011 at 12:09 AM, dguillett1 dguille...@gmail.com wrote:
If I am to assume that D is referring to me, then I made a small typo and I
did
For each in a LIST in range(“a1:a12”)
Sub test()
For i = 1 To 12
ThisWorkbook.Sheets(Array(Sheet1, Sheet2)).Copy
ActiveWorkbook.SaveAs C:\Documents and Settings\ASHISH\Desktop\ABC\book
cells(I,”a”) .xlsx
ActiveWorkbook.Close
Next i
End Sub
From: ashish koul
Sent: Wednesday, September 07, 2011
Why not just a simple formula for a dob in cell d11
=DATE(YEAR(D11)+60,MONTH(D11)+1,0)
From: Shankar Bheema
Sent: Monday, September 12, 2011 9:54 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ date difference
Hai all,
I am attaching an excel userform which
see my attachment and i am not
understanding the mistake i did in my code
On Mon, Sep 12, 2011 at 9:07 PM, dguillett1 dguille...@gmail.com wrote:
Why not just a simple formula for a dob in cell d11
=DATE(YEAR(D11)+60,MONTH(D11)+1,0)
From: Shankar Bheema
Sent: Monday
Repost
I really don’t use USERFORMS, but try
Private Sub CommandButton1_Click()
txtdor.Text = DateSerial(Year(txtdob.Text) + 60, Month(txtdob.Text) + 1, 0)
End Sub
From: dguillett1
Sent: Monday, September 12, 2011 1:04 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ date
It appears that a simple vlookup should do it.
=IF(ISNA(VLOOKUP(A11,$A$1:$B$8,2,0)),,(VLOOKUP(A11,$A$1:$B$8,2,0)))
-Original Message-
From: Rajesh K R
Sent: Monday, September 12, 2011 1:51 PM
To: excel-macros
Subject: $$Excel-Macros$$ Look formula to select ledger group
Hi Experts,
I would strongly suggest that you not try to break this password UNLESS
poster can PROVE ownership. Legal problems
-Original Message-
From: Rajesh K R
Sent: Monday, September 12, 2011 1:58 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$
Hi,
Pls send me the
don't know lookup formulas.
Regards
Rajesh Kainikkara
On 9/13/11, dguillett1 dguille...@gmail.com wrote:
It appears that a simple vlookup should do it.
=IF(ISNA(VLOOKUP(A11,$A$1:$B$8,2,0)),,(VLOOKUP(A11,$A$1:$B$8,2,0)))
-Original Message-
From: Rajesh K R
Sent: Monday, September 12
Mine should have removed a line. It simply loops thru a LIST
Sub test()
For i = 1 To 12
ActiveWorkbook.SaveAs C:\Documents and Settings\ASHISH\Desktop\ABC\book
cells(I,”a”) .xlsx
Next i
End Sub
A simple one I used for testing
Option Explicit
Sub CopyActiveWorkbookBasedOnList()
For i = 1 To
This should do it. Try it!!
Sub breakitupSAS()
Dim mc As Range
Set mc = Range(a1)
mc.TextToColumns Destination:=mc, DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, _
Tab:=False, Semicolon:=False, Comma:=False, Space:=False, _
Other:=True,
Perhaps you could simply use a DATA VALIDATION list to select the item( tied to
a CHANGE_EVENT macro. Send me your file with a clear explanation and
before/after examples
From: Nikhil Shah
Sent: Tuesday, September 13, 2011 9:02 AM
To: excel-macros@googlegroups.com
Cc:
Try this
Sub MakeCenterHeaderSAS()
mc = 1
For Each objFilterPart In ActiveSheet.AutoFilter.Filters
If objFilterPart.On Then
ms = ms ActiveSheet.AutoFilter.Range.Columns(lngcount).Column
End If
mc = mc + 1
Next
With ActiveSheet.Range($A$2:$A Range(A Rows.Count).End(xlUp).Row)
If
Try this without selections
Option Explicit
Sub consolidateSAS()
Dim ns As Long
Dim slr As Long
Dim dlr As Long
Dim i As Long
Application.ScreenUpdating = False
ns = Sheets.Count
Sheets.Add After:=Sheets(ns)
With ActiveSheet
.Name = Consolidated Sheet
.Range(A1) = Name
.Range(B1) = Result
Or, if you just want to remove, try
Sub unmergecells()
Cells.MergeCells = False
End Sub
From: NOORAIN ANSARI
Sent: Thursday, September 15, 2011 6:12 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Fwd: Finding Merged cells in excel
Dear Amit,
Please try it.
Sub
’makes a list, in column 1 of all sheetsnames the rangesets up data validation
option explicit
Sub makesheetlistSAS()
Dim i As Long
For i = 1 To Sheets.Count
Cells(i, 1) = Sheets(i).Name
Next i
Cells(1).Resize(Cells(Rows.Count, 1).End(xlUp).Row) _
.Name = SheetList
Range(b1).Validation.Add
You may?? not find too many anxious to help telemarketers
-Original Message-
From: Mayank
Sent: Sunday, September 18, 2011 12:03 PM
To: MS EXCEL AND VBA MACROS
Subject: $$Excel-Macros$$ Anyone like to take a project and challenge in
excel
Need urgent help in excel project
Process
A very easy way is to put your formula in cell c2 and then DOUBLE click the
fill handle (lower right corner)
From: Prabhu
Sent: Tuesday, September 20, 2011 12:26 PM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ *Macro Code Request*
Hi Friends,
Column A B contains some values
If you want a macro just use this
Sub FillDownSAS()
With Range(c2)
.Formula = =a2+b2
.AutoFill Destination:=Range(C2:c Cells(Rows.Count, a).End(xlUp).Row)
End With
End Sub
if you already have the formula in c2
Sub FillDownSAS()
range(“c2”).AutoFill Destination:=Range(C2:c
Can you provide an AFTER example
-Original Message-
From: Rohan Young
Sent: Thursday, September 22, 2011 2:30 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Fwd: Required Latest No. of Drawing - Help
-- Forwarded message --
From: Rohan Young
I would copy the sheet to the desktop and save as and close
Sub CopyDetailsToDesktopSAS()
mydesktop = Environ(userprofile) _
Application.PathSeparator Desktop _
Application.PathSeparator
mypath = ActiveWorkbook.Path
With Sheets(Details)
.Copy
newname = .Name - Format(Date, mm-dd-yy)
How about a nice macro to populate col K and color the month within the row.
Option Explicit
Sub crossmonthSAS()
Dim i As Long
Dim j As Double
Dim ms As Long
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
ms = 0
For j = 2 To 8
ms = ms + Cells(i, j)
If ms 100 Then
Cells(i, k) = Not Qualified
Try in a macro enabled workbook (.xls or .xlsm)
Sub CustomSortSAS() 'converts to values
Rows(3).Clear
x = Application.Match(Application.Min(Rows(2)), Rows(2))
y = Application.Match(Application.Max(Rows(2)), Rows(2))
Cells(3, y - x + 2).Resize(, x - 1).Value = _
Cells(2, 1).Resize(, x - 1).Value
To me, all non customer requests are treated the same and I even sometimes
ignore those who say it is “URGENT”
From: Brajesh Kumar Porwal
Sent: Friday, September 23, 2011 5:31 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Urgent--Fill in 1 column
Hi Expert,
Find attached
Assuming data in columns b:d and requests in cols fg, This is an ARRAY
formula that must be entered using ctrl+shift+enter
=DAY(G2)
(TEXT(MIN(IF(($B$2:$B$22=F2),($C$2:$C$22=G2)),$D$2:$D$22),hh:mm:ss) |
TEXT(MAX(IF(($B$2:$B$22=F2),($C$2:$C$22=G2)),$D$2:$D$22),hh:mm:ss))
From:
If you are actually looking the highest value within the time frame, use
this array formula that must be entered using ctrl+shift+enter
=MAX(IF(($A$5:$A$5000C5)*($A$5:$A$5000C6),$B$5:$B$5000))
From: Ahmed Honest
Sent: Sunday, September 25, 2011 8:02 AM
To:
and do it for
me pleas.
Regards
Ahmed Bawazir
On Sun, Sep 25, 2011 at 5:12 PM, dguillett1 dguille...@gmail.com wrote:
If you are actually looking the highest value within the time frame,
use this array formula that must be entered using ctrl+shift+enter
=MAX(IF(($A$5:$A$5000C5
I sent a solution to what I thought was your request. Now, you have an
entirely different question. Please give examples and clear logic on how to get
the result.
From: vickey
Sent: Sunday, September 25, 2011 9:40 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ vlookup for
:36 PM, dguillett1 dguille...@gmail.com wrote:
I sent a solution to what I thought was your request. Now, you have an
entirely different question. Please give examples and clear logic on how to get
the result.
From: vickey
Sent: Sunday, September 25, 2011 9:40 AM
To: excel-macros
Another way without the need for the start/stop column. ARRAY formula entered
with ctrl+shift+enter
=MIN(IF(($A$2:$A$5000=$H$11)*($B$2:$B$5000=H$13),$C$2:$C$5000))
=Max(IF(($A$2:$A$5000=$H$11)*($B$2:$B$5000=H$13),$C$2:$C$5000))
From:
Next rngCell
End Sub
OR, you could use a formula to reverse it too
Use =INDEX($A$2:$M$2,COUNTA(A2:$M$2)) and drag to the right
Regards
Sam Mathai Chacko (GL)
On Sep 23, 8:54 pm, dguillett1 dguille...@gmail.com wrote:
Try in a macro enabled workbook (.xls or .xlsm
Simply deleting the un-needed rows and columns reduced the file by one half.
Combining like sheets with an extra column and using autofilter would help. Etc.
From: syed aliya raza hashim
Sent: Sunday, September 25, 2011 1:32 PM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Need
:04 PM, dguillett1 dguille...@gmail.com wrote:
Can you provide an AFTER example
-Original Message- From: Rohan Young
Sent: Thursday, September 22, 2011 2:30 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Fwd: Required Latest No. of Drawing - Help
-- Forwarded message
See attached to do as desired
From: vickey
Sent: Monday, September 26, 2011 10:14 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ vlookup for two same value in acceding order with
two Criteria
Thanks,
It worked, but there is one argument, if there are more then three
Attach your file
-Original Message-
From: JMac
Sent: Monday, September 26, 2011 7:32 PM
To: MS EXCEL AND VBA MACROS
Subject: $$Excel-Macros$$ Create report print based on cell value
I have a list that is used to track when people are issued uniforms.
I'd like to create a macro that
first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
Discussion subject changed to $$Excel-Macros$$ Create
report print based on cell value by dguillett1
This macro will do it
option explicit
Sub TransposeEmSAS()
Dim r As Long
Application.ScreenUpdating = False
Columns(J).Resize(, 2).Insert
r = 2
doit:
If Cells(r + 1, 1) = Then GoTo deletecolumns
Rows(r + 2).Resize(4).Insert
'copy colors
Range(L2:P2).Copy
Cells(r + 1, j).PasteSpecial
Send your file with a complete explanation and before/after examples to
dguille...@gmail.com
-Original Message-
From: Ken
Sent: Wednesday, September 28, 2011 1:03 PM
To: MS EXCEL AND VBA MACROS
Subject: $$Excel-Macros$$ Computer moving average hrs of play per day
I have a spreadsheet
This will remove the duplicates. If you have xl2007 you could use the remove
duplicates
Sub advancedfilterunique()
lr = Cells(Rows.Count, 1).End(xlUp).Row
With Range(A1:A49)
.AdvancedFilter Action:=xlFilterCopy, _
CopyToRange:=Range(b1), Unique:=True
.Delete Shift:=xlUp
End With
Save file as an xlsM file and enable macros and use
Option Explicit
Sub nodupesperitemSAS()
Dim i As Long
For i = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
If Cells(i, d) = Cells(i - 1, d) Then Rows(i - 1).Delete
Next i
End Sub
From: Neeraj Chauhan
Sent: Thursday, September 29, 2011 2:32
Haven’t followed this so
Send your file with a complete explanation and before/after examples to
dguille...@gmail.com
From: Mr excel
Sent: Thursday, September 29, 2011 4:40 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Create worksheet from list
Macro 1:
Option
=(D2-C2)*24
From: John A. Smith
Sent: Thursday, September 29, 2011 2:55 PM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Incremental Time Calculation from 11:30:00 AM Time
Format
Excel Experts,
I need to calculate the time differences between 11:30:00 AM and 11:37:00
If ??? I understand, simply CUSTOM format the cell as dd-mm-
From: Sanjib Chatterjee
Sent: Friday, September 30, 2011 12:33 AM
To: excel-macros
Subject: $$Excel-Macros$$ date format in Excel
Dear
I like to put the date format in Excel as dd/mm/, and like to get the
output as
I don't see all of my original code here but
also give me meaning of r = Cells(Rows.Count, J).End(xlUp).Row
Excel is looking in col J for the bottom most cell, ie 22
Range(J2:J r) in above code.
Excel is using range(j2:j22)
makes little difference what r is called. could be lastrow or x or many
Just modify my code to this. You could also sort by site ascending with
descending dateadvance filter to uniquecopy but this is easier.
Option Explicit
Sub CopyLastDatetoothersheeetSAS()
'run from source sheet
Dim i As Long
Dim dlr As Long
On Error Resume Next
For i = 3 To Cells(Rows.Count,
I can do it from Texas at $75 hourly
-Original Message-
From: Jattin Agarwal
Sent: Friday, September 30, 2011 3:35 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Excel expert required .
Dear Excel experts
I would request that if any VBA expert can help in
=SUBSTITUTE(F9, ,)
From: big smile
Sent: Friday, September 30, 2011 6:54 AM
To: EXCEL MACRO GROUP
Subject: $$Excel-Macros$$ TRIM FUNCTION
Respcted Sir group members.
I have put some numbers in one cell -- for ex. 2 5 9 8 9 5 9 9 v v v ---
now i want the same cell to trimed as
This is easy enough to do with a macro. However, please consider leaving all
in one file and simply use
datafilterautofilter.
-Original Message-
From: Chidurala, Shrinivas
Sent: Saturday, October 01, 2011 6:04 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Splitting of
As an M$ Excel MVP, I also welcome him to the group
From: NOORAIN ANSARI
Sent: Sunday, October 02, 2011 10:10 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ New Microsoft MVP Mr. Ayush Jain (2nd Times)..
Dear Group,
Our Group Manager Mr. Ayush Jain has been awarded the
Suggest you try this instead as the formula for currsheet. It will work for
all. Notice there is NO sheet name in the formula, just the !
=OFFSET(!$A$1,1,0,COUNT(!$A:$A),5)
From: Haseeb Avarakkan
Sent: Sunday, October 02, 2011 6:03 PM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$
I suggest, instead that you use ONLY one sheet and filter as desired. See
attached and filter by region and then by date. to clear filters use
datafiltershow all
From: Mr excel
Sent: Monday, October 03, 2011 4:19 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Update sheets on
I don’t understand what you need There is a master sheet and no
sample sheet for your desires. My macro and the other do essentially the same
thing.
From: Mr excel
Sent: Monday, October 03, 2011 10:54 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Update
OK. I now see what you wanted which means a slight modification to my macro.
However, I also posted a STRONG suggestion to just use filters.
From: Mr excel
Sent: Monday, October 03, 2011 4:19 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Update sheets on Enter
Hi group,
I, or some of the others can amend my code to do as desired. However, again, I
suggest you try this where you simply use filters on ONE sheet.
From: Mr excel
Sent: Monday, October 03, 2011 11:56 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Update sheets on Enter
It would be helpful if you would post examples of what you want
From: shaneallen
Sent: Tuesday, October 04, 2011 7:24 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Working out of Statistics on Exam Results URGENT
solution needed!
Hi
Good Day
I trust someone will be able
What is the reason that you do not like my idea of filtering?
From: Mr excel
Sent: Tuesday, October 04, 2011 8:42 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Update sheets on Enter
any help from anybody please?
On Tue, Oct 4, 2011 at 6:29 PM, dguillett1 dguille
Not clear as to what you want. Pls provide sample sheet and urls and what you
need.
From: syed aliya raza hashim
Sent: Monday, October 03, 2011 11:03 PM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Need Help
Can excel file such as reports be access from web or can be acccess as
Can you attach your file?
From: shaneallen
Sent: Tuesday, October 04, 2011 1:11 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Working out of Statistics on Exam Results URGENT
solution needed!
Can you simply use
datavalidation
as shown in the attached
From: Ahmed Emam
Sent: Tuesday, October 04, 2011 1:16 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ I need help
Here it's attached
On Tue, Oct 4, 2011 at 8:39 PM, NOORAIN ANSARI noorain.ans...@gmail.com wrote:
You should never “hijack” a thread to ask a question. Instead, start your own
with a new subject line. However, can you not use dataautofiltercustomends
with DR?
From: P.VIJAYKUMAR
Sent: Tuesday, October 04, 2011 8:22 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Thanks
Doubt 1. See attached
From: SAJID MEMON
Sent: Wednesday, October 05, 2011 3:23 AM
To: Excel Group
Subject: $$Excel-Macros$$ Project Part
Dear all experts,
I have 3 different types of doubt in my project. Need your help to accomplish
my project . I have attach a part of that project. please
Indirect may only be used with OPEN workbooks.
Instead, have your formula to the closed workbook and use edit/replace to
modify formulas.
-Original Message-
From: chhajersand...@gmail.com
Sent: Wednesday, October 05, 2011 7:16 AM
To: excel-macros@googlegroups.com
Subject:
Message-
From: dguillett1 dguille...@gmail.com
Sender: excel-macros@googlegroups.com
Date: Wed, 5 Oct 2011 09:03:57
To: excel-macros@googlegroups.com
Reply-To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Linking same format sheet
Indirect may only be used with OPEN workbooks
The example you provide makes it fairly easy
for i= 1 to 3
Sheets(List 1).QueryTables.Add(Connection:= _
TEXT;Path to my file I .csv, Destination:= sheets(List
1).range(a1)
'etc
next i
However, you can probably do it with ONE query table using the variables and
have your macro copy only
.
From: dguillett1 dguille...@gmail.com
To: excel-macros@googlegroups.com
Sent: Tuesday, 4 October 2011 7:20 PM
Subject: Re: $$Excel-Macros$$ Connect 2 sheets .
The attached will do as desired to make a sheet for each student. I see no
reason to make a file for each. I also did a print setup
different endings in their names: DATA_20110101, DATA_20110201,
etc...
That is why I need to be prompted to select the files manually.
On 5 okt., 16:56, dguillett1 dguille...@gmail.com wrote:
The example you provide makes it fairly easy
for i= 1 to 3
Sheets(List 1).QueryTables.Add(Connection
You have option explicit at the top so you need to declare variables.
dim lr as long
Attach or send me your file if necessary
From: SAJID MEMON
Sent: Wednesday, October 05, 2011 11:20 AM
To: Excel Group
Subject: $$Excel-Macros$$ Project Part Error
Dear Dguillett1 Roshan Mathew
I don’t think so. Attach here or send to dguillett1 @gmail.com
Don Guillett
SalesAid Software
dguille...@gmail.com
From: shaneallen
Sent: Wednesday, October 05, 2011 6:20 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Working out of Statistics on Exam Results URGENT
It would be helpful to post your files with before/after examples. I would
think that instead of using a loop you would use FIND (look in vba help)
Don Guillett
SalesAid Software
dguille...@gmail.com
-Original Message-
From: Monizri
Sent: Saturday, October 08, 2011 9:01 AM
To: MS
I suggest simply selecting your name cells in col Bdatatext to
columnsspacefinish
Don Guillett
SalesAid Software
dguille...@gmail.com
From: Nemi Gandhi
Sent: Saturday, October 08, 2011 4:37 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Querry ncg
Plaease provide solution.
try FIND instead of looping, i am trying to add my
file but i don't see anywhere i can attach my file. Do you know where?
Tx
Matt
On Oct 8, 11:47 am, dguillett1 dguille...@gmail.com wrote:
It would be helpful to post your files with before/after examples. I would
think that instead of using
:
Thanks Don, I can try FIND instead of looping, i am trying to add my
file but i don't see anywhere i can attach my file. Do you know where?
Tx
Matt
On Oct 8, 11:47 am, dguillett1 dguille...@gmail.com wrote:
It would be helpful to post your files with before/after examples. I
would
think
Try this modification
with found.Cells.borders
.LineStyle = xlContinuous
.Weight = xlThick
.ColorIndex = 3
End With
Temp = MsgBox(prompt:=Clear borders, Title:=Excel Find,
Buttons:=vbOKCancel + vbQuestion)
If Temp = vbOK Then found.Cells..LineStyle = xlNone
End If
Don Guillett
SalesAid
not expert, could you please let me know where this program has
to be placed, If you give me the full modified content that will be
useful
On Oct 10, 2:12 pm, dguillett1 dguille...@gmail.com wrote:
Try this modification
with found.Cells.borders
.LineStyle = xlContinuous
.Weight = xlThick
.ColorIndex
please help me.
Regards
SATISH
On Oct 10, 3:07 pm, dguillett1 dguille...@gmail.com wrote:
Look down this email to see where to delete and then add my mod
Don Guillett
SalesAid Software
dguille...@gmail.com
-Original Message-
From: satish
Sent: Monday, October 10, 2011 9:04 AM
To: MS
See if this link helps
http://www.exceltip.com/show_tip/Applications_-_Word,_Outlook_in_VBA/Control_Outlook_from_Excel_using_VBA_in_Microsoft_Excel/464.html
Don Guillett
SalesAid Software
dguille...@gmail.com
From: Secret Shot
Sent: Tuesday, October 11, 2011 2:35 AM
To:
Simply CUSTOM format the cells as 000
Don Guillett
SalesAid Software
dguille...@gmail.com
From: waheedb...@gmail.com
Sent: Tuesday, October 11, 2011 2:44 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Prefix 0 before the number- Help
Hi group,
I have numeric data in
try
=DATE(2000+VALUE(RIGHT(A2,2)),VALUE(MID(A2,4,2)),VALUE(LEFT(A2,2)))
Don Guillett
SalesAid Software
dguille...@gmail.com
From: Suman
Sent: Tuesday, October 11, 2011 8:08 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Unable to change date fromate
Hi,
Good
You say “single LINE”. Do you mean one cell ? If so, NO.
Don Guillett
SalesAid Software
dguille...@gmail.com
From: Ahmed Honest
Sent: Wednesday, October 12, 2011 7:12 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Solution Request
Dear All,
If an excel file contains 1000's of
Put this macro in the THISWORKBOOK module. Now when you double click cell a1
in any sheet you will go to sheet1
Change name and cell to suit
Private Sub Workbook_SheetBeforeDoubleClick _
(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
If Target = Sh.Range(a1) Then
The easy way to do this is to select the formula to copy double click the
fill handle
Don Guillett
SalesAid Software
dguille...@gmail.com
-Original Message-
From: Sumesh
Sent: Thursday, October 13, 2011 3:47 AM
To: MS EXCEL AND VBA MACROS
Subject: $$Excel-Macros$$ fill down formulas
What would the AFTER look like
Don Guillett
SalesAid Software
dguille...@gmail.com
-Original Message-
From: B Sharma
Sent: Thursday, October 13, 2011 8:46 AM
To: MS EXCEL AND VBA MACROS
Cc: rajanverma1...@gmail.com
Subject: $$Excel-Macros$$ Formula Sorting Data (Alpha + Numeric)
Should do it. Or just use AUTOFILTER on the original to get one at a time to
view.
Option Explicit
Sub GetCountryData_SAS()
'fire while at Tes sheet
Dim lr As Long
Dim i As Long
Columns(I).Delete
lr = Cells(Rows.Count, 1).End(xlUp).Row
'get unique list
Range(h1:h lr).AdvancedFilter
Custom Format
#,##0,, ;[Red](#,##0,,);- ;
Don Guillett
SalesAid Software
dguille...@gmail.com
From: Prathap
Sent: Thursday, October 13, 2011 9:52 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Urgent Help required
Hi,
Is there a way to convert all the cells with numbers in
Right click sheet tabview codecopy/paste this to make the changes in col G
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column 7 Or Target.Count 1 Then Exit Sub
If Target = 1 Then
Target = 0
Target.Interior.ColorIndex = 4
Else
Target = 1
Target.Interior.ColorIndex = 3
Attach your file
Don Guillett
SalesAid Software
dguille...@gmail.com
-Original Message-
From: Seba
Sent: Friday, October 14, 2011 5:28 AM
To: MS EXCEL AND VBA MACROS
Subject: $$Excel-Macros$$ Selecting a range based on a cell value
Hi all,
I am facing a problem regarding the range
by
the way), and do the coloring also through VBA, then just add the following
line within the If End IF statement in the VBA above.
Target.Interior.ColorIndex = 4 - Target.Value
Regards,
Sam Mathai Chacko
On Fri, Oct 14, 2011 at 6:09 PM, dguillett1 dguille...@gmail.com wrote:
Right
If you just need it to be dynamic withOUT having to select the month, change my
cola formula to this so when each month is added it will chart
colA
=OFFSET(SAS!$A$3,0,0,COUNTA(SAS!$A:$A)-1,1)
colB
=offset(colA,0,1)
Don Guillett
SalesAid Software
dguille...@gmail.com
From: dguillett1
Sent
94C
XYZ 94J
87 94K
94J ABC
94B XYZ
94K
94C
Hope that you can understand...
Thanks 7 Regards,
BS
On Oct 13, 9:01 pm, dguillett1 dguille...@gmail.com wrote:
What would the AFTER look like
Don Guillett
SalesAid Software
dguille...@gmail.com
-Original Message-
From: B Sharma
, Oct 15, 2011 at 7:44 PM, dguillett1 dguille...@gmail.com wrote:
If you just need it to be dynamic withOUT having to select the month, change
my cola formula to this so when each month is added it will chart
colA
=OFFSET(SAS!$A$3,0,0,COUNTA(SAS!$A:$A)-1,1)
colB
=offset(colA,0,1)
Don
Array formula solution
=1*MID(J3,MATCH(TRUE,ISNUMBER(1*MID(J3,ROW($1:$9),1)),0),COUNT(1*MID(J3,ROW($1:$9),1)))
Macro
Sub ExtractNumbers()
Dim r As Range
Dim s As String
Dim v As Variant
Set r = Range(j3, Range(j3).End(xlDown))
s = Join(Application.Transpose(r))
With
Send your file with a complete explanation and before/after examples to
dguillett1@gmail.com
Don Guillett
SalesAid Software
dguille...@gmail.com
-Original Message-
From: Ken
Sent: Sunday, October 16, 2011 2:29 PM
To: MS EXCEL AND VBA MACROS
Subject: $$Excel-Macros$$ Plotting
You can tie to a worksheet_change event in the sheet module. More info
and/or share a file
Don Guillett
SalesAid Software
dguille...@gmail.com
-Original Message-
From: ajjw123
Sent: Sunday, October 16, 2011 8:14 PM
To: MS EXCEL AND VBA MACROS
Subject: $$Excel-Macros$$ auto complete
try
=if(and(a1=b1,a1c1),1,)
Don Guillett
SalesAid Software
dguille...@gmail.com
-Original Message-
From: RockyFontane
Sent: Monday, October 17, 2011 10:08 AM
To: MS EXCEL AND VBA MACROS
Subject: $$Excel-Macros$$ Quick Date Count Question
I'm trying to determine if a specific date
401 - 500 of 1000 matches
Mail list logo