$$Excel-Macros$$ Click Button on URL using VBA

2016-08-25 Thread Emamuddin Shah


Dear Friends,

iam trying to click an button on url, please help my error 

CODE-

Sub click1()
   
Dim ie As InternetExplorerMedium
Dim url As String
   
Set ie = New InternetExplorerMedium

  
'### BUILD THE FULL URL
url = "www.google.com"

With ie
.Visible = True
.Navigate url
End With
'wait for page to load

'Do While ie.Busy Or ie.ReadyState <> 4
'DoEvents
'Loop

ie.Document.getelementsbyname("Sign in").click

End Sub

ERROR - 

run time error '-2147467259(80004005)':

Automation Error
Unspecifed Error


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 https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Click Button on URL using VBA

2016-08-25 Thread Gaurav Devrani
Hi,

Please check the below code.


Sub Click()

Dim objIE   As Object
Dim strURLAs String

   Set objIE = CreateObject("InternetExplorer.application")
strURL = "www.google.com"
With objIE
.Visible
.navigate = strURL
End With
End Sub




On Thu, Aug 25, 2016 at 6:05 AM, Emamuddin Shah  wrote:

>
>
> Dear Friends,
>
> iam trying to click an button on url, please help my error
>
> CODE-
>
> Sub click1()
>
> Dim ie As InternetExplorerMedium
> Dim url As String
>
> Set ie = New InternetExplorerMedium
>
>
> '### BUILD THE FULL URL
> url = "www.google.com"
>
> With ie
> .Visible = True
> .Navigate url
> End With
> 'wait for page to load
>
> 'Do While ie.Busy Or ie.ReadyState <> 4
> 'DoEvents
> 'Loop
>
> ie.Document.getelementsbyname("Sign in").click
>
> End Sub
>
> ERROR -
>
> run time error '-2147467259(80004005)':
>
> Automation Error
> Unspecifed Error
>
>
> 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 https://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/d/optout.
>



-- 

*Thanks & Regards*
*Gaurav Devrani*

-- 
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 https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Click Button on URL using VBA

2016-08-25 Thread Gaurav Devrani
Please disregard my email.

On Thu, Aug 25, 2016 at 6:05 AM, Emamuddin Shah  wrote:

>
>
> Dear Friends,
>
> iam trying to click an button on url, please help my error
>
> CODE-
>
> Sub click1()
>
> Dim ie As InternetExplorerMedium
> Dim url As String
>
> Set ie = New InternetExplorerMedium
>
>
> '### BUILD THE FULL URL
> url = "www.google.com"
>
> With ie
> .Visible = True
> .Navigate url
> End With
> 'wait for page to load
>
> 'Do While ie.Busy Or ie.ReadyState <> 4
> 'DoEvents
> 'Loop
>
> ie.Document.getelementsbyname("Sign in").click
>
> End Sub
>
> ERROR -
>
> run time error '-2147467259(80004005)':
>
> Automation Error
> Unspecifed Error
>
>
> 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 https://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/d/optout.
>



-- 

*Thanks & Regards*
*Gaurav Devrani*

-- 
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 https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Click Button on URL using VBA

2016-08-25 Thread Emamuddin Shah
Please suggest solutions... I just started vba crawling
On Aug 25, 2016 6:17 PM, "Gaurav Devrani"  wrote:

> Please disregard my email.
>
> On Thu, Aug 25, 2016 at 6:05 AM, Emamuddin Shah  wrote:
>
>>
>>
>> Dear Friends,
>>
>> iam trying to click an button on url, please help my error
>>
>> CODE-
>>
>> Sub click1()
>>
>> Dim ie As InternetExplorerMedium
>> Dim url As String
>>
>> Set ie = New InternetExplorerMedium
>>
>>
>> '### BUILD THE FULL URL
>> url = "www.google.com"
>>
>> With ie
>> .Visible = True
>> .Navigate url
>> End With
>> 'wait for page to load
>>
>> 'Do While ie.Busy Or ie.ReadyState <> 4
>> 'DoEvents
>> 'Loop
>>
>> ie.Document.getelementsbyname("Sign in").click
>>
>> End Sub
>>
>> ERROR -
>>
>> run time error '-2147467259(80004005)':
>>
>> Automation Error
>> Unspecifed Error
>>
>>
>> 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 https://groups.google.com/group/excel-macros.
>> For more options, visit https://groups.google.com/d/optout.
>>
>
>
>
> --
>
> *Thanks & Regards*
> *Gaurav Devrani*
>
> --
> 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 a topic in the
> Google Groups "MS EXCEL AND VBA MACROS" group.
> To unsubscribe from this topic, visit https://groups.google.com/d/
> topic/excel-macros/Gy_BSFcd_88/unsubscribe.
> To unsubscribe from this group and all its topics, 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 https://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/d/optout.
>

