VBA - kopiowanie z textbox do pierwszej wolnej komórki

Cześć,

chcę napisać makro, które ma kopiować wartości z textbox'ów (które są w UserFormie) do pierwszej wolnej komórki w kolumnie.
Ma to wyglądać tak: użytkownik po wpisaniu wartości w textbox'ach naciska "OK" i te wartości mają się przekopiować w pierwszą wolną komórkę w kolumnie.

Do tej pory zrobiłem coś takiego:



Ale ten kod nie działa.
Mam bardzo małe doświadczenie jeśli chodzi o VBA dlatego proszę was o pomoc.

Dzięki!

W jaki sposób objawia się "niedziałanie"?

Loker napisał:

W jaki sposób objawia się "niedziałanie"?

Nie działa w taki sposób, że w kolumnie "A" nie wstawia wartości z textbox'a a przy drugiej linijce kodu przestaje działać i wyświetla błąd "1004: Application-defined or object-defined error".

Czy ma ktoś pomysł co może być źle?

lch86 napisał:

Ale ten kod nie działa

Jak się próbuje wpisać coś w ostatnią komórkę arkusza ... plus 1 to tak jest ...
... "End(xlDown).Offset(1"

Cytat:

Jak się próbuje wpisać coś w ostatnią komórkę arkusza ... plus 1 to tak jest ...
... "End(xlDown).Offset(1"

Kod: text

Zaloguj się, aby zobaczyć kod

Racja wpisywało w ostatnią komórkę arkusza. Zmieniłem z wiersza 4 na 3 i teraz już wszystko działa

Dzięki

Spróbuj w ogóle tak:

Przykładowe sposoby wyliczenia ostatniego pełnego wiersza: