pętla excel

[VBA Excel] Pętla w pętli / wyszukiwanie kilku zmiennych

co robię źle ... Np.: brak deklaracji zmiennych "ostw" i "ostw2", jak również deklaracje innych nie wiedzieć czemu "variant", Np.: ... ostw = Worksheets("DANE").Cells(Rows.Count, "B").End(xlUp).Row ostw2 = Worksheets("LOG").Cells(Rows.Count, "B").End(xlUp).Row Zapis " Rows.Count " odnosi się do bieżąco aktywnego arkusza, a nie do arkusza "DANE", czy...

[Excel] - Pętla przenosząca dane z kolumny A co C

[syntax=vb] Sub MojeKopie() Dim r&, myCopy As Boolean slowa = Array("Period", "Account", "Terminal") For r = 2 To Cells(Rows.Count, "A").End(xlUp).Row myCopy = True For Each slowo In slowa If Cells(r, "A").Text Like "*" & slowo & "*" Then myCopy = False Exit For End If Next If myCopy Then Cells(r, "A").Copy Cells(r, "C") Next End Sub [/syntax]

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

Excel VBA: Pętla przestaje działać po dodaniu dodatkowego kodu

le bez niego nie wiem jak to zrobić inaczej aby znaleźć w drugim arkuszu nazwisko wybranego pracownika. Tak jak Maciej wcześniej pisał, bez załącznika ciężko cokolwiek doradzić ale tak bez sprawdzania na szybko zrób tak. Tą linijkę usuń [syntax=vbscript]Set SzukaneNazwiskoRow = tb_GrafikTSW.ListColumns("NAZWISKO_TSW")...

VBA,EXCEL - podwójna pętla do kopiowania/segregowania danych

Co do twojego kodu, .Range/.Cells - odwołuje się do aktywnego arkusza? Chodzi mi o te kropki na początku. Nie, odwołuje się do obiektu - w tym wypadku arkusza - użytego w otaczającej klauzuli With... To taki skrótowiec, którzy przed kropką wstawia to, co jest w With, czyli zamiast powtarzać: Przy próbie tworzenia kolejnego arkusza wywala błąd 1004...

Konwersja wielu plików CSV na format Excel (xlsm) - pętla i zachowanie nazw

