Pytanie : Przodować VBA Znalezisko Pierwszy Znalezisko kopyto szewskie

I potrzebować vba funkcja który gdy kolumna w stołowy (Listobject)
it znajdować the pierwszy i ostatni występowanie dawać sznurek. Ono the dane between
these występowanie i the rząd ciąć na arkusze, zadawalać help.

Odpowiedź : Przodować VBA Znalezisko Pierwszy Znalezisko kopyto szewskie

Używać the kod w the odrzynek, ale zamiast szpaltowy liczba (w przykład kolumna (1)) ty móc ono ten informacja od the listobject.

(1): 2: 3: 4: 5: 6: 7: 8: 9:

Jeżeli Kolumna (1).Rows (1).Value = "" Wtedy najpierw = Kolumna (1).End (xlDown). Adres Inny najpierw = Kolumna (1).Rows (1).Address Kończyć Jeżeli kopyto szewskie = Kolumna (1).SpecialCells (xlCellTypeLastCell). Adres Pasmo (najpierw & ": " & ostatni). Odbitkowy Miejsce przeznaczenia: =Workbooks (1).Sheets (2).Cells (1)