• Najnowsze pytania
  • Bez odpowiedzi
  • Zadaj pytanie
  • Kategorie
  • Tagi
  • Zdobyte punkty
  • Ekipa ninja
  • IRC
  • FAQ
  • Regulamin
  • Książki warte uwagi

[VBA Outlook] Znalezienie ostatniego uzywanego wiersza w Excelu

Aruba Cloud VPS - 50% taniej przez 3 miesiące!
0 głosów
343 wizyt
pytanie zadane 27 marca 2017 w Inne języki przez VitGryfny Użytkownik (620 p.)

Witam Forum!

Pisząc makro z poziomu Outlooka próbuję otworzyć plik Excela i pobrać z niego ostatni używany wiersz. Wszyskie próby kończą się niestety błędem Run-time error: '424' Object Required przy próbie przypisania do zmiennej last_row.

Czy poniższy kod posiada jakiś błąd? Uprzedzam, że Arkusz Sheet1 istnieje!

Set xlApp = CreateObject("Excel.Application")
Set xlWB = xlApp.Workbooks.Open("\\networklocation\file.xlsx")
last_row = xlWB.Sheets("Sheet1").Range("A" & Rows.Count).End(xlUp).Row

Pozdrawiam,

Witek

1 odpowiedź

0 głosów
odpowiedź 12 maja 2017 przez Czachuu Obywatel (1,160 p.)

Witam,

w outlook'u nie istnieje zmienna "xlUp", jest to zmienna zdefiniowana w excelu, więc w outlooku trzeba ją zadeklarować:

Private Const xlUp as long = -4162

 tak samo właściwość "Rows" nie istnieje w outlooku, trzeba pokazać że jest to właściwość obiektu Sheets w aplikacji excel, czyli:

xlWB.Sheets("Sheet1").Rows.Count

pozdrawiam

Podobne pytania

0 głosów
1 odpowiedź 2,285 wizyt
pytanie zadane 23 września 2017 w Visual Basic przez Adam Domański Początkujący (370 p.)
0 głosów
0 odpowiedzi 1,286 wizyt

93,093 zapytań

142,054 odpowiedzi

321,492 komentarzy

62,435 pasjonatów

Motyw:

Akcja Pajacyk

Pajacyk od wielu lat dożywia dzieci. Pomóż klikając w zielony brzuszek na stronie. Dziękujemy! ♡

Oto polecana książka warta uwagi.
Pełną listę książek znajdziesz tutaj

Wprowadzenie do ITsec, tom 1 Wprowadzenie do ITsec, tom 2

Można już zamawiać dwa tomy książek o ITsec pt. "Wprowadzenie do bezpieczeństwa IT" - mamy dla Was kod: pasja (użyjcie go w koszyku), dzięki któremu uzyskamy aż 15% zniżki! Dziękujemy ekipie Sekuraka za fajny rabat dla naszej Społeczności!

...