[syntax=vbscript]Sub Konwersja() With Application.FileDialog(msoFileDialogFold... .Title = "Wybierz folder z plikami CSV" .InitialFileName = Environ("userprofile") & "\Desktop" If .Show = -1 Then f = .SelectedItems(1) End With If f = "" Then Exit Sub x = "\PlikiExcel" If Dir(f & x, vbDirectory) = "" Then MkDir (f & x) csv = f &...

Excel VBA - Pętla Do While Loop nie przeskakuje na kolejne arkusze

zapomniales Dir() przed Loop tj. plik=Dir()

Excel VBA - Pętla For next w połączeniu z Select case - ustawienie parametrów

Na pewno błąd jest w wierszu: [syntax=vbscript]Progresywne = Progres + Progres[/syntax] Nie zachowujesz dotychczas obliczonych składników, tylko ostatni pomnożony przez 2. Powinno być: [syntax=vbscript]Progresywne = Progresywne + Progres[/syntax]Nie wykluczam, że mogą być też inne błędy, ale do dokładnej analizy potrzebny jest załącznik w pliku.

Excel VBA - Pętla pobierająca dane z komórek i wyrzucająca dane do komórek

Jest w kodzie arkusza (nie w module). Procedur zdarzeniowych oraz 'Private' nie widać w menu 'Makra'.

VB Excel – Jaka pętla do zapisu studentów w kolejne wiersze i czyszczenia TextBox?

Do tego nie jest Ci potrzebna żadna pętla. Najpierw musisz sobie określić pierwszy wolny wiersz w arkuszu [syntax=vb]a = Sheets("Arkusz1").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row[/syntax] Później po wpisaniu do arkusza danych z pól tekstowych zostaje Ci jedynie zwiększyć wartość a o 1

VBa Excel(makro, Pętla do utworzenia "Listy" wpisywanej w arkusz Exela

Podobny sposób do zablokowania kontrolki - dający efekt "wyszarzania", ale samego tekstu - można uzyskać ustawiając właściwość Enabled kontrolki na False. Excel faktycznie nie obsługuje wyszarzenia całej kontrolki, chyba że jej BackColor zmienisz ręcznie ;).

VBA Excel - poszukiwanie odpowiedniego makra - pętla x ile.niepustych

Uruchom poniższy kod w aktywnym Arkuszu3 [syntax=vb]Sub z() Dim iLstRw% Dim iLstNmRw% Dim rRng As Range j = 3 With Sheets("Arkusz1") iLstNmRw = .Cells(Rows.Count, 6).End(xlUp).Row Set rRng = Range(.Cells(6, 6), .Cells(iLstNmRw, 6)) End With iLstRw = Cells(Rows.Count, 1).End(xlUp).Row For i = 7 To iLstRw rRng.Copy Destination:=Cells(j, 9) Range(Cells(j,...

Excel VBA - Jak stworzyć pętlę do losowania liczb w UserForm?

google -> VBA pętla for Linków tam od groma :)

[Excel] [VBA] Pobieranie danych z Listbox do komórki - pętla

U mnie drukuje poprawnie. Jaki masz komunikat błędu?

Dodawanie pozycji do bazy przez Userform jaka pętla VBA excel?

Udało mi się uporać z usuwaniem wybranej pozycji. Natomiast nadal jest problem z dodawaniem, tzn. dopóki dodaję kolejne pozycje do bazy i nie zamknę userforma z dodawaniem jest prawie ok. Prawie, bo baza nie zawsze na bieżąco aktualizuje listboxa. Większy problem pojawia się wtedy kiedy zamknę userforma odpowiadającego za dodawanie firmy do bazy i włącze...

Excel/VBA pętla na wykresy

Temat rozwiązany na innej grupie - do zamknięcia

Excel - pętla do While a przeglądanie wybranych rekordów

Czy istnieje możliwość definicji zmiennej pętli do while na wybrane przez siebie liczby? Potrafię zdefiniować zmienną w ten sposób, by zwiększała się ona tak jak na przykładzie o wartość dowolnej liczby: wiersz=1 Do While Range("A" & wiersz) <> "" wiersz = wiersz + 1 Loop Chciałbym zamiast przeglądania każdego rekordu z przedziału ("wiersz+1",...

(Excel) Pętla przydzielania pod względem wymaganej liczby

Ponawiam temat. Czy jest ktoś w stanie mi pomóc?

MS EXCEL - Excel - pętla do obliczania amortyzacji.

Może najpierw wypróbuj wbudowane narzędzia Excela, a VBA w ostateczności? Mam na myśli: Dane>Analiza symulacji>szukaj wyniku oraz menedżera scenariuszy.

Excel - Powtarzanie dla wartości, pętla w makrze

Dzień dobry! Potrzebuje kod w makrze Założenia: Będzie powtarzał daną wartość np. 3000 lub tekst w danej kolumnie w askusz1 oraz powtarzał daną wartość np.0000 lub tekst 2 w arkuszu 2

Excel- skrypt, pętla która by drukowała dokument po zmianie

Nie wiem dokładnie co masz na myśli, pisząc: po zmianie numeru komórki A1 do określonego zakresu niemniej wydaje się, że powinieneś do tego zadania wykorzystać zdarzenie arkusza "Change". Przykładowo, w module VBA arkusza, który drukujesz , możesz umieścić kod: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target,...

Excel VBA: Rozbudowa kodu dla przycisków ActiveX i ukrywania kolumn

Ech, pomyliły mi się te plusy z minusami :) Trzeba zamienić warunki pętli.

Excel - Jak wypisać wspólne liczby z wierszy w oddzielnych komórkach?

Coś więcej o tych liczbach? Czy się powtarzają w obrębie wiersza? Czy liczbę z kolumny A chcesz porównywać tylko z innymi w kolumnie A? Czy są uporządkowane rosnąco w wierszu? W każdym razie - w załączniku przykład takiej metody "brute-force" z zagnieżdżonymi pętlami.

EXCEL - 'wygladzanie' odchylenia standardowego ze zbioru liczb.

Cóż... Różnice w najwczesniejszym załadunku a najpozniejszym były raczej losowe. Myślałem wczoraj np żeby uprościć cały proces do wprowadzenia formuły licz.jezeli z kryterium że jeżeli w kolumnie dana godzina występuje więcej niż 5 razy. To ma przesunąć godzinę o 15 minut w tył. Tylko Excel wywala mi błąd nawet nie mogę oszacować formuły. Podejrzewam...

VBA w Excel: Pętla do kopiowania numerów rejestracyjnych w kolumnie WYNIK

kolumna "POCZĄTEK" ma byc lub zamiast niej WYNIK? Dodano po 3 Na zdjęcie moglo byc nazwy kolumn(A, B, etc.) i początkowy wiersz. Dla VBA to jest wazne

VBA Excel: Pętla DO WHILE nie działa poprawnie - analiza kodu Makro2

zamykam

VBA excel - Pętla złe wartości, generowanie wykresu na podstawie danych

A jaki jest algorytm liczenia tych biorytmów? Po mojemu masz zły wzór, skąd go brałeś?. Wartości się zmieniają, tylko są to tak małe zmiany (na 11 pozycji po przecinku), że w komórce tego nie widać. Dodatkowo, jeżeli - jak przypuszczam - chcesz policzyć ilość dni życia i podzielić je przez coś, to w tej części wzoru: kolejność działań - i najpierw podzieli...

excel [VBA] zmiana właściwości ScrollBar w arkuszu za pomocą makra

Na podstawie samego kodu, to nie jest oczywiste. Powinnaś załączyć plik z tym kodem i napisać w którym dokładnie miejscu kodu występuje błąd. Poza tym kod jest trochę dziwny. Ile masz arkuszy o nazwie "aaaa"? Po co ta pętla? Czy pasek ScrollBar ma faktycznie numer 2?

Excel VBA - Eksport wierszy z warunkami do pliku zewnętrznego

Załącz plik będzie prościej. Przeskakuje, bo skąd program ma wiedzieć co to jest "kol4" i "kol5"? Nie zdefiniowałeś do czego ma się ta zmienna odnosić. W tym przypadku stwierdza, że kol4 = "" i dlatego kończy pętle.

Jak w VBA Excel 2007 wstawić tekst z InputBox do kolejnej wolnej komórki?

zwykła pętla "while" załatwi sprawę :) http://dzono4.w.interia.pl/kurs/doloop.h...

[Excel VBA] Jak automatycznie wstawić numer arkusza do komórki A5 w 200 arkuszach?

a jak na sztywno wstawić do np komórki "A5" cyfry zakresu od 1 do 50 w odpowiednim zakresie arkuszy np od 100 do 150 taka (pętla iteracyjna)?

[VBA] [EXCEL] - Prosta pętla i uzupełnianie wartości w zależności od punktacji

Witam, mam pytanie odnośnie prostego ćwiczenia w VBA które chciałbym trochę udoskonalić. Jest to prosta sprawa więc pewnie nie będziecie mieli z tym problemów. Makro działa ok, ale chciałbym je jakoś poprawić/udoskonalić? Poniżej kod oraz prosty przykład Excel. W pierwszej kolumnie zawsze będzie Imie Nazwiko, w drugiej punktacja w trzeciej ocena która...

[EXCEL- MAKRO] Pętla - ilość wykonania zależna od wartości w komórce

Witam, mam pytanie jak rozwiązać następujący problem mam komórkę, która przyjmuje określoną wartość np. 4 chciałbym, żeby makro pobrało tą wartość i wykonało jakąś czynność tyle razy ile jest wpisane w tej komórce np: ActiveWorkbook.Sheets("Zes").Activate Range("A2").Select Do If IsEmpty(ActiveCell) = False Then ActiveCell.Offset(1, 0).Select End If...

VBA Excel - Makro do formatowania danych i sprawdzania poprawności danych

Po mojemu, nie ma tu nic skomplikowanego, jedynie "trochę" grzebaniny... Pętla z zastawieniem kilku sideł w postaci instrukcji warunkowych i jazda. Excel nie jest od poprawiania błędów językowych, więc to zostawiłbym Word'owi, albo w ogóle się nie przejmował. Wstawienie grafiki do formularza nie jest problemem. Rzecz w tym, żeby przygotować źródło w...

[Excel, VBA] - Makro - pętla kopiuj-drukuj (z filtrem)

takie coś wymysliłem że jeśli ktoś sobie założy filtry to potem skopiuje CRM do innego nowo powstałego arkusza i wtedy bedzie wklejac... ale jeszcze pętle bym potrzebował bo ja zrobilem sobie na A2 A3 A4 tylko tak zeby zboaczyc czy bd chodzic [syntax=vb]Sub drukuj() ' ' drukuj Makro ' ' Klawisz skrótu: Ctrl+Shift+Z ' Sheets("Dane").Select Range("B2:B370").Select...

Excel VBA: Makro do wypełnienia dat w komórkach A2 w 31 arkuszach

A jak dokładnie są nazwane arkusze? Cała data, czy tylko numer dnia? Jeżeli cała data to: Sub NazwaArkusza() Range("a2") = ActiveSheet.Name End Sub przy numerze dnia: Sub NazwaArkusza() Range("a2") = ActiveSheet.Name & ".02.2011" End Sub To jest tylko dla jednego arkusza. Dla większej ilości...

excel vba makro petla kopiowa - problem, excel, vba, makro, pętla kopiowanie

Heja yyyyy przyznam że tak to opisałeś że... ciężko to dobrze zrozumieć :P Ale ok na początek napiszmy programik który: 1. "przeleci" przez wszystkie pliki z katalogu (do którego ścieżkę musisz wpisać w kodzie) 2. weźmie nazwę pierwszego z tych plików 3. otworzy go (np 1.xlsx) 4. z otwartego pliku skopiuje zakres 5. wklei ten skopiowany zakres do naszego...

Excel 2010 VBA - Jak zliczyć komórki według koloru czcionki?

Ta funkcja (choć właściwie powinna to być makroinstrukcja typu Sub, ale Excelowi to nie robi różnicy) liczy poprawnie, tylko prawdopodobnie nie o taki wynik chodziło. Ona sprawdza każdą kombinację danych z każdego wiersza, więc ponieważ są 4 jedynki, 2 cyfry kolorowe i 4 litery A, więc zwraca wynik: 4*2*4 = 32. A jaki jest wynik oczekiwany? Czy chodzi...

Excel VBA: Makro do kopiowania danych z Zeszyt1 do Zeszyt2 według KOLOR i TYDZIEŃ

Wystarczy zwykła pętla z wieloma warunkami. Zobacz przykład (funkcja VBA) w [url=http://www.elektroda.pl/rtvforum/to... temacie.

[VBA Excel] Jak wyszukać wiersz z kierowca i NIE w dwóch kolumnach?

Nie mogę dopasować tamtych wcześniejszych rozwiązań Bo trzeba to robić w pętli, gdyż 'Find' zatrzymuje sie na pierwszym znalezionym. pętla ... Dlatego najprościej O właśnie ... I drugi wariant: 902630

Excel - Modyfikacja pętli for - wpisywanie liczby porządkowej zamiast numeru wiersza

Z góry na dół. Pętla działa od dołu bo jest bardziej uniwersalna, natomiast numerować ma z góry do dołu aż braknie danych.

[exel] VBA Excel: Błąd w porównywaniu pustych komórek w pętli Do Until

To cała pętla? Brakuje Loop a instrukcja Exit Do powoduje opuszczenie pętli już w pierwszym przebiegu... Przy takim zapisie a = a + 2 porównujesz co drugą parę. Chyba, że tak właśnie ma być...

VBA Excel - Wpisywanie nazwy aż do ostatniego wypełnionego wiersza

Ale dlaczego pętla for? Bardziej naturalna to będzie np. taka pętla: [syntax=vbnet] Dim Y As Long Y = 1 Do While Cells(Y, 1) <> "" If Cells(Y, "B") = "" Then Cells(Y, "B") = "XXX" Y = Y + 1 Loop [/syntax]

Excel VBA - Błędy w działaniu kodu: niepoprawne wczytywanie danych, błędne porównanie kolumn

Tak się domyślałem. Po co w takim razie pętla czytająca pliki ?

Excel - Makro - kopiowanie wierszy do jednego pliku

Przejdź krokowo (klawisz F8) i zobacz ile kroków wykonuje pętla. Może trzeba zmienić warunek, może kolumnę. Nie wiem, nie widzę pliku źródłowego... Jeśli działało Ci to (na tylu zmiennych obiektowych) dla jednej linii, powinno działać w pętli.

c++ - Błędy w programie: pętla while i formatowanie wyjścia

1. ^ to operator logiczny alternatywy rozłącznej. Co on tu robi? Raczej chodziło Ci o potęgowanie. Nie ma operatora potęgowania - trzeba użyć funkcji. Operator potęgowania w postaci ^ to, jeśli dobrze pamiętam, tylko Basic wykorzystywał (i Excel ;) ) 2. Rozmiar tablic dynamicznych podaje się w nawiasach kwadratowych. Nie wiem, co oznacza zapis stworzony...

VBA Excel Przerwanie pętli po zmianie aktywnej komórki

Witam, Mam problem z przerwaniem pętli oczekującej na dane z portu COM. Makro które napisałem ma za zadanie odczytać wartość z urządzenia zewnętrznego, ale dopiero jak na urządzeniu zostanie naciśnięty odpowiedni przycisk. Chciałbym aby działanie makra wyglądało w ten sposób, że użytkownik klika na dowolną komórkę, w której chce wprowadzić dane, wysyła...

[VBA] excell - makro wykonujące się coraz dłużej przy kolejnych pętlach

1. pobiera listę plików .xlsx w folderze 2. usuwa zakładki, tworzy nowe i orzenosi dane z pobranego pliku z folderu 3. przenosi dane z jednej zakładki do finalnej KOR 4. przenosi poszczególne wiersze z zakładki RAT do zakładki KOR do tego samego wiersza jako kolejne kolumny 5. tworzy nowy plik z danymi z zakladki KOR, zapisuje i przechodzi do pkt 1...

VBA: Tabelka Excel jako treść maila, pętle, adresaci, utrzymanie stopki

Tabelka w mailu nie będzie Excelem, to raczej Word. Jeżeli wyślesz załącznik to będzie prawdziwy Excel. Zależy co jest dla Ciebie ważne. A czy potrafisz tę tabelkę z pola w kolumnie F zapisać gdzieś w Excelu jako tabelkę? To wtedy możesz zamienić to na HTML i wkleić do maila - są na to gotowce, też takiego używam. Tylko uwaga: HTML sklejony z innym...

EXCEL - Kończenie pętli po osiągnięciu numeru wiersza podanego w innej komórce

Wrzuć spakowany, nie wszyscy ufają takim "przechowalniom". Albo wklej samą pętlę. W skrócie: Jeśli For-Next to nie ma problemu. Jeśli 'Do', to wstaw licznik. W obu przypadkach, gdy licznik osiągnie zadaną wartość =Range(tu adres komórki), wtedy Exit Sub.

Przypisanie wartości wypełnieniu pola komórki Excel 2007

Zasugerowałem się przyciskiem "kolor wypełnienia" w Excel2003. Jest tam tylko 40 kolorów. Sądziłem że sa po kolei ale jak przed chwila sprawdziłem - myliłem się. W zestawie 40 nie ma np ciemnego żółtego co będzie wpływać na ewentualne obliczenia. Więc we wszystkich makrach powyżej należy poprawić 40 na 56. (W przypadku pierwszego makra wydłuży to jeszcze...

Pętla nie zatrzymuje się przy użyciu InputBox zamiast zakresu w Excel VBA

Witam To fragment kodu z ktróym mam problem i szukam pomocy Do taj pory kod sprawdzał czy w komórce jest wartość i petla działała tak długo jak zakres. Jednak w wypadku kiedy zamiast zakresu dam InputBox czyli "y" petla wstawia w okno przegladarki tekst który jest cały czas wpisany w okno i nie przerywa petli mimo ze w kolumnie B nie ma wiecej wartości....

[Excel] VBA makro - przypisanie punktów do usług z różnych grup

Poszukaj informacji na temat sortowania bąbelkowego. Tak się składa, że w VB litery i łańcuchy też można porównywać. "b">"a", "Alicja">"Ala" itd Musiałbyś kopiować dane ze wszystkich kolumn wiersza do tymczasowej tablicy, co pokazałeś że potrafisz już robić. Sumowanie najlepiej zrobić funkcją SUMA.JEŻELI. W VB Aplication.WorksheetFunction.SumIf(argum...

Alan 48 Excel - Ciągły szum, brak odbioru i nadawania po latach nieużywania

r"]VCO to generator impulsów ? To serce odbiornika superheterodynowego. Od niego zależy częstotliwość pracy odbiornika jak i nadajnika. Jeśli nie będzie generować odpowiednich częstotliwości dla danego kanału lub w ogóle nie będzie pracować to będzie tylko szum, a odbiornik będzie martwy. Dodam że do stabilizacji częstotliwości VCO służy pętla fazowa...

Excel - Jak sumować wartości z tej samej komórki do innej?

Tu nie ma pętli...

Excel VBA – jak scalić i obramować komórki kodem w programie magazynowym?

Aaa, to spróbuj Private Sub TextBox1_Change() Dim tekst As String, wynik As String tekst = TextBox1.Value wynik = TekstEtykiety(tekst, "Magazyn") If wynik <> "" Then Label1.Caption = wynik Else wynik = TekstEtykiety(tekst, "Magazyn2") If wynik <> "" Then Label1.Caption = wynik...

VBA Excel - Jak odkryć pojedynczy ukryty wiersz po kliknięciu przycisku?

Sposobów pewnie jest kilka. Np taka pętla: [syntax=vb]Dim kom As Range For Each kom In Range("A10:A90") If Rows(kom.Row).Hidden = True Then Rows(kom.Row).Hidden = False Exit Sub End If Next[/syntax]

[VBA] [EXCEL] - kopiowanie w pętli wybranych komórek z tabel arkusza

A mi się otwierają w 2016. Może masz coś nie tak z office2016? edit ------------------------------------ Na Twój problem: [syntax=vbnet]Sub Przenies() Dim x As Double, ostatni_wiersz As Double ostatni_wiersz = Sheets("Arkusz1").Cells(Sheets("Arkusz1"... 1).End(xlUp).Row For x = 1 To ostatni_wiersz Sheets("Arkusz2").Cells(3 + x * 12 - 12, 2)...

Excel/VBA - Makro do aktualizacji danych z innego skoroszytu z różnymi kolumnami

Makro niemal prosto z rejestratora, jeśli się nie mylę. Co, jeśli w arkuszu źródłowym będzie więcej niż dwie pozycje? Powinieneś pójść krok dalej i zainteresować się pętlami.

Jak filtrować pozycje? Arkusz Excel, useform i listbox.

Lecz pomimo jej przefitrowania w listboksie widzę wszystkie pozycje. Jak zrobić bym widział tylko te po filtracji? Najszybciej przez 'additem' (czyli pętla po widocznych komórkach i ładowanie do listboksa)

Excel VBA: Jak wyczyścić zakres F6:AJ95 omijając co trzeci wiersz?

... po dodaniu tego kod zaczyna bardzo długo pracować ... Nie obserwuję tego na "prostych" danych, ale spróbuj może w ten sposób: [syntax=vbscript]Option Explicit Sub Czysc_Wszystko_2() Dim czas As Single: czas = Timer If MsgBox("Wyczyścić wszystkie formularze 'Dniówek'?", vbQuestion + vbYesNo, "Potwierdź") = vbNo Then Exit Sub Dim i As Integer, w...

[EXCEL, VBA] - Usuwanie odpowiedniej ilości wierszy

Piszesz, że dane są kopiowane z faktury do arkusza "Raport zbiorczy" ale z kodu wynika, że operujesz cały czas na jednym arkuszu - odwołujesz się do Range niepoprzedzonego innymi nazwami arkuszy... Najpierw przypisujesz jakieś wartości komórek do zmiennych, a potem te zmienne wypisujesz na inne komórki - nigdzie tu nie widać zmiany arkusza. To jak to...

Makra Excel - zawieszanie się pętli do until loop przy usuwaniu wierszy

Skoro raport ma 300000 wierszy, to zmienna i musi być zadeklarowana jako long. W którym miejscu Twoje makro się zatrzymuje? A tak w ogóle to zamiast mozolnego porównywania każdej komórki z elementami tablicy przy pomocy pętli to poszedłbym w sprawdzenie przy pomocy odpowiednika arkuszowej funkcji PODAJ.POZYCJĘ czy wartość danej komórki jest w tablicy....

VBA Excel - Jak poprawnie zagnieździć pętle do kopiowania zakresów?

Chyba trzeba wstawić licznik do pętli. Sprawdź [syntax=vb]Sub Dostawy() Dim OstWiersz As Long Dim j As Integer, l As Integer Dim LArkuszy As Integer, LArkuszy2 As Integer, LWierszy As Integer Dim zakres As Range, zakres2 As Range, licznik As Integer 'kopiuję dane do nowego arkusza Sheets(1).Copy after:=Sheets(1) OstWiersz = Sheets(2).Cells(Cells.Rows.Count,...

Excel 2003: Jak zliczyć wartości w kolumnie na podstawie innej kolumny?

Najprościej napisać makro w VB i skorzystać z pętli

Excel - sumowanie wartości w nowo tworzonych arkuszach

Najprościej nazwać arkusze i odpowiednio ustawić je na pasku zakładek. Ten z sumą nazwij "Suma" i ustaw go jako pierwszy z lewej. Pierwszy ze składnikiem/składnikami nazwij "Pierwszy", ostatni "Ostatni" Jeśli nowe arkusze będą wstawiane pomiędzy "Pierwszy" i "Ostatni", wystarczy Np taka formuła Dodano po 13 :arrow: markoz7874 A jeśli zakres będzie wielokomórkowy?...

EXCEL - Wyszukać z kolumny jedno z kilku nazwisk/w komórce

która przyrasta o jakieś 500 wierszy miesięcznie W jaki sposób dodawane są wiersze? Może trzeba zmodyfikować sposób importu danych? W takiej formie, funkcjamii wbudowanymi nie będzie łatwo. Prościej byłoby napisać własną (Split i zliczanie w pętlach)...

Excel VBA – makro do generowania ciągów z liczbami z nawiasów (zakresy, przecinki)

Pętla, podstawianie (replace), porównywanie długości ciągów (len), rozbijanie ciągów (split), podstawianie, porównywanie, rozbijanie, itd. W zależności, czy warunek spełniony wstawianie wiersza, dodanie wartości, mnożenie *10, lub przepisanie. Mnóstwo kombinacji, ale do zrobienia.

Excel: Jak wylosować sumę wartości z zakresu C3:C23 z tolerancją 10% E2?

Tylko makro i pętle w pętlach z formułą sprawdzającą za każdym przejściem wynik i jego tolerancję z E2. Swoją drogą to ciekawą pracę domową dał wam sor na święta, aczkolwiek nie za trudną - takie podstawy wykorzystania pętli :)

VBA - excel - Vba excel makro do przerabiania plików

Będę bardzo wdzięczna za pomoc Na forum jest wiele podobnych przypadków. Proponuję nagrać makro, a następnie użyć metod (pętli) ze wspomnianych przykładów.

Vba Excel - Makro wyszukujące ciąg znaków i zmieniające jego czcionkę

Mam problem z dokończeniem makra w vba, mianowicie chce wyszukać wyrazy (znaczniki html) wpisane do komórek w excel-u, w całym arkuszu. Arkusz posiada 5 kolumn i około 6000 wierszy. Po wyszukaniu wyborderować i zmienić kolor ich czcionki na czerwony. Zdaje się, że źle się do tego zabierasz. Na razie pętla mieli A1 i na oko będzie mielić bez końca (pętla...

Excel- Kwestionariusz pracownika. Rozszerzenie możliwości pliku

Jeżeli "Kierownik" to zakres paru komórek które mają być wyświetlane w comboboxie to wystarczy kod: [syntax=vb]cmbSzef1.RowSource = "Kierownik"[/syntax] bez żadnych zmiennych i pętli.

Excel 2010 - Makro do kopiowania danych z wielu plików do jednego pliku B

No tak... Po wstawieniu kolejnych kolumn, formuły przesuwają się w prawo i zmieniają argumenty. Musisz przeliczyć, lub podstawiać formuły w osobnej pętli.

Excel VBA: Jak archiwizować umowy w nowym wierszu arkusza?

Tablica, pętla i jazda. Podepnij pod przycisk taki [syntax=vb]Sub rejestracja1() Dim zakres As Variant, i As Integer, ostW As Long zakres = Array("D2", "C4", "C13", "A21", "D48") With Sheets("Spis umów") ostW = .Range("A65536").End(xlUp).Row + 1 For i = 0 To 4 .Cells(ostW, i + 1) = Range(zakres(i)) Next End With End Sub[/syntax]

EXCEL - makro - kopiowanie zaw. kom. do innego pliku w pętli

:arrow: TP_D Nieee, to inny temat. Załóż nowy. Zwrócę tylko uwagę (może na coś Cię to naprowadzi), że funkcję: Dir i instrukcję: Set można zastosować wewnątrz pętli...

[VBA, Excel] Jak dynamicznie odczytać wartości Checkbox'ów w VBA Excel?

Co do pierwszego spróbuj tak TablicaCenniki(1) = "ABA" TablicaCenniki(2) = "..." .... nazwy_zmiennych = TablicaCenniki(1) 'tu będzie pętla temp = Form_AktCen.Controls(nazwy_zmiennych... W "dalszych konstrukcjach" jezeli już to tak bym uprościł: Chcesz kasować cały arkusz ? Jeżeli tak wystarczy:...

VBA Excel - Kopiowanie danych uzależnionych od dat

Jeśli makro, to prosta pętla 'Do-Loop' z instrukcją warunkową. Ale, z kolumną pomocniczą, można i bez makra (załącznik)

VBa, Excel, argumenty-wlasciwości nowo dodanego Arkusza, uzupelnienie

Dlaczego, dlaczego... Taka jest składnia tego polecenia i już. Masz tu przykład połączenia kilku poleceń w jednej linijce - dodajesz nowy worksheet, w parametrze after:= podajesz po którym arkuszu ma go wstawić, a na końcu zmieniasz jego nazwę .Name na własną... Wpisz na google VBA worksheet add i otwórz tzn jak mozna to sprawdzic? Jak wyżej. Google:...

EXCEL VBA - Jak kopiować wszystkie wiersze w pętli?

Sub Makro1() With Sheets("Arkusz1") For Each zakres In .Range("A1:A5") If zakres.Text = "aa" Then Range("A1").Copy Range("C1").Select ActiveSheet.Paste End If to kopiuje tylko jeden wiersz jak tu ustawić żeby kopiiowało wszystkie wiersze z zakresu w pętli????

Excel - Filtrowanie listy na podstawie listy rozwijanej

Taka opcja istnieje, tylko że zawsze jest coś za coś. Będziesz musiał stworzyć procedurę/funkcję pobierającą z zadanego zakresu wartości, filtrującą i umieszczającą wyniki w określonym miejscu. To wszystko trzeba będzie zrobić dla każdego elementu zakresu, czyli w jakieś pętli, co dla dużej ilości elementów bardzo spowolni operację. Elementy wbudowane...

VBA excel, aktywowanie formuł przechowywanych jako tekst

Dokładnie o to mi chodzi, tylko żeby zrobić to nie w pętli, tylko dla całego zakresu od razu. Przy 100k+ wierszy powiesił mi się excel niestety. Jeśli robię to poprzez Text to column albo Zamień "=" na "=" takiego problemu nie ma. Taka pętla niestety jest zbyt wolna. EDIT: Ok, zadziałało w połączeniu z Selection , ale dla formuł które mają więcej niż...

EXCEL 2003 makro przypisujące kombinacjom danych w tabeli zdefiniowaną wartość

Dałoby się (potrzebna byłaby jeszcze jedna kolumna pomocnicza i dość długa formuła wynikowa), ale przy tej ilości wierszy przeliczanie arkusza trwałoby nieznośnie długo. Chyba żeby zrezygnować z automatu i przeliczać ręcznie. W przypadku VBA nie widzę innego sposobu jak sprawdzanie wszystkich możliwych kombinacji w pętli...

VBA Excel: Błąd w pętli przy zmianie koloru wiersza na podstawie wartości w kolumnie 15

Kod który Ci podawałem ostatnio działa tylko dla jednej kolumny, takiej samej jak Target.Column. U Ciebie nie działa bo funkcja Intersect() [zwracająca wspólną część dwóch zakresów] poza 15-tą kolumną jest teraz wywoływane na nie takich zakresach jak trzeba. Zmień początek tego makra na taki: [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range)...

Pętla VBA z funkcją konwertującą skróty na pełne nazwy w zakresie komórek

... jak się za to zabrać? :) Nie wiem czy pytający to przeczyta, ale wygląda mi to na szkolne zadanie. Tu też można pomóc. Więc tak: 1. Najlepiej poszukać w google (zakładam, że na pomoc kolegów czy nauczyciela nie można liczyć) hasła VBA Excel pętle. Na pierwszej stronie będzie trochę teorii i to po polsku. 2. Wybrać rodzaj pętli (jeżeli nie wskazano...

[Inne] VBA Excel Wstawianie zdjęć w shape, różne ścieżki

Witam Nie wiem po co ci ta pętla od 1 do 5? Ustaw zdj jako zmienna globalna i pobierzesz od razu scieżkę

[excel] [Excel][VBA] Makro do kopiowania wierszy na podstawie wartości z arkusza 2

Interesują mnie wartości z dwóch wierszy- drugiego i czwartego. (...) Chciałbym użyć makra do wyszukania tych wierszy z pierwszego arkusza, gdzie występują wartości szukane w drugim arkuszu i przekopiowanie wszystkich tych wierszy do np. 3 arkusza. Z tego wynika, że szukasz duplikatów wierszy 1 i 4 z arkusza Nr1 w arkuszu Nr2. Zdaje się, że coś pominąłeś/pomyliłeś,...

Jak automatycznie eksportować dane z Excel 2013 do XML za pomocą VBA?

poniżej plik prawie gotowy tylko hmm nie wie jak sie zabrać za petle Zanim pętla, małe porządki: 1. W tym układzie arkusza ' max_row ' zawsze będzie ' 9 ', a nigdy ' 1 ', gdyż ' Row ' (nr wiersza) zawsze poda, że ' L.p. ' leży w 9-tym wierszu 2. Zanim zastosuje się ' MkDir sciezka ', trzeba wpierw sprawdzić, czy katalog określony przez ' sciezka '...

Formuły Excel - Automatyczne zwracanie wartości w sektorach A1, A2, A3

Pozostało mi jeszcze zrozumienie tego kodu może komentarze będą pomocne :) [syntax=vbscript] Sub Zakresy() Dim ark As Worksheet Dim i&, j&, w& ' deklaracje zmiennych Set ark = ThisWorkbook.ActiveSheet ' utworzenie zmiennej obiektowej w = ark.UsedRange.Rows.Count + 1 ' określenie ostatniego wiersza powiązanego z ilością iteracji pętli i...

Excel / VBA - Generowanie tabeli C na podstawie danych z A i B

Przesiedziałam już mnóstwo godzin, przejrzałam kilka tutoriali, ale dalej jest to dla mnie czarna magia... Czy ktoś mógłby mi pomóc? Ok. przedstawiłeś logicznie jak ma to wyglądać. Ale w czym ci pomóc? Przecież to proste więc nie wiem gdzie szukałeś. Dwie pętle "for". Najpierw dla tabeli A z warunkowym "if" jak w G jest X i zapis do tabeli C. Potem...

Excel-Makro - Makro służące do generowania kolejnych plików

Moje pytania: 1. W jaki sposób opisać warunek w którym pętla będzie działać aż do znalezienia pustej komórki w kolumnie B? 2. W jaki sposób stworzyć zapis w którym komórka B1 i C1 z Arkusza1 będzie zastępowana kolejnymi komórkami z kolumny B i C z Arkusza2 i zapisywana? 3. W jaki sposób opisać kolejne komórki (A1+i)? Nie mogę znaleźć odpowiedniego...

EXCEL VBA: Tworzenie arkusza, nadawanie nazwy, wpisywanie danych w kolejnych wierszach

Zamiast: Range().Select ActiveCell.FormulaR1C1 = możesz także skorzystać z Cells(i, j).Value = wartość, gdzie i - wiersz, j - kolumna. Tu możesz się łatwo odwołać do współrzędnych, jeżeli tak byłoby Ci wygodniej. Potem pętla po i. Będzie łatwiej, jak podrzucisz przykładowy plik, bo nie jest dla mnie jasne poniższe: i jeszcze jak zrobić żeby wpisywał...

Excel - makro kopiujące kolumnę z pominięciem pustch komórek do nowego pliku

Jak zmienić mu "For wrs = 1" na "For wrs = "zależne od ostatnio wczytanych danych - od ostatniej pozycji w kolumnie A Przez podstawienie Nr ostatniego wiersza do licznika pętli, 'For wrs = Range("A" & Rows.count).End(xlUp).Row to ....' Musiałbyś tylko sprawdzać, czy nie jest większy od drugiego argumentu (pętla pojedzie wstecz), lub dodawać stałą liczbę.

(VBA) EXCEL - przenoszenie i łączenie kolumn w nowych skoroszytach według filtru

Ja już kończę pracę. Jak Marek coś wyklika, to będzie, a jak nie, to obiecuję, że o 3ciej rano siądę do tego. Nigdy nie wdawałem się w takie tasiemce. Jedna pętla i się zrobiło już dwie strony na Elektrodzie. 80% za dużo.

VBA Excel: Jak sprawdzić, czy zmienna jest liczbą w pętli Do While?

Zobacz [url=http://www.elektroda.pl/rtvforum/to... A dlaczego w pętli?

Excel Makro - wyszukaj pionowo z tablicy w innym pliku

Jeśli plik jest otwarty to makro pomija wykonanie otwarcia arkusza "baza". a jak jest otwarty to wykonuje dalsze instrukcje: kopiowanie potrzebnych wierszy. Pomija cała instrukcje czyli nic nie robi. czemu przed for each muszę dać otwarty=false a potem odnosić się do otwarty jako true Generalnie nie musisz dać na początku 'otwarty=false' bo zmienna...

Makro VBA Excel - Jak skopiować dane między FZ w kolumnach A-W?

No cóż, opis nie jest bardzo czytelny, ale jeśli taki miał być efekt: https://obrazki.elektroda.pl/4588789900_... to kod, który to zrealizuje może wyglądać następująco: [syntax=vbscript] Sub FZ() r = 1 'kolejny sprawdzany wiersz (row) rstart = 0 'numer pierwszego w serii wiersza do którego wklejam wartości, jednocześnie numer wiersza...

VBA: Jak porównać i skopiować dane między arkuszami Excel?

Jeśli makro, to prosta pętla porównująca każdą parkę z każdą. Można też bez makra. Oba (E2k0) rozwiązania w załączniku.

[Excel -VBA] - Błąd Run-time error 424 przy zmiennej nazwie Combobox'a

A nie lepiej użyć deklaracji tablicowej typu Combobox(x).value = 123 ? Wtedy możesz ogarniać to w pętli :D

VBA Excel - Jak usunąć wybrane wykresy (4, 5, 6) w makro?

Ad.1 i 2 Najprościej: nazwij je przy tworzeniu Np dla pierwszego wykresy dodaj na końcu Wykres_01.Name = "Wykres1" wtedy: Sheets(Zak).Shapes("Wykres1").delete Ad.3 Przy Workbook.Open wywołaj makra usuwania i tworzenia. Jeśli będą nazwane (pkt.1), nie będzie trzeba nawet pętli, instrukcji warunkowej, itp. Ad.4 Array z nazwami i pętla. Zakresy masz po...

VBA excel. Wklejenie danych z excela do zewnętrznego okna dialogowego

Witam. Mój problem wygląda następująco: Posiadam zewnętrzny program w którym pojawia się okno zapisu. Chciałbym aby excel wklejał ze swojej kolumny wartość jednej komórki do okna zapisu i klikał ok aby zapisać plik następnie, kopiować kolejną komórkę i czekać aż otworzy się kolejne okno zapisu aby wkleić wartość (pętla) W tym zewnętrznym oknie mam największy...

Excel VBA - Niepoprawne wpisywanie wartości w kolumnach przez pętlę for

jak zrobić żeby gdy podamy 1 to żeby pętla wpisywała wartości do 1 a nie do 0,8? Tu padasz "ofiarą" zadeklarowanych zmiennych zmiennoprzecinkowych :please: (sprawdź co tam dokładnie makro wpisuje do poszczególnych komórek :D ). Jeśli ten warunek (wpisywania maksymalnej wartości) jest ważniejszy od równego podziału :?: to możesz to uzyskać kodem :spoko:...