Share your workbook in which you are applying this method and let me check
why it is not working.
On Tuesday, 1 July 2014 11:05:27 UTC+5:30, amar takale wrote:
>
> Dear lalitji
> code not working
>
> On Tue, Jul 1, 2014 at 8:00 AM, Lalit Mohan Pandey
> > wrote:
> &g
, 2014 at 10:17 AM, amar takale > wrote:
> > Dear Bé Trần Văn
> >
> > Thanks very much sir. but i ask you small issue can we use one
> > code to all filed like lalit mohanji code.I use this code but erroe
> > show "object does not support this property
Yes it will work in excel 2003 and above
On Friday, 27 June 2014 15:31:54 UTC+5:30, amar takale wrote:
>
> Dear Lalit Mohan
>
> Then it code not work in excel 2003?
>
> On Fri, Jun 27, 2014 at 3:24 PM, Lalit Mohan Pandey
> > wrote:
> > change your code as i
Try this, I have created this for only MCap column:
*Option Explicit*
*Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)*
*If Target.Address = "$D$7" Then*
*Call FilterData*
*Application.Goto Me.Cells(1, 1)*
*End If*
*End Sub*
*Sub F
What you want whenever you scroll down the timline should also scroll down?
On Friday, 27 June 2014 14:59:45 UTC+5:30, Prayank Vidyarthi wrote:
>
> Hi Excel Gurus,
>
> I need your help as I am really stuck over here. I have data starting from
> Nov 2012 till March 2014. I have created various cha
change your code as i have changed it:
*Sub SECEPSDES()*
*With ActiveWorkbook.Worksheets("Sector Valn")*
*.Sort.SortFields.Clear*
*.Range("A6:U21").Sort Key1:=.Range("E7:E21"),
Order1:=xlDescending, Header:=xlYes*
*End With*
*End Sub*
*Sub SECEPSASC()*
*
What do you mean by sort based on criteria?
On Friday, 27 June 2014 15:03:04 UTC+5:30, pramodb35 wrote:
>
> Not Sure What you are saying.
>
>
> Need more description.
>
>
>
>
>
> On Fri, Jun 27, 2014 at 11:28 AM, amar takale > wrote:
>
>> Dear All friends
>>
>> Can anyone suggestion pls?
>>
>> On
If it possible please attach sample data so that we can help you
On Thursday, 29 August 2013 14:38:39 UTC+5:30, Dhamo dharan wrote:
>
> Dear Friends
>
> Kindly help to export data like name and percentage from all the sheet (30
> sheets) to a new file or in a different sheet.
>
> E.g
>
> Name pro
Try this
Option Explicit
Sub SplitValues()
Dim lngLoop As Long
Dim vararrRawData() As Variant
Dim vararrSplitData As Variant
'Const variable change accordingly as per your requirement
Const strDataRangeToSplit As String = "C1:C65536"
Const s
Please check hope this is what you are looking for:
Option Explicit
Sub RemoveData()
Dim wbkFile As Workbook
Dim vararrDataToRemove()As Variant
Dim lngLoop As Long
Dim rngData As R
Yes you can download data but only thing you need to do is to arrange data
in excel file by using excel vba. :)
On Wednesday, 28 August 2013 18:59:19 UTC+5:30, Mithun Dhar wrote:
>
> I am trying to import data from IE sharepoint web site. The sharepoint
> website just contains one table with hea
Instead of sharing Screen shot it would be nice if you can share file
On Tuesday, 13 August 2013 20:01:06 UTC+5:30, Chandru wrote:
>
> Hi,
>
> While running macro am getting run time error 6 as shown in the attached
> file. I am using huge data which contains 9 rows.
>
> Could you please
To complete this test Excel/VBA knowledge is not sufficient you should also
be good in Accounts. :)
On Tuesday, 13 August 2013 12:01:30 UTC+5:30, Dhaval Shah wrote:
>
>
>
>
> PFA the excel test. Request to let me know if any one could help me out
> with it.
>
> *Warm Regards,
>
> Dhaval Shah *
>
You can try below link:
http://www.vbaexpress.com/kb/getarticle.php?kb_id=515
On Wednesday, 14 August 2013 03:36:42 UTC+5:30, Tom B. wrote:
>
> Hi
>
>
>
> I have a spreadsheet that records user inputs and then stores the inputs
> along with Date/Time and user ID.
>
> Since this will be acc
t;> structure...
>>
>> Thanks,
>> Anoop
>> Sr. Developer
>>
>> On 8/9/13, Lalit Mohan Pandey > wrote:
>> > Replace line
>> >
>> > *Erow = Me.Range(A1).End(xlDown).row + 1*
>> >
>> > with this one
>
Replace line
*Erow = Me.Range(A1).End(xlDown).row + 1*
with this one
*If LenB(Trim(Me.Cells(13, 2).Value)) = 0 Then Me.Cells(13, 2).Value =
"DATES"*
*Erow = Me.Cells(Me.Rows.Count, 2).End(xlUp).Offset(1).row*
If it will not work then you need to share your database as well so that we
can run
I am not sure about this becuse Microsoft excel vba doesn't work in
Openoffice and if you really want to prevent your code then go for COM
addin Using VSTO.
On Wednesday, 31 July 2013 23:58:25 UTC+5:30, Aashish Watve wrote:
>
> Dear All,
>
> I have a very particular question. Is there a way to
How you highlighted cells in a range?
On Wednesday, 19 June 2013 17:58:39 UTC+5:30, Rajan_Verma wrote:
>
>
> can anyone suggest a faster way to know which cells are highlighted in a
> Range ?
>
> suppose i have data of 1 lac cell and i have some cells highlighted , i
> want to know address of t
Why don't you use listview form control.
On Friday, 7 June 2013 18:38:48 UTC+5:30, Chandru wrote:
>
> Hi,
>
> How to get List as attached in the userform
>
>
> Regards,
>
> Chandra
>
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
=TIME(2,DO:IT,N:OW) ! Join
Share your file.
On Monday, 29 April 2013 14:30:13 UTC+5:30, colmkav wrote:
>
> Hi, I am trying to execute this function to return the column number of a
> heading. However although the value is correctly 3 when it reaches the end
> of the function it becomes 0 when I set it to iFund2Col after l
Find below link for solution:
http://www.excelfox.com/forum/f2/need-array-formula-help-912/
On Thursday, 18 April 2013 13:40:19 UTC+5:30, Dhaval Shah wrote:
>
> Excel experts
>
> i want Array Formula help in attech sheet by help of Lalitji i made 50 %
> achivable
>
> pls help
>
> Thanks
>
> D
> index]<http://www.facebook.com/todashah>[image:
> dd] <http://www.linkedin.com/profile/view?id=37508924&trk=tab_pro>[image:
> Small-images-Twitter-Logo] <https://twitter.com/dhaval4205>
>
>
>
> *Please consider the enviroment before priting this emai
Change your formula with this one
*
=IF(ISERROR(SMALL(IF(Sheet1!C$1:C$145=Sheet1!M$3,ROW(Sheet1!A$1:A$145),""),ROW()-(ROW()-1))),"",INDEX(Sheet1!D$1:D$145,SMALL(IF(Sheet1!C$1:C$145=Sheet1!M$3,ROW(Sheet1!A$1:A$145),""),ROW()-(ROW()-1
*
On Wednesday, 17 April 2013 18:45:10 UTC+5:30, amar takale
Hi Lakshman,
Did you get any solution on the same.
On Monday, 15 April 2013 12:58:16 UTC+5:30, lakshm...@yahoo.com wrote:
>
>
> still waiting
>
> *Lakshman Prasad*
> Sr. Manager (Finance)
> GAURSONS INDIA LIMITED
> Ph: +91 12 456777 Mob. No. 9582279261
> Website: http://www.gaursonsindia.com
Follow steps and try this. Hope this will work for you:
1. *Right Click on Cell C5*
2. *Create a hyperlink with cell refrence C5 in the same (output sheet )*
3. *Do same for Cell D5 and create hyperlink with cell refrence D5 in
the same (output sheet )*
4. *Right click on output sh
You can also try this
http://www.excelfox.com/forum/f12/number-into-words-rupees-45/
On Monday, 15 April 2013 14:08:29 UTC+5:30, Kuldeep Singh wrote:
>
> Hi Abhishek,
>
> PFA by Noorain Sir.
>
> Regards,
> Kuldeep Singh
> Info Edge India Limited (naukri.com)
> Phone.: +91-0120-4841100, Extn.: 246
Please give me some time i am working on this and this can be done. so
don't worry man. I will come up with a solution by eod.
On Monday, 15 April 2013 12:58:16 UTC+5:30, lakshm...@yahoo.com wrote:
>
>
> still waiting
>
> *Lakshman Prasad*
> Sr. Manager (Finance)
> GAURSONS INDIA LIMITED
> P
Change this line
activecell.FormulaR1C1 = "=D6 & YEAR(MonthEndDate) & ""."" & rg.value &
""."" & ""\Outputs\"""
with
activecell.Formula = "=D6 & YEAR(MonthEndDate) & ""."" & rg.value & "".""
& ""\Outputs\"""
On Monday, 15 April 2013 13:28:30 UTC+5:30, colmkav wrote:
>
> Hi,
>
> I am trying
Do you want the Doc. No. after you fill column a and c or what and what
should be the doc no how we decide.
On Monday, 15 April 2013 11:09:35 UTC+5:30, Pravin Gunjal wrote:
>
> *Hi, I want the result : Doc. No. to be come when the stockist and
> location is getting typed in column C & A accordin
I think the output would containd three values Cards, Ballons, Streamers
and for this output below is the formula. Confirm it with CSE
*
=IFERROR(INDEX($A$1:$A$8,SMALL(IF(((VALUE($B$2:$B$8)>=VALUE($D$1))*ROW($A$2:$A$8))=0,"",((VALUE($B$2:$B$8)>=VALUE($D$1))*ROW($A$2:$A$8))),ROW($A$1:$A$8))),"")
*
Is there any pattern of ID's like starting 3 characters are string and the
rest part is Numeric or something like this. Please explain.
On Thursday, 11 April 2013 03:51:42 UTC+5:30, shau...@gmail.com wrote:
>
>
>
> I have a sheet with lot IDs in Col A
>
>
> AAA100
> CPP100
> AAA101
> AAA102
> CPP
Try this code. Hope it will help you
*Sub Test_Lalit_Pandey()*
*
*
*Dim wksSht As Worksheet*
**
*For Each wksSht In ThisWorkbook.Worksheets*
*If wksSht.Visible = xlSheetHidden Or wksSht.Visible =
xlSheetVeryHidden Then*
*wksSht.Visible = xlSheetVisible*
*
ni wrote:
>
> Sir, Might contains data in second row that which might not contains in
> the first row in duplicate.
>
> Ragards,
> Chaya
>
>
> On Thu, Apr 4, 2013 at 10:06 AM, Lalit Mohan Pandey
>
> > wrote:
>
>> What is the criteria to not delete dupl
What is the criteria to not delete duplicates.
On Thursday, 4 April 2013 09:34:49 UTC+5:30, chaya moni wrote:
>
> Dear Lalit Sir,
>
>Thanks for the reply. i tried to explain a bit more in the attached
> file. please refer sir.
>
> Regards,
> Chaya
>
>
&g
I am not able to understand your both conditions :(.
First select all column then remove duplicate. (Only 29 duplicate value
found and removed.)
On Wednesday, 3 April 2013 18:37:15 UTC+5:30, chaya moni wrote:
>
> Dear Experts,
>
> I have another problem arise in excel while removing duplica
;"""))*ROW($A$1:$A$68),""""), ROW($A$1:$A$68)),""""),3),"""")"*
*.Range("Y14:Y19").FormulaArray =
"=IFERROR(INDEX($B$1:$N$68,IFERROR(SMALL(IFERROR(INT(SUBSTITUTE(($D$1:$D$68
<=$S$11)*($E$1:$E$6
They all are array forumlas did you applied with Control + Shift + Enter.
Please check. I applied all these formulas in your attached workbook and
its working.
On Wednesday, 3 April 2013 12:39:39 UTC+5:30, Dhaval Shah wrote:
>
> Lalit Sir
>
> didt work can u send me the sample fil
Hi Dhaval,
Copy below formula at cell address C11 and confirm it with CSE
*=MAX(($B$2:$B$68=$S$10)*($A$2:$A$68 = "FUTSTK")*$I$2:$I$68)*
*
*
Select cell R14:R19, press F2 and paste below formuls and confirm it with
CSE
*=IFERROR(INDEX($B$1:$N$68,IFERROR(SMALL(IFERROR(INT(SUBSTITUTE(($D$1:$D$68
<=
You can go through below links:
http://www.excel-vba-easy.com/
http://www.excel-vba.com/
On Wednesday, 3 April 2013 09:56:27 UTC+5:30, prafull jadhav wrote:
>
> Dear All,
>
> Very Good Morning ,
>
> I am very familiar with excel ..but I have never use Macro in my work .
>
> I want to learn Macro
Just write your formula and comfirm it with CSE.
Or you can go through below link:
http://www.cpearson.com/excel/ArrayFormulas.aspx
http://office.microsoft.com/en-in/excel-help/introducing-array-formulas-in-excel-HA001087290.aspx
http://www.excelfox.com/forum/f2/count-consecutive-value-range-usin
Use it like this:
For Each Wks In ThisWorkbook.Worksheets
If IsNumeric(Wks.Name) Then
Wks.Name = "Year " & Wks.Name
end if
If Wks.Name >= 2010 And Wks.Name <= Year(Date) Then
end if
next wks
On Tuesday, 2 April 2013 20:01:41 UTC+5:30, artforart artforart wrote:
>
> If I add this bold part in cod
To change worksheet name you are doing right and except this what you want
is not clear so if there is something for which you need help you need to
specify it clearly.
On Tuesday, 2 April 2013 00:30:06 UTC+5:30, artforart artforart wrote:
>
> I must change a head in the original table.
> I have
By using below event of workbook
*Private Sub Workbook_BeforePrint(Cancel As Boolean)*
*End Sub*
you can specify the different print settings for different sheets
On Monday, 1 April 2013 15:39:17 UTC+5:30, Pravin Gunjal wrote:
>
> Can we change the print settings at a time for multiple sheets, a
Colud you please elaborate.
On Tuesday, 2 April 2013 09:56:37 UTC+5:30, Dhaval Shah wrote:
>
> Hello all experts
>
> any solution for my query
>
>
> On Mon, Apr 1, 2013 at 4:37 PM, Dhaval Shah
> > wrote:
>
>> Dear Experts
>>
>> I want to make out multipul selection for my project pls refer my
I think you need to replace formula with vba code and this will make your
report lite and as per my knowledge this is the only way to get rid of your
issue.
On Friday, 29 March 2013 19:58:09 UTC+5:30, Divaker Pandey wrote:
>
> I'm running into one problem with this.
>
> My workbook is pretty ma
I don't know about Chrome or Firefox but you can do same with internet
explorer.
To automate internet explorer follow below link:
http://www.excelfox.com/forum/f2/unable-get-elementid-vba-ie-automation-851/
On Friday, 22 March 2013 02:02:49 UTC+5:30, Kiran Kancharla wrote:
>
> Hi All,
>
> Good D
you can do one thing just copy and past data and its formatting. No need to
move and copy sheet. If you did that.
On Tuesday, 26 March 2013 10:34:50 UTC+5:30, Pravin Gunjal wrote:
>
> Hi,
>
> I am getting the following error message, while opening an attached file.
> As I am unable find out the r
Hi Hilary,
Below code will help you
Option Explicit
Sub Copy_Visited_Client_Data()
Dim wksModule As Worksheet
Dim wksDashBoardAs Worksheet
Dim wksUserSht As Worksheet
Dim rngDataRangeAs Range
Congrats Pricekeep helping man...
On Thursday, 10 January 2013 22:19:58 UTC+5:30, Ayush Jain wrote:
>
> Dear members,
>
> Prince Kumar has been selected as 'Most Helpful Member' for the month of
> Dec'12. He has posted 92 posts last month and helped forum members through
> his excel expertis
Are you sure about the output you mentioned in attached file. or output
will be
Starting Place A
Starting place B
Starting place C
Starting place D
Starting place Ending Place
A B
A C
A D
B A
B C
B D
B Ending Place
C A
C B
C D
C Ending Place
D A
D B
D C
D Ending Place
Regards,
Lalit Mohan
@Prince
Instead of using dictionary or array a single line can do it
If No Header
ActiveSheet.Range("$A$1:$A$23").RemoveDuplicates Columns:=1, Header:=xlNo
If Header
ActiveSheet.Range("$A$1:$A$23").RemoveDuplicates Columns:=1, Header:=xlYes
Regards,
Lalit Mohan
On Thursday
Enjoy buddy. ;)
On Thursday, 10 January 2013 12:18:12 UTC+5:30, Jai wrote:
>
> Thank you all Prince, Lalit, Noorain, The Viper and all if I missed
> anyone...
>
>
>
> It worked!!
>
>
>
> *From:* excel-...@googlegroups.com [mailto:
> excel-...@goog
Hi Noorain,
Could you please explain the function u used
*Get.workbook*
*
*
and i think it is a UDF isn't it.
Regards,
Lalit Mohan
On Thursday, 10 January 2013 12:12:14 UTC+5:30, NOORAIN ANSARI wrote:
>
> Dear Hari,
>
> See attached file by using only Excel Formul
Hi Jai,
you can also try this
=MID(SUBSTITUTE(A2," ","$",(LEN(A2)-LEN(SUBSTITUTE(A2," ",""))+1)-2),
FIND("$",SUBSTITUTE(A2," ","$",(LEN(A2)-LEN(SUBSTITUTE(A2,"
",""))+1)-2))+1, LEN(A2))
Regards,
Lalit Mo
Hi Ashish,
Find below link may be it help you
http://lds.netdimensions.com/ldslive/nd/fresco/repository/html/kit/Self%20Support%20Articles/Mail/AttachmentPreviewers.pdf
Regards,
Lalit Mohan
On Wednesday, 9 January 2013 16:17:06 UTC+5:30, Ashish_Bhalara wrote:
>
> Thanks for reply sir,
is set:
Default Authentication Level: Should say Connect, not "None"
And Default Impersonation Level: SHould say Identify.
When those are set properly, hit o.k and turn on your protected mode back
on your Office applications. Everything works as expected :)
Cheers :)
Regards,
Hi Karan,
Apply this formula with CSE in cell C4
=MAX(IF((($A$4:$A$9567)=$A4),$B$4:$B$9567,0))
and copied down
Regards,
Lalit Mohan
On Wednesday, 9 January 2013 15:35:50 UTC+5:30, karan wrote:
>
> Hi
> Can anyone pls let me know how do i get the max value or date (using a
> for
Either you can go for dell or hp
http://www.dell.com/in/p/inspiron-laptops?~ck=bt
http://www8.hp.com/in/en/products/laptops/index.html?facet=Everyday-computing
Regards,
Lalit Mohan
On Wednesday, 9 January 2013 11:21:01 UTC+5:30, .. wrote:
>
> any views / comments folks ?
>
> Als
remember how this is done in VBA? By
creating a class that manage low level reading to and writing from a text
file, the properties and methods in the class can easily be used in your
macros.
*Regards,*
*Lalit Mohan*
On Wednesday, 9 January 2013 09:20:16 UTC+5:30, Enrique Martin wrote
Hi Anmol,
you can pass multiple shapes as an array using my previos post's method.
Regards,
Lalit Mohan
On Tuesday, 8 January 2013 13:57:46 UTC+5:30, Lalit Mohan Pandey wrote:
>
> Hi Amol,
>
> *Sub test(ParamArray Arr() As Variant)*
> *
> *
> *'Code here*
Hi Amol,
*Sub test(ParamArray Arr() As Variant)*
*
*
*'Code here*
*
*
*End Sub*
Regards,
Lalit Mohan
On Tuesday, 8 January 2013 13:40:56 UTC+5:30, Amol J wrote:
>
> Hi Experts,
>
> I need help
>
> I have multiple shapes in sheet so i want color only one shape
Please check the data ranges you provided and it will not activate the
sheet it will run for all sheets in the workbook.
On Monday, 7 January 2013 23:43:51 UTC+5:30, Best Of Luck wrote:
>
> Thank you Lalit,
> The macros is running but does not select the activesheet and does not
&
Hi Prabhakar,
Find below mentioned link:
http://www.dur.ac.uk/resources/its/info/guides/39Excel2003Macros.pdf
http://www.few.vu.nl/~rbekker/VBA-intro.pdf
http://www.fontstuff.com/downloads/Excel%20VBA%20Course%20Notes%201%20-%20Macro%20Basics.pdf
Regards,
Lalit Mohan
On Monday, 7 January
Hi Harshad,
Provided details is not according to the file you shared.
Regards,
Lalit Mohan
On Monday, 7 January 2013 10:53:25 UTC+5:30, harshad shukla wrote:
>
> The parametr is vendor.i want vendorwise quantity detail of stock item and
> item code is primary differentiating factor
&
Type *excel stationary inventory template* in google.com and find which
suits you.
Regards,
Lalit Mohan
On Monday, 7 January 2013 08:02:44 UTC+5:30, Smitha S R wrote:
>
> Hi,
> Anyone please send me some good excel template to maintain the office
> stationery items, their consumpt
ractRanges = rngFinal*
*Else*
*Set subractRanges = Union(subractRanges, rngFinal)*
*End If*
*End If*
*Next rngFinal*
**
*Set rngFinal = Nothing*
*End Function*
Regards,
Lalit Mohan
On Friday, 4 January 2013 21:59:30 UTC+5:30, Best Of Luck
Hi Harshad,
First of all this thread should be comes under you previous thread as you
are asking same thing in both thread
https://groups.google.com/forum/#!topic/excel-macros/Y2PNmj1V-ZU%5B1-25-false%5D
And second what is the parameter to differentiate two same values.
Regards,
Lalit Mohan
Hi Harshad,
Could you please explain how can you defrenciate two same value like for
which value i want data.
Regards,
Lalit Mohan
On Friday, 4 January 2013 14:52:15 UTC+5:30, Prince wrote:
>
> Share your workbook.
>
> Regards
> Prince
>
> On Friday, January 4, 201
Hi Dear,
Can you please share it again with the output or result you want to see for
better clearity.
Regards,
Lalit Mohan
On Friday, 4 January 2013 01:18:39 UTC+5:30, Best Of Luck wrote:
>
> Lalit
>
> thanks for the macro. I am loading an example sheet for you . I need to
*.Cells(1, intDateTimeColNo).EntireRow.Insert*
*End If*
*End With*
*If Not Application.ScreenUpdating Then Application.ScreenUpdating =
True*
*
*
*End Sub*
Regards,
Lalit Mohan
On Friday, 4 January 2013 01:48:16 UTC+5:30, prkhan56 wrote:
>
> **Thanks Lalit
> I can see
)*
*
*
*intValue = intParameter*
*
*
*End Sub*
Regards,
Lalit Mohan
On Thursday, 3 January 2013 23:34:55 UTC+5:30, Lalit Mohan Pandey wrote:
>
> Hi Prashant,
>
> Can you explain why you take same name variable in Public and Private
> scope.
>
> Regards,
> Lalit Mohan
>
>
Hi Prashant,
Can you explain why you take same name variable in Public and Private scope.
Regards,
Lalit Mohan
On Thursday, 3 January 2013 23:15:17 UTC+5:30, prashant shinde wrote:
>
>
>
>
> Original message
> Subject: Conflict between Local and Global variab
Hi Ankur,
You can find an example to login in gmail account using vba at below
mentioned link:-
http://powerofexcel.wordpress.com/2012/09/12/google-login-automation-through-excel-vba/
let us know for further assistance.
Regards,
Lalit Mohan
On Thursday, 3 January 2013 19:11:36 UTC+5:30
Hi harshad,
May be this link help you for applying vlookup. It contains tutorial with
pictures
http://www.timeatlas.com/5_minute_tips/general/learning_vlookup_in_excel
Video tutorial
http://www.youtube.com/watch?v=HjRjRnzy-hA
Regards,
Lalit Mohan
On Thursday, 3 January 2013 16:09:23 UTC+5
Hi hilary,
you can share your file by uploding it to other public file sharing website
and share the link to download it.
Regards,
Lalit Mohan
On Thursday, 3 January 2013 16:14:52 UTC+5:30, hilary lomotey wrote:
>
> This Ȋ̝̊̅§ very valuable info unfortunately this forum limits the s
End If*
*End With*
*Next wksSht*
**
*End Sub*
*
*
*Regards,*
*Lalit Mohan*
On Thursday, 3 January 2013 14:23:00 UTC+5:30, Best Of Luck wrote:
>
> hi,
> Happy new year,
>
> I need a macro that would copy cells based upon values in other cells. I
> am usi
Hi Rashid,
The file which i have sent you contains a sheet named *Sample *so if you
have copied only the code then it will give you an error because the sheet
is not available. Please check the same.
Reagrds,
Lalit Mohan
On Thursday, 3 January 2013 00:57:11 UTC+5:30, prkhan56 wrote:
>
>
Hi Viper,
No issue.. :) i am not pointing you just letting you know. thanks for
the nice formula.
Regards,
Lalit Mohan
On Thursday, 3 January 2013 09:49:40 UTC+5:30, §»VIPER«§ wrote:
>
> Hi lalit
>
> I don't find any need for that. just working as required by OP
>
>
en*
*CreateFile = True*
*On Error Resume Next*
*Kill strFilePath*
*On Error GoTo 0: Err.Clear*
*Else*
*CreateFile = False*
*End If*
**
*Set objFSO = Nothing*
* Set objTFC = Nothing*
*strFilePath = vbNullString*
**
*End Function*
Regards,
Lali
Nice formula viper but the last space is missing.
On Wednesday, 2 January 2013 15:07:20 UTC+5:30, §»VIPER«§ wrote:
>
> =LEFT(A1,MIN(IFERROR(FIND({0,1,2,3,4,5,6,7,8,9},A1),""))-1)&SUBSTITUTE(MID(A1,MIN(IFERROR(FIND({0,1,2,3,4,5,6,7,8,9},A1),"")),255),"
>
> ","")
>
> this should work with CSE
>
>
ROW(INDIRECT("1:"&LEN(A1))),1*ROW(INDIRECT("1:"&LEN(A1))))-MATCH(1,N(ISNUMBER(VALUE(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),4,0)+1),"
",""))
Regards,
Lalit Mohan
On Wednesday, 2 January 2013 13:25:54 UTC+5:30, Manoj Kumar wro
*Wish you a very happy B'Day Noorain*
On Wednesday, 2 January 2013 00:13:59 UTC+5:30, ashish wrote:
>
> Happy b'day Noorain Ansari
>
>
> Regards
> Ashish Koul
> Sent on my BlackBerry® from Vodafone
--
Join official Facebook page of this forum @
https://www.facebook.com/discussexcel
FORU
Animation rocks
On Tuesday, 1 January 2013 16:16:52 UTC+5:30, amar takale wrote:
>
> Dear my all Excel Group Members,
>
> I found Excel fun Video on Internet while searching Excel Solution & I
> like very much.I hope you all like it fun Video.So I attached this
> Excel.Enjoy every excel use
Hi Rashid,
Sorry for that i will send you the file by today evening itself
Regards,
Lalit Mohan
On Tuesday, 1 January 2013 13:37:21 UTC+5:30, prkhan56 wrote:
>
> Hello Lalit
> I cannot see the complete code. If I go and check the original and paste
> the code I get lot of unwante
*Same to you prince and Happy new year to all group members. May all your
dreams come true in this year.*
Regards,
Lalit Mohan
On Monday, 31 December 2012 17:26:31 UTC+5:30, Prince wrote:
>
> *Happy New Year To All.*
> *
> *
> *May God bless you a very nice
Hi Black,
Did you find the solution is helpful.
Regards,
Lalit Mohan
On Monday, 31 December 2012 10:18:25 UTC+5:30, black panther wrote:
>
> Dear Prince,
>
> No same color, any color but light color,
>
> What i am looking for:-
>
> if cell A1 having yellow & B1 h
.Range(strFinalDataStartCell).Resize(UBound(varFinal),
UBound(varFinal, 2)).Value = varFinal
.Cells.EntireColumn.AutoFit
End With
End If
Next lngLoopName
End With
End
e & ".xls", 56*
*.Close False*
*Application.DisplayAlerts = True*
*End With*
*Next wksSht*
*
*
*End Sub*
*
*
Regards,
Lalit Mohan
On Monday, 31 December 2012 13:01:52 UTC+5:30, maulik wrote:
>
> Hi team,
> I am having 1excel workbook which con
Dear Charlie,
Please share your file with us if it is confidential then please share
sample at least for better clearity.
Regards,
Lalit Mohan
On Monday, 31 December 2012 11:46:32 UTC+5:30, sswcharlie wrote:
>
> Hi Lalit
>
> Have tried the code , same result. Getting the
lngColor*
*Application.CutCopyMode = False*
*Application.Goto .Range(strRange).Resize(1, 1)*
*Application.ScreenUpdating = True*
*Sleep 300*
*Loop*
**
*Application.ScreenUpdating = True*
*Application.DisplayAlerts = True*
**
*End With*
").Resize(UBound(varArray),
UBound(varArray, 2)).Value = varArray
Erase varArray
End Sub
Hope this will help you.
Regards,
Lalit Mohan
On Monday, 31 December 2012 08:19:44 UTC+5:30, sswcharlie wrote:
>
>
>
> Hi Ashish
>
> Thanks for code. Still not workin
Hi Rashid,
I didn't find any employe name in the master sheet there is only two column
No and Action and please tell me from where i will take in/out time. Didn't
understand the data you provided. Please check.
Regards,
Lalit Mohan
On Sunday, 30 December 2012 14:16:09 UTC+5:30
Hi Koneng,
Explaing with steps would be more understandable.
Regards,
Lalit Mohan
On Friday, 28 December 2012 09:36:24 UTC+5:30, Bhaity Koneng wrote:
>
> Dear All Experts,
>
> Gud mrng..!! any Solution for this ?
>
>
>
>
>
>
> Thanks & R
Hi amar
Nice work . Thanks for sharing.
Regards,
Lalit Mohan
+919711867226
On Wednesday, 26 December 2012 20:09:53 UTC+5:30, (%Allmydreams%) wrote:
>
> Hi Guys
>
> check out this you may get some more ideas to think in different
>
> On Sat, Dec 22, 2012 at 4:38 PM, amar
@ amar
Nice work with more features. Thanks for sharing this to us.
Regards,
Lalit Mohan
+919711867226
On Wednesday, 26 December 2012 20:09:53 UTC+5:30, (%Allmydreams%) wrote:
>
> Hi Guys
>
> check out this you may get some more ideas to think in different
>
> On Sat, De
Thanks Ms-Exl-Learner for the suggestion.
Regards,
Lalit Mohan
On Wednesday, 26 December 2012 11:52:11 UTC+5:30, Ms-Exl-Learner wrote:
>
> @Lalit,
>
> Why not a *Non Array Formula* suggestion?
> In D2 cell
> =SUMPRODUCT((TEXT($B$16:$B$380,"")=$B2)*(D$16:D$380)
Hi Rajesh,
Apply below formula instead of yours with Ctrl + Shift + Enter
=SUM((MONTH($C$16:$C$380)=MONTH($B2&1))*(D$16:D$380))
and the mistake is the matching range is in date format and the criteria is
in Text format.
Regards,
Lalit Mohan
+919711867226
On Wednesday, 26 December 2012 1
*Merry Christmas...*
On Tuesday, 25 December 2012 11:25:25 UTC+5:30, Dhaval Shah wrote:
>
>
> *Wishing you all a very Merry Christmas! *
>
> ** **
>
> *And a Happy, Healthy & Eventful 2013 *
>
>
>
> * *
>
>
>
>
> * *
>
> ** **
>
> *
> *
> *To One and All!!! *
>
like this:
*Worksheets("Sheet1").range("A1:D10")..AutoFilter Field:=1, Criteria1:="a"*
Regards,
Lalit Mohan
On Saturday, 22 December 2012 21:51:03 UTC+5:30, prashant shinde wrote:
>
> Hi Friends,
>
> Can somebody please tel me what are the reasons for
Hi Ganesh,
You would need some OCR software to convert image to text.
you can read this link i am sure its help you
http://www.freewaregenius.com/2011/1...ree-ocr-tools/<http://www.freewaregenius.com/2011/11/01/how-to-extract-text-from-images-a-comparison-of-free-ocr-tools/>
Regards,
Lalit
1 - 100 of 131 matches
Mail list logo
