$$Excel-Macros$$ Re: Introduce Yourself !!

2013-06-26 Thread sandeep shivpujan singh
Hi Everyone,

I am Sandeep S Singh from India > Hyderabad. I am a Software Engineer 
working with Cognizant. I have just now joined this group & It is my first 
post.
I work on QTP and Excel Macros. looking forward to interact with everyone 
here. have a good day :-)

Thank,
Sandeep Singh

On Saturday, 9 June 2012 00:51:59 UTC+5:30, Ayush Jain wrote:
>
> Hey all new and current posters,
>  
> Welcome to excel group,one of the largest online community of excel Fans!
>  
> I hope you enjoy your time here & find this forum to be a friendly and 
> knowledgeable community. Please feel free to post a small introduction, a 
> friendly hello or tell us a bit about yourself. Why not tell us where are 
> you from, what you do, what your interests are, how old you are, which is 
> your favourite excel site or blog is or anything else that comes to mind!
>
> Thanks for your time
> Ayush Jain
> Group Manager
> Microsoft MVP
>

-- 
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 official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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 attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.




$$Excel-Macros$$ Re: SAVE As file name

2013-07-04 Thread sandeep shivpujan singh
Hi,

You can use below code also. I think you want to save a blank sheet with 
the  required name.

1. Code to save one sheet with the data given in cells 2.

Dim strPath As String
strPath = ActiveWorkbook.Path & "\"
ActiveSheet.Copy
ActiveWorkbook.SaveAs Filename:=strPath & Cells(2, 1) & "-" & Cells(2, 2) & 
"-" & Cells(2, 4) & ".xls"
ActiveWorkbook.Close
MsgBox "done"


2. based on number of rows you have.. each row data can be used and saved 
as a new sheet.

'for saving each row value as new xls you can try this.

Dim i, j As Integer
i = 4 ' i can be any number of row you want.

For j = 2 To i 'two is for starting from 2nd row as 1st row is heading.
ActiveSheet.Copy
ActiveWorkbook.SaveAs Filename:=strPath & Cells(j, 1) & "-" & Cells(j, 2) & 
"-" & Cells(j, 4) & ".xls"
ActiveWorkbook.Close
Next j


Thanks,
Sandeep

On Friday, 5 July 2013 09:41:01 UTC+5:30, Pankaj wrote:
>
> Dear All,
>
> Please help to SAVE As file name as per record entered.
>
>
> [image: Inline image 1]
>
> -- 
>  
> Thanks
> Pankaj Kumar
> 9910075248
>

-- 
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 official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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 attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.




Re: $$Excel-Macros$$ SAVE As file name

2013-07-06 Thread sandeep shivpujan singh
Hi, 

Paste the code in a module and try to execute again.  I will attach the working 
excel if possible. Thanks

-- 
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 official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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 attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.




Re: $$Excel-Macros$$ Error in output

2013-07-10 Thread sandeep shivpujan singh
Hi,

The empty value is because you have not given any criteria when the match 
is not found.

For Example : Use this : =IF(ISERROR(MATCH(C1,$E$1:$E$99,0)),"Not Found",C1)

Currently none of  the values which you have in Column "C" are present in 
Column "E"

Regards,
Sandeep



