galima
bet man reikia kad duomenis paimtu is vieno puslapio ir tada ikeltu, kaip
paprasta VALUE
interneto puslapyje kas 10s atnaujinami duomenis, kurie reikalingi, kad butu
"DATA"$A$41
"Raimis" parašė naujienų news:lf17ak$avu$1@trimpas.omnitel.net...
O kodel negalima Sheete "Rezultatas" A1 tiesiog irasyti formule
=Sheets!"DATA"$A$41 ?
"MinVodai" <minvodai@gmail.com> wrote in message
news:leqch5$p0j$1@trimpas.omnitel.net...
> Sveiki,
> Turi būti tokia veiksmų eiga:
>
> paspaudus Update mygi =>
>
> Sheets("DATA").Select
> ActiveWorkbook.RefreshAll
> DoEvents
> Sheets("DATA").Range("A41").Copy
> Sheets("Rezultatas").Select
> Range("A1").PasteSpecial Paste:=xlPasteValues
>
>
> Taciau duomenis is DATA A41 paima senus :( nesulaukia kol
> atsirefreshina duomenis is linko (http://.......)
> Gal turit ideju?
> Aciu
>
> P.S. bandziau su Application.Wait (Now + TimeValue("0:00:10")) - naudos
> nera :(
>
>