Znajdz w wierszu zmienną i jak jest to kopiuj kolumnę do innego arkusza

Witam mam napisany kod vba:

Po delikatnych modyfikacjach działa. Ale nie jest uniwersalny. Gdyż aby było wszystko ok to musiałbym go powtórzyć 8 razy bo tyle mam zmiennych (Szukanych fraz). Są to nazwy interesujących mnie kolumn.

Czy można to zmienić w jakąś pętlę aby zastąpić nią "Szukaną frazę". Proszę o kilka wskazówek.

Pozdrawiam,
Marcin Dargiewicz

0 4

Tak bez sprawdzania pisane:

0

Witaj. poniżej kilka modyfikacji i załącznik do kodu. pokazujący w przybliżeniu o co mi chodzi. Plik '1.xls' to baza źródłowa, z której kopiuję kolumny, plik '2.xls' to miejsce docelowe. Są tam 2 zakładki. 1 to 'Dane', czyli miejsce docelowe, 2 to 'Dekoder' - zawiera nazwy wyszukiwanych kolumn. Cel jest taki by w bazie wyszukać kolumnę po nazwię i jeżeli jest to zaznaczyć i przekopiować do pliku 2.xls do zakładki Dane, a jeżeli nie ma to dać komunikat, ze należy dokonać zmian nazw i zacząć od początku.

Pozdr.
MD

0

Witam,
może ktoś umie robić coś na kształt jeżeli(wyszukaj poziomo(. Ja próbowałem problem z moimi danymi rozwiązać jak poniżej i ale niestety lipa.

Pozdrawiam i z góry dziękuję za pomoc.
Marcin Dargiewicz

0

Witam,
poniżej ostateczne rozwiązanie. Działa rewelacyjnie. Załączam także pliki z makrem. Miłej zabawy.

0