Hi Smitha,
Please use this Macro hope this help you.
Public Sub DeleteBlankCols(strSheetName As String, strRange As String)
Dim intCountAs Integer
Dim rng As Range
With ThisWorkbook.Worksheets(strSheetName)
Set rng = .Range(strRange)
For
select the column press Ctlr+g and go to blank and then press Alt+E D and
select row and delete .
Regards,
Gawli Anil
On Tue, Jun 26, 2012 at 11:34 AM, Prince Dubey prince141...@gmail.comwrote:
Hi Smitha,
Please use this Macro hope this help you.
Public Sub DeleteBlankCols(strSheetName As
Thank you Hilary for sharing those templates with us , but would be very
useful ,not just looking how it looks but to be customizable as well.
What is the point sharing with us protected files , not that i cannot find
a password breaker but like i sayd would be more useful if protection is
Hi Core
Kindly read ♍Ɣ email you would realize I was very specific in providing the
password to the file.
Sent from my BlackBerry® smartphone from Airtel Ghana
-Original Message-
From: CoRe neculae.vale...@gmail.com
Sender: excel-macros@googlegroups.com
Date: Tue, 26 Jun 2012 00:42:36
Nice Creativity Hilary, Thanks to share with Group.
On Mon, Jun 25, 2012 at 7:41 PM, hilary lomotey resp...@gmail.com wrote:
Hello Guys
i just completed my two excel projects and want to share. The first one is
like an accounting system where you can enter clients information as well as
Dear Krishnan,
Please check below link, hope it will help to you.
http://excelsemipro.com/2010/11/excel-2011-for-mac-installation-preferences-and-vba/
--
Thanks regards,
Noorain Ansari
www.noorainansari.com
www.excelmacroworld.blogspot.com
On Tue, Jun 26, 2012 at 10:49 AM,
You can just change the last parameter , its works like countif
=GetCount(B:B,N3,*)
Rajan
On Tuesday, 26 June 2012 08:51:21 UTC+5:30, lokesh wrote:
Hi Rajan,
I have sent resolved previous region wise count query, but i made some
changes in the data and added some more regions and as
Dear Neeraj,
See the attachment, if help
Regds
ROHAN
On Tue, Jun 26, 2012 at 2:11 PM, Neeraj Chauhan
neerajchauhan...@gmail.comwrote:
Siwaya
Sikhera 1
Maithna Inder Singh
Salarpur
Niit
Pela Sofipur
Ganga Nagar
Pallavpuram
Pallav Puram
HTH
AddShape 1 ,1 ,1,100,0
Rajan.
On Tuesday, 26 June 2012 12:16:33 UTC+5:30, raj wrote:
sorry password for attached file is rajeshd
On 26 June 2012 12:15, Rajesh Durgaiah rajesh...@gmail.com wrote:
Hi,
I've created one excel file for step and repeat, but I',m finding
Hi Neeraj
the formula is reverse the order of the values , is it what you meant to
repeat the text or number
Rajan.
On Tuesday, 26 June 2012 14:28:54 UTC+5:30, neeraj chauhan wrote:
Thanks Rohan,
[image: Sign]
*From:* excel-macros@googlegroups.com [mailto:
Hi
In Developer Tab
Goto Insert - More Controll ( Bottom Right) then Find Microsoft ScrollBar
Rajan.
On Tuesday, 26 June 2012 14:09:19 UTC+5:30, friend wrote:
Dear Sir/ Madam,
Please see the attachment, I can not find the control tab in the format
control
of the scroll bar.
Please
Dear Sanjib,
Please goto Developer tab-click on Design and right click on scroll Bar
Format Control Option will available.
--
Thanks regards,
Noorain Ansari
www.noorainansari.com
www.excelmacroworld.blogspot.com
On Tue, Jun 26, 2012 at 2:09 PM, Sanjib Chatterjee
Dear Sanjib,
Anil is right, You have taken Scroll Bar from Active X control instead
of Form Control.
So control Option is not showing.
Please select scroll bar from Form Control, It will work fine as per your need.
--
Thanks regards,
Noorain Ansari
www.noorainansari.com
Hi Ayush,
I want to add header column text in Activelistbox through vba.
Can you help me how i can add.
Thanks.
Divaker
--
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula
Dear Divaker,
Please share your Activelistbox with group.
--
Thanks regards,
Noorain Ansari
www.noorainansari.com
www.excelmacroworld.blogspot.com
On Tue, Jun 26, 2012 at 4:07 PM, Divaker Pandey divake...@gmail.com wrote:
Hi Ayush,
I want to add header column text in Activelistbox through
Hi Friends,
Please tell me the types of data analysis which are used in the
company to perform data operations.
Please provide the information.
Thanks !!!
--
With regards,
MaNgEsH
--
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor
Dear Mangesh,
Please check below link, Hope it will useful for your query.
**Link***
What Types Of Data Are Used For Statistical Analysis?
How To Write A Data Analysis?
What Is Data Analysis?
What Are The Different Types Of Data?
What Is Financial Data
Hi Rajan,
Thanks a lot brother. I have changed the last parameter and i get the
correct result.
Thank you very much. Have a great day brother.
Regards
Lokesh.M
On Tue, Jun 26, 2012 at 2:17 PM, Rajan_Verma rajanverma1...@gmail.comwrote:
You can just change the last parameter , its works like
Congr8ss Rajan...
On Wednesday, August 3, 2011 10:52:02 PM UTC+5:30, Ayush Jain wrote:
Hello Everyone,
Rajan Verma has been selected as 'Most Helpful Member' for the month of
July'11
He has posted 170 posts in July 2011 and helped many people through his
expertise. He has been
Hi Experts,
Still waiting for your response.
Divaker
On Tue, Jun 26, 2012 at 5:10 PM, Divaker Pandey divake...@gmail.com wrote:
Hi Noorain Experts,
Thanks for respond. please find attached file.
on tab sheet1 there is two activeX control
1. Textbox -txtLookup
2. ListBox - lstLookup
Hi manish . thanks but This is about last year J
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of Manish
Sent: 26 June 2012 6:33
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Re: Rajan
You can try this also
on error resume next
activesheet.specialcells(xlcelltypeblank).usedrange.entirecolumn.delete
on error goto 0: on error goto -1: err.clear
Regards,
Lalit Mohan
On Tue, Jun 26, 2012 at 7:09 PM, Rajan_Verma rajanverma1...@gmail.com wrote:
Try this
Sub
Hi Lalit
If any Column have data in some cells then it will also be deleted,
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
-Original Message-
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of ?» lal?? ?sa??
Sent: 26 June 2012 7:20
To:
Hi Divaker,
You query is not cleary mentioned can u please share a file with the
full description so that we can help u as soon as possible
Regards,
Lalit Mohan
On Tue, Jun 26, 2012 at 6:35 PM, Divaker Pandey divake...@gmail.com wrote:
Hi Experts,
Still waiting for your response.
Divaker
Nice work Hilary..
Regards,
Lalit Mohan
On Tue, Jun 26, 2012 at 7:17 PM, Rajan_Verma rajanverma1...@gmail.com wrote:
Hi deba..
Actually the BLPLinkReset is a macro which was called at the time of
Recording this macro.
Hi Hilary..
You can put the code of BLPLinkReset in your
Thanks Noorain, i want to list out all company details which match on
entered value in textbox.
By the way how you added header in listbox.
Please tell me steps.
Thanks.
Divaker
On Tue, Jun 26, 2012 at 7:28 PM, ╰» ℓαℓιт мσαнη mohan.pande...@gmail.comwrote:
Hi Divaker,
You query is not
Hi Lalit,
I want to list out all company which string match in any column(available
data)
Divaker
On Tue, Jun 26, 2012 at 8:03 PM, Divaker Pandey divake...@gmail.com wrote:
Thanks Noorain, i want to list out all company details which match on
entered value in textbox.
By the way how you
Noorain,
It will be helpful if you give me VBA code to add header column.
I think listbox used header on the base of assigned range on
ListFillRange properties.
But it is not make sense to solve my query, because i have 72000 rows, and
take selected rows form them. i could not want write it
Today i faced an issue with excel 2010. if u have installed Visual Studio
2010 beta2 then VBA editor auto-deletes spaces at the ends of lines so
below are the steps which helps me to resolve this.
1. Click the Microsoft Office Button, and then click Excel Options
2. Click the Add-Ins
Hi Divaker,
I have created a name range List_Matters,
We called it through below coding..
Sheet1.lstLookup.ListFillRange = List_Matters
and in Property Boxt i have marked columnHeads as true.
--
Thanks regards,
Noorain Ansari
www.noorainansari.com
www.excelmacroworld.blogspot.com
On Tue,
Are you working Excel project in VSTO or in Excle VBE?
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of Lalit_Mohan
Sent: 26 June 2012 8:20
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$
Lalit Can you give the example .? I have vsto on my system,
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of Lalit_Mohan
Sent: 26 June 2012 8:20
To: excel-macros@googlegroups.com
Subject:
but it will lock modification in list through vba.
Divker
On Tue, Jun 26, 2012 at 8:23 PM, NOORAIN ANSARI noorain.ans...@gmail.comwrote:
Hi Divaker,
I have created a name range List_Matters,
We called it through below coding..
Sheet1.lstLookup.ListFillRange = List_Matters
and in
Hi Rajan,
Actually i faced this issue while doing vba programming. These are
just steps to resolve the same.
Regards,
Lalit Mohan
On Tue, Jun 26, 2012 at 8:24 PM, Rajan_Verma rajanverma1...@gmail.com wrote:
Lalit Can you give the example .? I have vsto on my system,
Regards
Rajan
Download this book .
http://freedownload.is/pdf/the-vsto-programming-model-3812060.html
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
-Original Message-
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On
Behalf Of ?» lal?? ?sa??
Sent: 26 June 2012
Thanks Rajan for your great help.
Regards,
Lalit Mohan
On Tue, Jun 26, 2012 at 8:47 PM, Rajan_Verma rajanverma1...@gmail.com wrote:
Download this book .
http://freedownload.is/pdf/the-vsto-programming-model-3812060.html
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
-Original
I found these links useful to learn vsto
http://media.wiley.com/product_data/excerpt/73/04700464/0470046473.pdf
http://pdfs-free.com/vsto-pdf.html
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
-Original Message-
From: excel-macros@googlegroups.com
This one always confuses me, but it is usually simple, so I would
appreciate any help.
I want to loop through all the rows with data in my worksheet and if the
value in a certain cell is equal to x then I want to unprotect selected
columns in that row, otherwise I want to reset the protection
No need to Loop
UsedRange.Replace X,
Set rng=UsedRange.SpecialCells(xlcelltypeblanks)
Rng.value=X
Rng.entireColumn.Locked=True/False (whatever your want)
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On
Nice PDF Rajan, Thanks for Sharing
On Tue, Jun 26, 2012 at 8:52 PM, Rajan_Verma rajanverma1...@gmail.com wrote:
I found these links useful to learn vsto
http://media.wiley.com/product_data/excerpt/73/04700464/0470046473.pdf
http://pdfs-free.com/vsto-pdf.html
Regards
Rajan verma
+91
Thanks for your reply, but I guess I wasn't clear --
condition a ===if the value of cell x3=5 then I want cells y3 through ax3
to be unprotected, otherwise I want them to be protected.
condition b ===if the value of cell x35 then the reverse happens
and I would to do it for each row with data,
The problem with that approach is that you're assuming that the cells in the
UsedRange that do not have an X in them have some other value.
If, for example, all of column A is blank,
and the user places an X in column A for each row in which
he wants to unlock specific cells in that row,
this
Hello Guys
Attached is a list of data, i want to be able to retrieve each unique list
based on the ranking, with what i have tried if there is a tie, it always
picks there first data, kindly provide a formula to retrieve each unique
list based on the ranking. thanks
--
--
FORUM RULES (986+
Hi Hilary,
See attached sheet, Hope it will help to you
Change in formula As per your need
On Tue, Jun 26, 2012 at 10:39 PM, hilary lomotey resp...@gmail.com wrote:
Hello Guys
Attached is a list of data, i want to be able to retrieve each unique list
based on the ranking, with what i have
Thanks Noorain
its working Perfectly.
thanks Raj
On Tue, Jun 26, 2012 at 5:23 PM, NOORAIN ANSARI noorain.ans...@gmail.comwrote:
Hi Hilary,
See attached sheet, Hope it will help to you
Change in formula As per your need
On Tue, Jun 26, 2012 at 10:39 PM, hilary lomotey resp...@gmail.com
Revised with Error Handling :
Sub Mtest()
Dim rngRange As Range
Dim rngBlanks As Range
Dim WksSheet As Worksheet
Dim ValtoReplace
Set WksSheet = ActiveSheet
WksSheet.Unprotect
Set rngRange = Range(rngRange).CurrentRegion
On Error
Thank you both.
I'll test it
On Tuesday, June 26, 2012 8:23:36 AM UTC-7, Richard wrote:
This one always confuses me, but it is usually simple, so I would
appreciate any help.
I want to loop through all the rows with data in my worksheet and if the
value in a certain cell is equal to
Hello Again
i tried extracting a unique list based on criteria such that if i choose a
criteria such as list between 5000 to 1, i want to see that list alone
and if i choose a list between 10001 to 4 i want to see that list
alone, i am struggling with the condition that create the array,
Hi,
You can put the below function any where in any of your module. It will
work same as Workbook_Open() Event.
Sub Auto_Open()
Your Code here
End Sub
For more detail read this:
http://www.learnexcelmacro.com/2011/12/auto-open-macro-auto-run-macro/
On Monday, June 25, 2012 1:26:16 PM
Hi all,
In the attached excel, I want to delete the week ends whereas at the same time
the position of the month should not move. It means the Feb month should start
from A34, March month should start from A64. Please advise using VBA macro.
Thanks,
Vishwa
CONFIDENTIALITY NOTICE: This
Hi Vishwa,
By Weekends you mean Saturday and Sunday or Only Sunday?
Thanks,
Vish
--
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will
Saturday and Sunday
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On
Behalf Of Vish
Sent: Wednesday, June 27, 2012 1:00 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Re: Delete Blank Cells.xlsx
Hi Vishwa,
By Weekends you mean Saturday and Sunday or
Hi Vishwa,
Hope this helps. Please let me know.
Thanks,
Vish
--
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick
Hi,
I need the date should be like how I arranged in the column B.
Thanks,
Vishwa
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On
Behalf Of Vish
Sent: Wednesday, June 27, 2012 1:19 AM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Re: Delete
Hi Vishwa,
Sub DeleteBlank()
On Error Resume Next
ActiveSheet.UsedRange.SpecialCells(xlCellTypeBlanks).EntireRow.Delete
On Error GoTo 0: On Error GoTo -1: Err.Clear
End Sub
Above is the function need to call in the button click event in sheet1 as
shown below.
Private Sub
Hi HIlary,
In L25 =
=INDEX(D1:D22,LARGE(--(D3:D22=K23)*--(D3:D22=L23)*ROW(D3:D22),ROW(INDIRECT(1:SUM(--(D3:D22=K23)*--(D3:D22=L23),1)
with CSE
in
K25
=INDEX($C$3:$C$22,SMALL(IF($D$3:$D$22=L25,ROW($C$3:$C$22),),COUNTIF($L$25:L25,L25))-2)
with CSE
HTH
On Wednesday, 27 June 2012
Hi Vishwa,
I forgot to mention in my last post, use this code in existing file in
which weekend date deletion code already exist. just apply the blank row
deletion procedure and use it as i show you.
Regards,
Lalit Mohan
On Wednesday, 27 June 2012 00:46:00 UTC+5:30, Viswanathan Yoganathan
Hi Vishwa,
Please try this i hope this will do your work
Public Sub DeleteWeekends()
Dim rng As Range
Dim rngData As Range
With ThisWorkbook.Worksheets(Sheet1)
Set rngData = .Range(A1:A .Range(A
.Rows.Count).End(xlUp).Row)
For Each rng In
Hi Vishwa,
Try This
Public Sub DeleteWeekends()
Dim rng As Range
Dim rngData As Range
With ThisWorkbook.Worksheets(Sheet1)
Set rngData = .Range(A1:A .Range(A
.Rows.Count).End(xlUp).Row)
For Each rng In rngData
If
Hi Mitr,
Private Sub Workbook_Open()
'Write your code here in workbook
End Sub
regards
Prince dubey
On Monday, 25 June 2012 13:26:16 UTC+5:30, Mitr wrote:
Hi Experts
Pls help me with a way, so that a Macro runs whenever I open a particular
excel file. (Macro is in that excel file
If I already have Sheets(RawData).Cells(count, BarDate).Text having a value
like 6/26/2012 is there a way to get the day of the week as a number or
string for that date that does not require splitting it into its parts and
feeding them to some function? If the latter the .net examples I found
Hi,
You can try this
=TEXT(DAY(A1),)
Hope it helps you
Regards,
Lalit Mohan
On Wednesday, 27 June 2012 09:17:02 UTC+5:30, tangledweb wrote:
If I already have Sheets(RawData).Cells(count, BarDate).Text having a
value like 6/26/2012 is there a way to get the day of the week as a
Hi Prince,
I think both the solution given by you are same.
Regards,
Lalit Mohan
On Wednesday, 27 June 2012 08:43:37 UTC+5:30, Prince Dubey wrote:
Hi Mitr,
Private Sub Workbook_Open()
'Write your code here in workbook
End Sub
regards
Prince dubey
On Monday, 25 June
This seems to be designed to work directly in excel instead of a VB
program. I tried to use it without the = but it said the function TEXT was
not defined.
I need a method that works in a VB program with the value 6/26/2012 stored
in the array previously listed.
On Tuesday, June 26, 2012
Hi,
You can try this
Evaluate(=TEXT(DAY(A1),))
Hope it helps you
Regards,
Lalit Mohan
On Wednesday, 27 June 2012 09:45:46 UTC+5:30, tangledweb wrote:
This seems to be designed to work directly in excel instead of a VB
program. I tried to use it without the = but it said the
Hi,
You can use it as below also
Evaluate(=TEXT(DAY( arr(i) ),))
where arr is array and i is the index of the array
or
Evaluate(=TEXT(DAY(6/26/2012),))
Regards,
Lalit Mohan
On Wednesday, 27 June 2012 10:00:29 UTC+5:30, Lalit_Mohan wrote:
Hi,
You can try this
I believe this is the equivalent of your second new solution?
Evaluate(=Text(Day(Sheets(RawData).Cells(count, BarDate).Text),
))
I tried it with and without the .text part. Both cases returned error
2015 though I have a 4 digit year and the form is month/day/year which is
supposed
I think, Lalit's Solution is nice..
You can also use..
=CHOOSE(WEEKDAY(A1),Sunday,Monday,Tuesday,Wednesday,Thursday,Friday,Saturday)
or
=LOOKUP(WEEKDAY(A1),{1,2,3,4,5,6,7},{Sun,Mon,Tue,Wed,Thu,Fri,Sat})
or
in VBA
=Format(A1,)
--
Thanks regards,
Noorain Ansari
www.noorainansari.com
68 matches
Mail list logo