Excel Pobieranie Kursu Waluty Forex

15 lis 2007, 13:45 Ja bym zrobi tak. Excel® W Robi arkusz z zrzutem (Import kwerenda) strony internetowej NBP a w 2 arkuszu wybieram z pierwszego arkusza interesujco mnie warto na wszelki wypadek daje zabezpieczenia jakby dane stronie si zmieniy pozycjami na. Dodatkowo mona sprbowa przez makro zrobi aktualizacje przy otwarciu dokumentu. Nawet nie trzeba makra bo w excelu mona ustawi kwerend nicht aktualizacje przy otwarciu dokumentu. quotInwestycja dugoterminowa zu inwestycja krtkoterminowa, ktra nie wyszaquotMakro - Importowanie kursw walut z Internetu Masz do cigego sprawdzania kursw walut. Zu makro pozwoli Ci na importowanie danych kursw EUR, USD i CHF CHF Internetu. Dziki jednemu przyciskowi moesz pobra aktualny kurs walut i Robi przeliczenia z wykorzystaniem tych kursw Sub ImportowanieWalut () ImportowanieWalut Makro Makro zarejestrowane 2009-07-17, autor Matik Mit ActiveSheet. QueryTables. Add (Anschluss: URLkursy-walut. mybank. pl, Reiseziel: Range (A1)).Name kursy-walut. mybank. pl. FieldNames Wahr. RowNumbers Falsch. FillAdjacentFormulas Falsch. PreserveFormatting Wahr. RefreshOnFileOpen Falsch. BackgroundQuery Wahr. RefreshStyle xlInsertDeleteCells. SavePassword Falsch. SaveData Wahr. AdjustColumnWidth Wahr. RefreshPeriod 0.WebSelectionType xlSpecifiedTables. WebFormatting xlWebFormattingNone. WebTables 1.WebPreFormattedTextToColumns Wahre. WebConsecutiveDelimitersAsOne Wahr. WebSingleBlockTextImport Falsch. WebDisableDateRecognition Falsch. WebDisableRedirections Falsch. Refresh Background: false End With Range (A5: D36).Select Selection. ClearContents ActiveWindow. SmallScroll Down: -30 Bereich (A1: D1).Select Selection. Font. Bold True Range (C7).Select Säulen (C: C).ColumnWidth 11.86 Säulen (B: B).ColumnWidth 10.57 Range (D1: D5).Select Selection. ClearContents Bereich (A1). Wählen Sie End Sub Nach Makro importuje kursy walut ze strony kursy-walut. mybank. pl. Eine oto co uzyskamy po uruchomieniu tego makra