-- 
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 https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Click Button on URL using VBA

2016-08-25 Thread Gaurav Devrani
Hi ,

Check this code. I have just navigated the sign in link.

Sub Scraping()
   Dim appIE   As Object
   Set appIE = CreateObject("internetexplorer.application")
   With appIE
   .Visible = True
   .navigate "
https://www.google.co.in/?gfe_rd=cr&ei=vuy-V726B9GL8Qf9qYW4CQ&gws_rd=ssl";
   .navigate "
https://accounts.google.com/ServiceLogin?hl=en&passive=true&continue=https://www.google.co.in/%3Fgfe_rd%3Dcr%26ei%3Dvuy-V726B9GL8Qf9qYW4CQ%26gws_rd%3Dssl
"
   End With
End Sub

On Thu, Aug 25, 2016 at 6:48 AM, Emamuddin Shah  wrote:

> Please suggest solutions... I just started vba crawling
> On Aug 25, 2016 6:17 PM, "Gaurav Devrani"  wrote:
>
>> Please disregard my email.
>>
>> On Thu, Aug 25, 2016 at 6:05 AM, Emamuddin Shah  wrote:
>>
>>>
>>>
>>> Dear Friends,
>>>
>>> iam trying to click an button on url, please help my error
>>>
>>> CODE-
>>>
>>> Sub click1()
>>>
>>> Dim ie As InternetExplorerMedium
>>> Dim url As String
>>>
>>> Set ie = New InternetExplorerMedium
>>>
>>>
>>> '### BUILD THE FULL URL
>>> url = "www.google.com"
>>>
>>> With ie
>>> .Visible = True
>>> .Navigate url
>>> End With
>>> 'wait for page to load
>>>
>>> 'Do While ie.Busy Or ie.ReadyState <> 4
>>> 'DoEvents
>>> 'Loop
>>>
>>> ie.Document.getelementsbyname("Sign in").click
>>>
>>> End Sub
>>>
>>> ERROR -
>>>
>>> run time error '-2147467259(80004005)':
>>>
>>> Automation Error
>>> Unspecifed Error
>>>
>>>
>>> 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 https://groups.google.com/group/excel-macros.
>>> For more options, visit https://groups.google.com/d/optout.
>>>
>>
>>
>>
>> --
>>
>> *Thanks & Regards*
>> *Gaurav Devrani*
>>
>> --
>> 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 a topic in the
>> Google Groups "MS EXCEL AND VBA MACROS" group.
>> To unsubscribe from this topic, visit https://groups.google.com/d/to
>> pic/excel-macros/Gy_BSFcd_88/unsubscribe.
>> To unsubscribe from this group and all its topics, 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 https://groups.google.com/group/excel-macros.
>> For more options, visit https://groups.google.com/d/optout.
>>
> --
> 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 

Re: $$Excel-Macros$$ Click Button on URL using VBA

2016-08-25 Thread Emamuddin Shah
Thanks Gaurav, but I don't want to navigate I want it to click that button.
On Aug 25, 2016 6:40 PM, "Gaurav Devrani"  wrote:

> Hi ,
>
> Check this code. I have just navigated the sign in link.
>
> Sub Scraping()
>Dim appIE   As Object
>Set appIE = CreateObject("internetexplorer.application")
>With appIE
>.Visible = True
>.navigate "https://www.google.co.in/?gfe_rd=cr&ei=vuy-
> V726B9GL8Qf9qYW4CQ&gws_rd=ssl"
>.navigate "https://accounts.google.com/ServiceLogin?hl=en&passive=
> true&continue=https://www.google.co.in/%3Fgfe_rd%3Dcr%
> 26ei%3Dvuy-V726B9GL8Qf9qYW4CQ%26gws_rd%3Dssl"
>End With
> End Sub
>
> On Thu, Aug 25, 2016 at 6:48 AM, Emamuddin Shah  wrote:
>
>> Please suggest solutions... I just started vba crawling
>> On Aug 25, 2016 6:17 PM, "Gaurav Devrani" 
>> wrote:
>>
>>> Please disregard my email.
>>>
>>> On Thu, Aug 25, 2016 at 6:05 AM, Emamuddin Shah 
>>> wrote:
>>>


 Dear Friends,

 iam trying to click an button on url, please help my error

 CODE-

 Sub click1()

 Dim ie As InternetExplorerMedium
 Dim url As String

 Set ie = New InternetExplorerMedium


 '### BUILD THE FULL URL
 url = "www.google.com"

 With ie
 .Visible = True
 .Navigate url
 End With
 'wait for page to load

 'Do While ie.Busy Or ie.ReadyState <> 4
 'DoEvents
 'Loop

 ie.Document.getelementsbyname("Sign in").click

 End Sub

 ERROR -

 run time error '-2147467259(80004005)':

 Automation Error
 Unspecifed Error


 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 https://groups.google.com/group/excel-macros.
 For more options, visit https://groups.google.com/d/optout.

