$$Excel-Macros$$ daily data into weekly data

2013-10-14 Thread asdhhc
> > Columns(1).Insert > With Range("b2", Range("b" & Rows.Count).End(xlUp)).Offset(, -1) > .Formula = "=if(and(weekday(b2,2)),1,)" > .Value = .Value > On Error Resume Next > .SpecialCells(2, 1).Offset(0, 1).Delete Shift:=xlUp > .SpecialCells(2, 1).Of

Re: $$Excel-Macros$$ export table to Excel from a link

2013-10-04 Thread asdhhc
On Thursday, October 3, 2013 11:01:36 PM UTC+8, ashish wrote: > > check the attached file see if it helps > > working. Thank you. > Plse teach me how to make 'Run macro' icon as per your attached query.xlm regard Ray Ho > > On Thu, Oct 3, 2013 at 8:24 PM, > wrote: > >> >> >> On Thur

$$Excel-Macros$$ convert daily stock data into weekly data

2013-10-04 Thread asdhhc
Columns(1).Insert With Range("b2", Range("b" & Rows.Count).End(xlUp)).Offset(, -1) .Formula = "=if(and(weekday(b2,2)),1,)" .Value = .Value On Error Resume Next .SpecialCells(2, 1).Offset(0, 1).Delete Shift:=xlUp .SpecialCells(2, 1).Offset(0, 2).Delete

Re: $$Excel-Macros$$ export table to Excel from a link

2013-10-03 Thread asdhhc
On Thursday, October 3, 2013 11:01:36 PM UTC+8, ashish wrote: > > check the attached file see if it helps > > still not working > > On Thu, Oct 3, 2013 at 8:24 PM, > wrote: > >> >> >> On Thursday, October 3, 2013 10:10:03 PM UTC+8, ashish wrote: >>> >>> try something like this >>> >>>"URL;ht

Re: $$Excel-Macros$$ export table to Excel from a link

2013-10-03 Thread asdhhc
On Thursday, October 3, 2013 10:10:03 PM UTC+8, ashish wrote: > > try something like this > >"URL; > https://secure.fundsupermart.com/main/fundinfo/dailyPricesHistory.tpl?id="; > & Sheet1.Range("H1").Value, Destination:=Range( > "A1") > *not working* > > On Thu, Oct 3, 2013 at 2:20

Re: $$Excel-Macros$$ export table to Excel from a link

2013-10-03 Thread asdhhc
On Thursday, October 3, 2013 10:10:03 PM UTC+8, ashish wrote: > > try something like this > >"URL; > https://secure.fundsupermart.com/main/fundinfo/dailyPricesHistory.tpl?id="; > & Sheet1.Range("H1").Value, Destination:=Range( > "A1") > not working > > On Thu, Oct 3, 2013 at 2:20 PM

$$Excel-Macros$$ Re: export table to Excel from a link

2013-10-03 Thread asdhhc
On Thursday, October 3, 2013 4:50:23 PM UTC+8, asd...@gmail.com wrote: > > With ActiveSheet.QueryTables.Add(Connection:= _ > > "URL;https://secure.fundsupermart.com/main/fundinfo/dailyPricesHistory.tpl?id=FI3039"; > , Destination:=Range( _ > "$A$1")) > .FieldNames = True

$$Excel-Macros$$ Re: export table to Excel from a link

2013-10-03 Thread asdhhc
On Thursday, October 3, 2013 4:50:23 PM UTC+8, asd...@gmail.com wrote: > > With ActiveSheet.QueryTables.Add(Connection:= _ > > "URL;https://secure.fundsupermart.com/main/fundinfo/dailyPricesHistory.tpl?id=FI3039"; > , Destination:=Range( _ > "$A$1")) > .FieldNames = True

$$Excel-Macros$$ export table to Excel from a link

2013-10-03 Thread asdhhc
original link : https://secure.fundsupermart.com/main/fundinfo/dailyPricesHistory.tpl?id= FI3039 With ActiveSheet.QueryTables.Add(Connection:= _ "URL;https://secure.fundsupermart.com/main/fundinfo/dailyPricesHistory.tpl?id=Sheet1.Range("H1").Value", Destination:=Range( "A1"))

$$Excel-Macros$$ export table to Excel from a link

2013-10-02 Thread asdhhc
link is : https://secure.fundsupermart.com/main/fundinfo/dailyPricesHistory.tpl?id=DBSAUD -- 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 co

$$Excel-Macros$$ Re: total Fridays in a range

2013-10-02 Thread asdhhc
On Tuesday, October 1, 2013 10:18:15 PM UTC+8, asd...@gmail.com wrote: > > vba returns total Fridays in A2:A6. If A2:A6 all are Fridays. The value > should be 5. > Plse refer to the attached example. -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s =TIME(2,DO:IT,

$$Excel-Macros$$ Re: total Fridays in a range

2013-10-02 Thread asdhhc
On Tuesday, October 1, 2013 10:18:15 PM UTC+8, asd...@gmail.com wrote: > > vba returns total Fridays in A2:A6. If A2:A6 all are Fridays. The value > should be 5. > -- 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

Re: $$Excel-Macros$$ Re: total Fridays in a range

2013-10-02 Thread asdhhc
On Wednesday, October 2, 2013 4:07:13 PM UTC+8, ashish wrote: > > can u share hw wuld u like to see thn > > if SUM((WEEKDAY(A2:A6)=6)) = 5 then .. > > On Wed, Oct 2, 2013 at 1:01 PM, > wrote: > >> >> >> On Tuesday, October 1, 2013 10:18:15 PM UTC+8, asd...@gmail.com wrote: >>> >>>

$$Excel-Macros$$ Re: total Fridays in a range

2013-10-02 Thread asdhhc
On Tuesday, October 1, 2013 10:18:15 PM UTC+8, asd...@gmail.com wrote: > > vba returns total Fridays in A2:A6. If A2:A6 all are Fridays. The value > should be 5. > run your vba, the result as shown on Snap2.png is not I wanted. -- Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wa