On Wednesday, 10 July 2013 15:09:07 UTC+5:30, raghu wrote:
>
> Sir, Now i am getting Empty Value in the cell , pl see the attached file
>
>
> On Tue, Jul 9, 2013 at 6:23 PM, xlstime >wrote:
>
>> I missing in our formula (iserror)
>>
>> =IF(ISERROR(MATCH(C1,$E$1:$E$99,0)),"",C1)
>>
>> .
>>
>> Enjoy
>> Team XLS
>>
>>
>>
>> On Tue, Jul 9, 2013 at 5:22 PM, raghunandan rallapalli <
>> raghunandan...@gmail.com > wrote:
>>
>>> Sir, kindly give solution for the attached file, 
>>> thanks in advance
>>>
>>> -- 
>>> Raghu Nandan Rallapalli 
>>>
>>> -- 
>>> 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 official Facebook page of this forum @ 
>>> https://www.facebook.com/discussexcel
>>>  
>>> FORUM RULES
>>>  
>>> 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 attention or may not be answered.
>>> 2) Don't post a question in the thread of another member.
>>> 3) Don't post questions regarding breaking or bypassing any security 
>>> measure.
>>> 4) Acknowledge the responses you receive, good or bad.
>>> 5) Jobs posting is not allowed.
>>> 6) Sharing copyrighted material and their links is not allowed.
>>>  
>>> NOTE : Don't ever post confidential data in a workbook. Forum owners and 
>>> members are not responsible for any loss.
>>> --- 
>>> You received this message because you are subscribed to the Google 
>>> Groups "MS EXCEL AND VBA MACROS" group.
>>> To unsubscribe from this group and stop receiving emails from it, send 
>>> an email to excel-macros...@googlegroups.com .
>>> To post to this group, send email to excel-...@googlegroups.com
>>> .
>>> Visit this group at http://groups.google.com/group/excel-macros.
>>> For more options, visit https://groups.google.com/groups/opt_out.
>>>  
>>>  
>>>
>>
>>  -- 
>> 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 official Facebook page of this forum @ 
>> https://www.facebook.com/discussexcel
>>  
>> FORUM RULES
>>  
>> 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 attention or may not be answered.
>> 2) Don't post a question in the thread of another member.
>> 3) Don't post questions regarding breaking or bypassing any security 
>> measure.
>> 4) Acknowledge the responses you receive, good or bad.
>> 5) Jobs posting is not allowed.
>> 6) Sharing copyrighted material and their links is not allowed.
>>  
>> NOTE : Don't ever post confidential data in a workbook. Forum owners and 
>> members are not responsible for any loss.
>> --- 
>> You received this message because you are subscribed to the Google Groups 
>> "MS EXCEL AND VBA MACROS" group.
>> To unsubscribe from this group and stop receiving emails from it, send an 
>> email to excel-macros...@googlegroups.com .
>> To post to this group, send email to excel-...@googlegroups.com
>> .
>> Visit this group at http://groups.google.com/group/excel-macros.
>> For more options, visit https://groups.google.com/groups/opt_out.
>>  
>>  
>>
>
>
>
> -- 
> Raghu Nandan Rallapalli 
>

-- 
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 official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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 attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.




$$Excel-Macros$$ Re: Repost: Excel initiating export from Crystal report

2013-07-10 Thread sandeep shivpujan singh
Probably its too latestillI was searching for some code related to 
Crystal Report and found your post. :)

This code might help ( you need to set reference to Crystal Reports ActiveX 
designer Design and Runtime Library 11.0 or above)


Sub CrystalRPTtoXLS()
On Error GoTo ERRMSG

Dim Appl As New CRAXDDRT.Application
Dim report As New CRAXDDRT.report

Dim xRow As Long
Dim xDirect$, xFname$, InitialFoldr$   
InitialFoldr$ = "C:\" '<<< Startup folder to begin searching from
With Application.FileDialog(msoFileDialogFolderPicker)
.InitialFileName = Application.DefaultFilePath & "\"
   .Title = "Please select a folder to list Files from"
.InitialFileName = InitialFoldr$
  .Show
   If .SelectedItems.Count <> 0 Then
   xDirect$ = .SelectedItems(1) & "\"
   xFname$ = Dir(xDirect$, 7)
Do While xFname$ <> ""
'ActiveCell.Offset(xRow) = xFname$
If Right(xFname$, 3) = "rpt" Then

Set report = Appl.OpenReport(xDirect$ & xFname$)
'SendKeys "{ENTER}"

' download reports
With report.ExportOptions
.DestinationType = crEDTDiskFile
.FormatType = crEFTExcel97
.DiskFileName = xDirect$ & xFname$ & ".xls"
End With
report.Export False
End If
xRow = xRow + 1
xFname$ = Dir
Loop
MsgBox "Files Converted"
Exit Sub
ERRMSG:
MsgBox "Error"
End Sub

-- 
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 official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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 attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.