>>>
>>>
>>>
>>> --
>>>
>>> *Thanks & Regards*
>>> *Gaurav Devrani*
>>>
>>> --
>>> 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 a topic in the
>>> Google Groups "MS EXCEL AND VBA MACROS" group.
>>> To unsubscribe from this topic, visit https://groups.google.com/d/to
>>> pic/excel-macros/Gy_BSFcd_88/unsubscribe.
>>> To unsubscribe from this group and all its topics, 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 https://groups.google.com/group/excel-macros.
>>> For more options, visit https://groups.google.com/d/optout.
>>>
>> --
>> 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 n

Re: $$Excel-Macros$$ Click Button on URL using VBA

2016-08-25 Thread Gaurav Devrani
Hi,

check this out.

Sub Scraping()
   Dim appIE   As Object
   Set appIE = CreateObject("internetexplorer.application")
   With appIE
   .Visible = True
   .navigate "
https://www.google.co.in/?gfe_rd=cr&ei=vuy-V726B9GL8Qf9qYW4CQ&gws_rd=ssl";
   appIE.document.getElementByid("gb_70").Click
   End With
End Sub

On Thu, Aug 25, 2016 at 7:28 AM, Emamuddin Shah  wrote:

> Thanks Gaurav, but I don't want to navigate I want it to click that button.
> On Aug 25, 2016 6:40 PM, "Gaurav Devrani"  wrote:
>
>> Hi ,
>>
>> Check this code. I have just navigated the sign in link.
>>
>> Sub Scraping()
>>Dim appIE   As Object
>>Set appIE = CreateObject("internetexplorer.application")
>>With appIE
>>.Visible = True
>>.navigate "https://www.google.co.in/?gfe
>> _rd=cr&ei=vuy-V726B9GL8Qf9qYW4CQ&gws_rd=ssl"
>>.navigate "https://accounts.google.com/S
>> erviceLogin?hl=en&passive=true&continue=https://www.google.
>> co.in/%3Fgfe_rd%3Dcr%26ei%3Dvuy-V726B9GL8Qf9qYW4CQ%26gws_rd%3Dssl"
>>End With
>> End Sub
>>
>> On Thu, Aug 25, 2016 at 6:48 AM, Emamuddin Shah  wrote:
>>
>>> Please suggest solutions... I just started vba crawling
>>> On Aug 25, 2016 6:17 PM, "Gaurav Devrani" 
>>> wrote:
>>>
 Please disregard my email.

 On Thu, Aug 25, 2016 at 6:05 AM, Emamuddin Shah 
 wrote:

>
>
> Dear Friends,
>
> iam trying to click an button on url, please help my error
>
> CODE-
>
> Sub click1()
>
> Dim ie As InternetExplorerMedium
> Dim url As String
>
> Set ie = New InternetExplorerMedium
>
>
> '### BUILD THE FULL URL
> url = "www.google.com"
>
> With ie
> .Visible = True
> .Navigate url
> End With
> 'wait for page to load
>
> 'Do While ie.Busy Or ie.ReadyState <> 4
> 'DoEvents
> 'Loop
>
> ie.Document.getelementsbyname("Sign in").click
>
> End Sub
>
> ERROR -
>
> run time error '-2147467259(80004005)':
>
> Automation Error
> Unspecifed Error
>
>
> 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 https://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/d/optout.
>



 --

 *Thanks & Regards*
 *Gaurav Devrani*

 --
 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 a topic in the
 Google Groups "MS EXCEL AND VBA MACROS" group.
 To unsubscribe from this topic, visit https://groups.google.com/d/to
 pic/excel-macros/Gy_BSFcd_88/unsubscribe.
 To unsubscribe from this group and all its topics, send an email to
 excel-macros+unsubscr...@googlegroups.com.
 To post to this group, send email to excel-macros@googlegroups.com.
 Visit t

Re: $$Excel-Macros$$ Click Button on URL using VBA

2016-08-25 Thread Emamuddin Shah
I GOT THIS ERROR,

  run-time error '-2147467259(80004005)':
   Method 'document' of object "IWebBrowser2' failed





On Thursday, August 25, 2016 at 8:01:51 PM UTC+5:30, Gaurav Devrani wrote:
>
> Hi,
>
> check this out.
>
> Sub Scraping()
>Dim appIE   As Object
>Set appIE = CreateObject("internetexplorer.application")
>With appIE
>.Visible = True
>.navigate "
> https://www.google.co.in/?gfe_rd=cr&ei=vuy-V726B9GL8Qf9qYW4CQ&gws_rd=ssl";
>appIE.document.getElementByid("gb_70").Click
>End With
> End Sub
>
> On Thu, Aug 25, 2016 at 7:28 AM, Emamuddin Shah  > wrote:
>
>> Thanks Gaurav, but I don't want to navigate I want it to click that 
>> button.
>> On Aug 25, 2016 6:40 PM, "Gaurav Devrani" > > wrote:
>>
>>> Hi ,
>>>
>>> Check this code. I have just navigated the sign in link.
>>>
>>> Sub Scraping()
>>>Dim appIE   As Object
>>>Set appIE = CreateObject("internetexplorer.application")
>>>With appIE
>>>.Visible = True
>>>.navigate "
>>> https://www.google.co.in/?gfe_rd=cr&ei=vuy-V726B9GL8Qf9qYW4CQ&gws_rd=ssl
>>> "
>>>.navigate "
>>> https://accounts.google.com/ServiceLogin?hl=en&passive=true&continue=https://www.google.co.in/%3Fgfe_rd%3Dcr%26ei%3Dvuy-V726B9GL8Qf9qYW4CQ%26gws_rd%3Dssl
>>> "
>>>End With
>>> End Sub
>>>
>>> On Thu, Aug 25, 2016 at 6:48 AM, Emamuddin Shah >> > wrote:
>>>
 Please suggest solutions... I just started vba crawling
 On Aug 25, 2016 6:17 PM, "Gaurav Devrani" >>> > wrote:

> Please disregard my email. 
>
> On Thu, Aug 25, 2016 at 6:05 AM, Emamuddin Shah  > wrote:
>
>>
>>
>> Dear Friends,
>>
>> iam trying to click an button on url, please help my error 
>>
>> CODE-
>>
>> Sub click1()
>>
>> Dim ie As InternetExplorerMedium
>> Dim url As String
>>
>> Set ie = New InternetExplorerMedium
>> 
>>   
>> '### BUILD THE FULL URL
>> url = "www.google.com"
>>
>> With ie
>> .Visible = True
>> .Navigate url
>> End With
>> 'wait for page to load
>> 
>> 'Do While ie.Busy Or ie.ReadyState <> 4
>> 'DoEvents
>> 'Loop
>>
>> ie.Document.getelementsbyname("Sign in").click
>>
>> End Sub
>>
>> ERROR - 
>>
>> run time error '-2147467259(80004005)':
>>
>> Automation Error
>> Unspecifed Error
>>
>>
>> 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...@googlegroups.com .
>> To post to this group, send email to excel-...@googlegroups.com 
>> .
>> Visit this group at https://groups.google.com/group/excel-macros.
>> For more options, visit https://groups.google.com/d/optout.
>>
>
>
>
> -- 
>
> *Thanks & Regards*
> *Gaurav Devrani*
>
> -- 
> 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 l

$$Excel-Macros$$ Sumif multiple column

2016-08-25 Thread Deepak Rawat
Hi,

Need sumif function to sum multiple columns

sample excel attached.

Regards,
Deepak

-- 
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 https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


sumif.xlsx
Description: MS-Excel 2007 spreadsheet


Re: $$Excel-Macros$$ Sumif multiple column

2016-08-25 Thread 'ravinder negi' via MS EXCEL AND VBA MACROS
PFA 

On Friday, August 26, 2016 10:52 AM, Deepak Rawat  
wrote:
 

 Hi,
Need sumif function to sum multiple columns
sample excel attached.
Regards,Deepak -- 
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 https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


   

-- 
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 https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


sumif.xlsx
Description: MS-Excel 2007 spreadsheet


Re: $$Excel-Macros$$ Sumif multiple column

2016-08-25 Thread Deepak Rawat
thanks a ton!

On Fri, Aug 26, 2016 at 11:24 AM, 'ravinder negi' via MS EXCEL AND VBA
MACROS  wrote:

> PFA
>
>
> On Friday, August 26, 2016 10:52 AM, Deepak Rawat 
> wrote:
>
>
> Hi,
>
> Need sumif function to sum multiple columns
>
> sample excel attached.
>
> Regards,
> Deepak
> --
> 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 https://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/d/optout.
>
>
> --
> 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 https://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/d/optout.
>

-- 
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 https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


$$Excel-Macros$$ Update / Insert SQL Table from Excel Sheet

2016-08-25 Thread ALL IS WELL HELP ME
Dear Friends,

I'm New to excel VBA, I'm trying to update/insert Sql Table from Excel.

That is whenever i insert or update Excel Table it should automatically
update/insert to SQL.

Thanks,
7092063444

-- 
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 https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


Re: $$Excel-Macros$$ Fetching Data from excel based on current date

2016-08-25 Thread Emamuddin Shah
Thanks Paul, it worked.

On Thursday, August 4, 2016 at 6:19:20 PM UTC+5:30, Paul Schreiner wrote:
>
> Mr. Emamuddin,
>  I'd be glad to help you with this.
> I think there's quite a bit I can do to streamline this macro.
> I've spent quite some time trying to create a sample file to try to follow 
> what your macro does,
> but since I don't know what your data actually represents, I'm having 
> trouble following.
>
> for one thing, I'd recommend you move the IF() test in your nested loops.
> Executing:
> For i = 1 To lr
> For j = 1 To mydcnt
> For k = 1 To mycellnum
> For m = 1 To 6
> For n = 3 To 9
>
> THEN testing to see if the value in the "X" column is the required date 
> means that if you have 1000 records, 10 of which are the current date, then
> you will be checking EACH row 21,600 times, and since you're processing 
> 1000 rows, that's over 21 MILLION IF() tests.
>
> Even when you FIND a row with a matching date, you're STILL duplicating it 
> 21,600 times!
>
> So, I'd put the IF() test right after the 
>   For i = 1 To lr
> line so that it skips the other tests if the date doesn't match.
>
> Could you send me a copy of your file so that I can try to follow what the 
> macro does?
>
> *Paul*
> -
>
>
>
>
>
>
>
> *“Do all the good you can,By all the means you can,In all the ways you 
> can,In all the places you can,At all the times you can,To all the people 
> you can,As long as ever you can.” - John Wesley*
> -
>
>
> On Thursday, August 4, 2016 5:45 AM, Emamuddin Shah  > wrote:
>
>
>
>
> Hello All,
>
> iam an intermediate user of VBA i love to automate, 
> iam struck in on of my code when iam using to fetch data from my excel 
> sheet based on todays date and same thing copied after last rows.
> it is working but in last all copied cells goes empty..
>
> here is my code please suggest.
>
>
> Sub todayinterview()
>
> Dim lr As Long
> Dim myrow() As Variant
> Dim mydata() As Variant
>
> With ActiveSheet
>lr = .Cells(.Rows.count, "A").End(xlUp).Row
> End With
>
> Cells(lr + 2, 3) = "=countif(x:x,Today())"
> ' (this is to count how many occurrence of today's date)
>
> mydcnt = Cells(lr + 2, 3).Value 
>
> mycellnum = mydcnt * 6'  if there is 2 rows with todays date and i 
> need data from 6 coloumns than mydcnt*6
>
> ReDim myrow(mydcnt)
> ReDim mydata(mycellnum)
>
> Dim mycol(1 To 6) As Variant
> 'For a = 1 To 6
>  '  this is to get only specific data from row
>
> mycol(1) = 3
> mycol(2) = 4
> mycol(3) = 5
> mycol(4) = 6
> mycol(5) = 24
> mycol(6) = 25
>
> '(also please help to cycle this array after last number reached)
>
>
>
> For i = 1 To lr
> For j = 1 To mydcnt
> For k = 1 To mycellnum
> For m = 1 To 6
> For n = 3 To 9
>
>
> If Cells(i, 24) = Date Then
> myrow(j) = Cells(i, 24).Row
> 'MsgBox myrow(j)
> mydata(k) = Cells(myrow(j), mycol(m))
> Cells(lr + 7, n) = mydata(k)
> Cells(lr + 3 + j, 3) = myrow(j)
>
> 'MsgBox mydata(k)
> End If
>
>
> Next n
> Next m
> Next k
> Next j
> Next i
>
>
> 'For n = 1 To mycellnum
>
> 'Cells(lr + 7, n) = mydata(n)
>
> 'Next n
>
> MsgBox mydata(4)
>
> 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...@googlegroups.com .
> To post to this group, send email to excel-...@googlegroups.com 
> .
> Visit this group at https://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/d/optout.
>
>
>

-- 
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) Acknowledg