Witam. Zachwyciłem się programowaniem VBA i ulepszam swój arkusz kalkulacyjny. Bardzo przydała by mi się funkcja prezentowana w tym filmiku: Posty scaliłem, zamykam temat. RADU23
automatycznie drukować mi wybrane strony wybranego arkusza po czym będzie zaznaczać następną komórkę w wybranej kolumnie i będzie drukować te same strony :crazyeyes: Załącz przykładowy plik z opisem: wyboru strony, wyboru arkusza i wyboru kolumny, oraz co to znaczy "te same strony" :cunning: Plik w załączeniu. Chodzi mi oto aby w karcie "Do wypełnienia"...
Witam Was, w VBA jestem zupełnym amatorem, w zasadzie korzystam z nagrywania. Pojawił się pewien problem Mam jeden plik z którego chcę kopiować zawsze te same zakresy komórek, do innego pliku. Zasada jest prosta otwieram jeden plik bazowy z którego kopiuję dane i wklejam w pasujący zakres w drugim otwartym pliku, plik do którego kopiuję zawsze ma inną...
Dzień dobry. Bardzo proszę o pomoc w rozwiązaniu pewnego problemu z funkcją WYSZUKAJ.PIONOWO, z którym niestety nie poradziłem sobie jak również nie znalazłem odpowiedzi na forum. Napisałem makro, które w kolumnie AV ma podać wyszukaną wartość z zakresu kolumn AC:AD, która odpowiada szukanej wartości (wartość "A" - znajdująca się w kolumnie AC) a z...
Witajcie, również odświeżę temat, zacznę od początku, byście mieli jasność ... Mam pewien zakres liczb, które zbieram do jednej kolumny kolejno w dół od wiersza 7 do 150. Nazwijmy ją kolumna I. Zakres liczb zawiera się od 0 do 50. Następnie w kolumnie A mam zrobioną formułę sprawdzającą mi ilość występowania każdej z liczb w tym zakresie. Dotąd wszystko...
1. Makro odpada ponieważ po każdej dodanej wartości wchodzącej w wynik komórek w kolumnach BW i BX musiałbym uruchamiać makro. 2. Podane przez Ciebie makro dalej uzależnione jest od kolumny bz, co mi przeszkadzało, więc wywaliłem pierwsze if, a kolumne w while wstawiłem BV (jeśli nie ma wartośći w BV, to nie ma co liczyć w BW i BX). 3. Nie potrzebuję...
Witam, Potrzebuje stworzyć makro wyszukujące odpowiedni numer z zakresu w innym pliku i kopiujące dane. Posiadam dwa pliki: AMSTERDAM_SPC-Carbody shell_v2 oraz SPC_Raport Zadanie makro: W pliku SPC_Raport -> zakładka ‘Geometria’ znajduje się nr KTW (wpisywany z ręki) komorka Z7: Z pliku SPC_Raport Makro musi skopiować ten numer KTW i wyszukać...
Cześć, dzięki za podesłane rozwiązanie niestety dla mnie nie jest do końca przydatne ze względu na to że, chodziło mi o "ZAPIS NOWEGO PLIKU POD NAZWĄ Z ARKUSZA" jak zostało to opisane poniżej. Potrzebuję dla generatora pytań napisać makro które pozwoli mi na zapisanie nowego Zeszytu(pliku) pod nazwą z Arkusza(Dane). Tak abym mógł wprowadzić kilkadziesiąt...
Witam Nie wiem czy dobrze zrozumiałem ideę makra, ale można to zrobić tak Sub BMI() Dim I As Integer, J As Integer Dim Wiersz As Integer, Kolumna As Integer Dim MasaMin As Integer, MasaMax As Integer Dim WzrostMin As Integer, WzrostMax As Integer MasaMin = 50 MasaMax = 110 WzrostMin = 150 WzrostMax = 190 Wiersz = 2 Kolumna = 2 For I = MasaMin...
Dzień dobry, Można spróbować takie makro: [syntax=vb]Sub Uzupełnij() Dim wiersz As Long, wzor As String wzor = "" wiersz = 1 Do If Cells(wiersz, 1) <> "" Then wzor = Cells(wiersz, 1) Else: Cells(wiersz, 1) = wzor End If wiersz = wiersz + 1 Loop Until wzor = "koniec" End Sub[/syntax] Powinno spełniać założenia. Pozdrawiam.
Ok. Zrozumiałem. napisałem małe makro dla zakresu i pętlą sprawdzanie. plik w zalączeniu. kod: Option Explicit Sub ZakresPetla1() Dim wiersz As Long For wiersz = 19 To 30 Step 1 Do While Cells(wiersz, 2).Value = Range("E16").Value Range("F16").Copy Cells(wiersz, 3).PasteSpecial wiersz = wiersz + 1 Loop Next End Sub
Cześć, Zrobiłem makro, które ma usuwać wiersze, jeśli w komórce F występuje fragment tekstu, np 'AAA' lub 'BBB'. Makro działa, ale jeśli dwie komórki w wierszach pod rząd są takie same to makro je omija. Zastosowałem funkcję 'offset', ale to nie pomogło. Ma ktoś jakiś pomysł jak to naprawić? Sub usuwanie_wierszy() Range("A1").Activate wiersz = 2 Do...
Tak napisałem i właśnie miałem się pochwalić ale mnie ubiegłeś. Jest jeszcze jest problem. Mam tabelkę w zakładce Arkusz1. Tab. ma 2 kolumny: Nazwa, Opis. W każdej jest n wierszy z danymi. Dane z każdego wiersza powinny przenosić się do zakł. pdf do określonych komórek i powinien następować wydruk, następnie powinny pojawiać się dane z kolejnego wiersza...
Mam takie makro, które ma pobierać dane ze skoroszytów i wklejać do jednego. Wszystko działa dobrze z wyjątkiem pętli - nie przeskakuje na kolejne arkusze tylko ciągle pobiera z jednego, maksymalnie dwóch. Co jest nie tak? Sub Scalanie() folder = "D:\Pliki\" Set master = ActiveSheet plik = Dir(folder & "*.xlsx") wiersz = 14 Do While plik <>...
Witam serdecznie Potrzebuję pomocy w napisaniu makra które by działało w następujący sposób: W kolumnie A mam powiedzmy 10 różnych tekstów pod sobą, w kolumnie B mam liczby całkowite przy nich. Potrzebuję powstawiać wiersze dla każdego tekstu o takiej liczbie wierszy jak w kolumnie B przy danym tekscie i żeby teksty były pod sobą. np: A1 / B1 Kot 5...
Cześć Wam, mam zagwózdkę następującą: tu i owędzie czytam o sposobach na porównanie pól lub operacje na wartościach znajdujących się w poszczególnych kolumnach/wierszach. U mnie sytuacja jest o tyle łatwiejsza, że chodzi o ustalenie w których z wierszy układ X-ów jest taki sam i przedstawienie poniżej odnalezionych kombinacji. Niby łatwiejsza, ale właśnie...
Witam, Mam problem. Ostatnio dostałem do przerobienia listę w excelu ma ona ponad 40 tys. pozycji. Ręczne przerebianie jej byłoby niemożliwe. Problem wygląda następująco : W jedej kolumnie znajduje się zapis podobny do tego : &KEY&FILE:\\W:\PROJEKTY\DOKONCZONE\SPAE - estakady\ESP18M.00.03.psm chodzi mi o skopiowanie końcówki (ESP18M.00.03.psm) i wklejenie...
No to, no to... Mam dla Ciebie złą/dobrą* (niepotrzebne skreślić) wiadomość. Jeżeli chcesz trzymać się liczenia kolorków bez VBA się nie obejdzie. Innym rozwiązaniem jest wykorzystanie danych istniejących w zestawieniu. Nie wiem jakie one są i nie chcę wiedzieć. Szanuję tajne przez poufne dane firmowe. Ale zastanawiam się, że owa kolorystka działa na...
Kod jest stosunkowo prosty, łatwy do rozbudowy (mod ilość checkbox'ów w wierszu). Kluczem są indeksy CheckBoxów, a w przykładzie ich parzystość (i mod 2 = 0 w pętli). Parzyste i nieparzyste muszą być we właściwych kolumnach. Czyli robisz sobie jeden wiersz na gotowo, następnie zaznaczasz go (cały) i kopiujesz do wierszy niżej.
Witam Od razu zaznaczę, że nie miałem/mam nic wspólnego z makrami... po prostu życie wymusiło na mnie zastosowanie makra (albo inaczej.... chciwy szef, który uważa że całe moje życie to praca :)! A więc poproszę o jakieś wytłumaczenie jak krowie na miedzy :). A więc szukam makra które będzie wykonywało taką oto czynność: mianowicie mam bazę urządzeń...
tak właśnie też myślałam, z tym że czytałam, że Variant używa się wtedy kiedy nie mamy pewności czy w arkuszu znajdują się tylko np. liczby ze względu na to że variant zajmuje duzo miejsca Option Explicit Sub wczytywanie_danych() Dim dane As Variant dane = Range(Cells(1, 1), Cells(10000, 3)) End Sub czyli powyższe makro robi dokladnie to samo co makro...
witam Chciałbym aby z kolumy zrobiło się kilka kolumn dokladniej z kolumny gdzie są liczby (1,2,3,4,5...) dla każdej liczby wazielo wartości i ustawilo w osobnych kolumnach tak jak na obraku poniżej: w zał ączniku plik z danymi... jest az 400k rekordów i umnie nie śmiga to roziwązanie które zaćżałem tam robić bo system sie zawiesza :/ pomóżcie proszę...
Mam problem z usuwaniem duplikatów. W całej tabeli znajduje się wiele zdublowanych danych. Można usunąć duplikaty na podstawie kolumny A, która niestety zawiera czasem ok 70 tys. wierszy. Gdy uruchamiam makro, to się zacina. Czy ktoś mógłby coś poradzić? Dziękuję [syntax=vb] For i = Cells(Rows.Count, "A").End(xlUp).Row To 2 Step -1 If Cells(i, "A").Value...
No dobrze, a co z układem danych ? Opis z wpisu nr 1 jest aktualny ? " komórka B2 zawierająca datę, C5 zawierającą jakieś dane jak imię nazwisko i adres " Bo dziwny to jest trochę układ. Czy tak samo ma być kopiowane do zeszytu 'Bazy', tj. w różnych wierszach, czy w tym samym wierszu ?
Tu masz proste makro: (sprawdza kolumny dopóki jest wartość w kolumnie C zaczynając od 7 wiersza Sub filtr() a = Range("C3") b = Range("C4") i = 7 Do While Cells(i, 3) <> "" If (Cells(i, 3) >= a) And (Cells(i, 3) <= b) Then Rows(i).EntireRow.Hidden...
Mam makro po którego uruchomieniu wyświetla się forma z checklistą, polem umożliwiającym wpisanie tekstu, kilka optionbuttonów i 66 checkboxów po kliknięciu zapisz wszystkie dane zapisywane są do odpowiednich komórek, jednak jeśli, któreś z pól, lub żadne nie zostanie uzupełnione i tak można zapisać w tym wypadku bezwartościową informację. Takie działanie...
Bardzo proszę o pomoc w napisaniu makra, które będzie kopiowało dane z wybranych komórek arkusza „Zadania” do wybranych komórek arkusza „Plan zadań”, tzn.: Z arkusza „Zadania” z komórki: z komórki "Temat" do komórki "Zadania" ze "Data rozpoczęcia" do "Data od" z 'Data ukończenia" do "Data do" z 'Data wykonania" do...
Witam Mam tabelę, w której kolumna C od drugiego wiersza zawiera sposób wypłaty gotówki. W związku z tym w kolumnie tej pojawia się tekst "kasa", lub "przekaz" albo nr rachunku bankowego. Zależy mi na tym, aby jeżeli jest podany nr rachunku (czyli 26 cyfr) to format tekstu ustawiał się na 00 0000 0000 0000 0000 0000 0000. Czy jest możliwe zrobienie...
Cześć, Czy jest ktoś mi wstanie pomóc napisać makro sprawdzające poprawność pisowni w kolumnie z imionami? Makro musiałoby weryfikować poprawność z komórki, w której również wprowadzone jest nazwisko. MRCIN KOT MARICN PIES MARCINI ŻABA MARCIN RYBA Posiadam ponad 600 tys wierszy wymagających weryfikacji.
Najprościej to wrs = 1 For i = 1 To 40000 With ActiveSheet.QueryTables.Add(Connecti... _ "URL;http://www.onet.pl=" & i, Destination _ :=Range("a" & wrs)) .WebTables = "1" .Refresh BackgroundQuery:=False End With If wrs = 1 Then wrs = 0 wrs = wrs + 15 Next Ale: w wersji Excela <2007...
Hej czy mógłbyś rozwinąć troszkę bardziej sprawę z tym indeksem bo nie kojarzę jak to można zrobić. Z tym indeksem to raczej nie wyjdzie bo to się tyczy bodajże tylko zawartości w arkuszu (kolumny, wiersze)
Proszę: [syntax=vbscript]Sheets("START").Select Range("B2").Select Wiersz = ActiveCell.Row KOLUMNA = ActiveCell.Column Do While Cells(Wiersz, 3) <> "" plik = Cells(Wiersz, 3) FILTR = Cells(Wiersz, 2) Workbooks.Add.SaveAs Filename:=ThisWorkbook.Path & "\" & plik Windows("DaneScalone.xlsx").Activate KOLUMNA = 4 Do While Cells(Wiersz, KOLUMNA)...
Witam, Po kilku dniach męczarni nad makrem postanowiłem poprosić o pomoc. Mój problem dotyczy makra a konkretnie przycisku który ma przechodzić po widocznych wierszach. Activecell.offset(1,0).select działa ale przechodzi po kolejnych wierszach. W arkuszu założony jest filtr i nie mam pojęcia jak przejść do następnego WIDOCZNEGO wiersza. Jest to możliwe...
Tak jak kolega Aldrin zauważył błędnie były nazwy kolumn w stosunku do zwracanych danych. Ja powiększyłem iolość kolumn tak by i "uwagi" były widoczne. Dodatkowo zmieniłem opis (i wyliczenia) do drugiej kolumny by pokazywało liczbę porządkowa danego arkusza a nie wiersz. Wg mnie jest to logiczniejsze w razie wydruków list. Również nie ingerowałem w...
Brakuje chyba jeszcze jednej pętli zmieniającej kod sklepu. Hmm, raczej: na pewno ;) Spróbuj Dziękuję, to dokładnie to, czego szukałem. Pomyślałem więc, by rozszerzyć to dalej o nową funkcjonalność. W załączniku plik, który nadal meczę. Nie powiem - z ciekawością;] Po kolei: Arkusz "paczki" to nasz generator listy paczek. Uzyskaną listę kopiujemy do...
Witam, Mam następujący problem. Mam arkusz o zmiennej ilości wierszy. Wypełnione kolumny zawsze od A do J. W kolumnie A występują kody, kody mogą się powtarzać- dla ułatwienia jeśli się powtarzają są jedne pod drugim ale nie ma stałej określonej liczby powtórzeń. Chodzi mi o to by makro sprawdzało kod w kolumnie A - unikat kopiujemy do Arkusza 2 z wartościami...
Witam potrzebuję pomocy z makrem, które bardzo ułatwi mi pewną pracę :) Mam dwa pliki excela, w jednym (nazwijmy go 1) jest jeden arkusz w którym zapisuje się wszystkie nowo przyjęte rzeczy (wpisuje się nazwę firmy, nazwę przedmiotu i jego nr np firma X przedmiot x nr 001). Drugi(nazwijmy go 2) ma kilka arkuszy z nazwami firm, w arkuszach tych są naturalnie...
Mam pewien problem z lastRow. Napisałem poniższe makro do przeszukiwania wszystkich arkuszy w celu znalezienia "szukanej". W każdym arkuszu makro szuka od wiersza 7 do lastRow. I tu mam problem taki, że jak w Sht 1 lastRow = 7 ,a w Sht 2 lastRow =2 i załączę makro w Sht 2 to makro przeszukuje mi także w Sht 1 tylko 2 wiersze. Rozumiem to, ale szukam...
Proszę o pomoc w rozwiązaniu takiego zadania. Jest to swego rodzaju harmonogram. Mamy kolumnę liczb posegregowaną wg. określonej kolejności, chciałbym aby od pierwszego wiersza następowało sumowanie z warunkiem aby suma = 1000, jeśli np. wiersz1 + wiersz2 <1000 to dodajemy wiersz3 itd. Jeżeli suma 1000 zostanie osiągnięta to wartość "1000" zapisywana...
witam, chciałbym stworzyć makro, które będzie przenosiło dane z pliku, porównywało z drugim i zapisywało w trzecim. W trzecim pliku chciałbym aby było zapisane samo makro. Porównywanie odbywałoby się na podstawie kwot. Jednak najlepiej jeśli dodatkowe porównanie byłoby jeszcze po opisie, w nim znajduje się numer, który można porównać ale niestety jest...
Dzień dobry, mam taki problem. Zrobiłam w Excelu przycisk, do którego przypisane jest makro kopiujące i wklejające 3 ostatnie wiersze. W jednej kolumnie są scalone 3 wiersze do jednej komórki i jest w niej lista rozwijana. Gdy włączę ochronę arkusza (na wybrane komórki, nie na tę z listą rozwijaną) to ta lista nie kopiuje się do kolejnego wiersza. Kopiuje...
Chcę napisać makro które będzie przenosiło dane o dynamicznej objętości (ilość wierszy i kolumn zmienna) z jednego arkusza do drugiego. W drugim arkuszu do przeniesionych danych chcę automatycznie ustawiać filtr dla wszystkich kolumn z danymi. Liczba kolumn będzie zmienna więc do określenia kolumn nie mogę użyć oznaczeń literowy. Problem mam z tym iż...
Witam Dopiero zaczynam z Vba Exel i mam problem z przyśpieszeniem swojej pracy. Mam 2 arkusze. W pierwszym uzupełniam wiersze od (a2:h22) oraz komórkę "k1". Po włączeniu makra chcę by komórki z podanego przed chwilą zakresu dopisywały się w drugim arkuszu od "a2:h" a komórka "k1" żeby skopiowała się tyle razy ile dopisało się wierszy i to do ostatniej...
Cześć, mam krótkie makro. W innym pliku mi działa, w tym nie. [syntax=text] Sub ukrycie_pustych() Dim Liczba As Long Range("A2").Select Selection.End(xlDown).Select ActiveCell.Offset(0, 2).Range("A1").Select Liczba = Selection.Value 'nadanie wartości zmiennej, która będzie teraz liczbą ostatniego wiersza ' tu nie działa For i = 3 To Liczba Step 1 If...
Witam Mamy pytanie odnoście usuwania makra przez inne makro. Od początku. Mam poniższy kod który oczywiście działa popranie i robi dokładnie to co ma robić, czyli: kod na początku filtruje i tworzy pewną ankietę w arkuszu. Następnie arkusz z ankietą zostaje skopiowany i wklejona do nowego pliku Excel, następnie zapisany pod konkretną nazwą we wskazanym...
Dzień dobry, chciałbym utworzyć makro, może być pod kliknięcie w specjalny przycisk.. A teraz co miałoby ono robić.. Posiadam generalny plik zbiorczy projektów przedstawiony za pomocą tabeli w excelu. Jeden wiersz w tabeli to z założenia jeden projekt, a kolumny opisują jego postępy. Dane podstawowe projektu jak nazwa itd., które wprowadza użytkownik...
Jeśli dobrze zrozumiałem, chodzi o "wyszukiwarkę" dodającą wybrane pozycje do kolejnych wierszy. Wtedy w grę wchodzi proste makro. Przykład w załączniku.
Witam ponownie Dzisiaj proszę o pomoc w zwiazku z tematem, który czesciowo rozwiazalem. Mam kilkanascie plikow o nazwie: litera alfabetu.xlxs, czyli: a.xlxs, b.xlxs, ... W nich sa zapisane wartosciami 3 kolumny: A B C Z tych kolumn potrzebuje skopiowac kolumny B i C (jedno pod drugim)do nowego pliku, w ktorym mam przycisk i do niego przypisane makro....
Witam wszystkich forumowiczów! Jestem absolutnie początkujący jeśli chodzi o programowanie w VBA w Excelu, a potrzebne mi jest makro, które (po jego aktywowaniu np. kombinacją klawiszy) wytnie jeden wiersz z jednego arkusza i wstawi go do drugiego, w pierwsze wolne miejsce. Skoroszyt będzie się składać z 3 Arkuszy. Chciałbym, aby była możliwość przenoszenia...
Witam serdecznie W excelu zrobiłem sobie formularz umowy, połączony z bazą osobową, rachunkami i oświadczeniami. Wisienką na torcie byłoby, gdyby jeszcze w osobnym arkuszu prowadził sie rejestr tych umów. Zrobiłem w VBA prostą formułę, żeby mi archiwizowało z poszczególnych komórek formularza dane, ale niestety jest to w jednym wierszu i zaciąlem się...
Super nie znałem tej komendy do tej pory. Udało mi się napisać następujący kod, który jak już zdążyłem sprawdzić, wydaje się, że działa. [syntax=jezyk_programowania]Dim cyCells As Range Set cyCells = Columns("E:E").SpecialCells(xlCellTypeVi... For Each Cell In cyCells Cell.FormulaR1C1 = "#N/A" Next Cell[/syntax] Jednak zamiast wyrażenia "#N/A" otrzymuję...
Witam, chciałabym stworzyć makro porównujace dwa wskazane przeze mnie pliki. Układ obu plików jest taki sam. Na kilkaset wierszy czasami zostanie zmieniony tekst/kwota lub całkiem usunięty/dodany nowy wiersz. Widziałabym to tak że wskazuje konkretne dwa pliki, a makro porównując je usuwa powtarzające się wiersze (sprawdzając zarówno tekst jak i kwoty)....
Sub sumki() Dim czas As Variant kolumna = 1 'dowolna ostatni = ActiveSheet.UsedRange.Rows.Count For wiersz = 1 To ostatni Cells(wiersz, kolumna).Select wzor = ActiveCell.Value czas = ActiveCell.Offset(0, 1).Value For wiersz2 = wiersz + 1 To ostatni Cells(wiersz2, kolumna).Select dane = ActiveCell.Value If dane = wzor...
Witam mam problemik z Excelem. Mam np dane w kolumnie A w kolejnych wierszach np 1,1,2,3,3,3,4,5,5,5 czy jest jakas formuła która z automatu porównała by te dane i przed każdą zmianą danych wstawila pusty wiersz aby pozniej wygladalo to tak 1,1 pusty wiersz, 2 p[usty wiersz 3,3,3, pusty wiersz 4 i tak dalej? Z gory dzieki za pomoc
Wstawiam plik z rozwiązaniem problemu, tak jak ja go zrozumiałem. W kodzie makra nie wstawiałem objaśnień, bo zmienne nazwałem aż naddto opisowo. Jeśli czegoś nie rozumiesz z procedury, korzystaj z F1 ustawiając kursor na nieznanym Ci "słowie". Aha, nie zapomnij włączyć makr w Excelu, najlepiej na stale. Dostęp do edytora VBA to chyba wiesz: Alt + F11...
Witam potrzebuję pomocy w stworzeniu makra w Excelu 2007. Potrzebuję kodu który przepisze wiersze do nowego arkusza po spełnieniu poniższych kryterium: Zakres analizowania: Od wiersza 12 kolumna B Do wiersza 111 kolumna P Makro: jeżeli w arkuszu nr 1 w kolumnie P z zakresu wierszy od P12:P111 znajdzie się wartość większą (różna) od „0” (wynik...
Przerobilem znalexione w sieci makro tak ,że działa ale tylko na 2 plikach :/ nie wiem o co chodzi.. A chciałem aby działało na tylu plikach ile zaimportuje.. Możecie coś podpowiedzieć? I ewentualnie pomoc w jeszcze 2 rzeczach: 1) Wstawianie zer tylko tam gdzie: a) osoba jest zgodna ale nie ma wartości w całym wierszu b) tam gdzie nie znalazło nikogo...
Witam, potrzebuję pomocy z makrem. Czy ktos zmodyfikuje to makro tak zebym: 1) Mógł wpisać "z palca" numer wiersza z którego kopiuje (wszystkie kopiowana dotyczą zawsze jednego, wybranego wiersza). Ew. co tez jest dobra dla mnie opcja chcialbym moc wskazac myszka wiersz. 2) Mógł używać makra do aktualnie otwartego pliku (tego, do którego chcę skopiować)?...
Witam ponownie Zacznę od tego, że mam takie dane w excellu: 1293.2750.4324.1294.2750.3765. 0. 0. 0. 1. 1. 1. 1. 2. 3. 1. 2. 3. I teraz chciałabym napisać takie makro, które kopiuje mi komórki z pierwszego wiersza jeżeli w komórkach w wierszu poniżej wartości są takie same. Chciałabym, żeby te skopiowane wartości (tutaj akurat po 3) były kopiowane do...
Dzień dobry, Proszę o pomoc przy pisaniu makra, gdyż w jednym miejscu zaciąłem się na dobre. Nie znam dobrze VBA, uczę się powolutku na swój sposób, dlatego proszę o wyrozumiałośc jesli kod jest niepotrzebnie długi, a komendy bardzo prymitywne :) Co potrzebuję zrobić: W jednym arkuszu xls mam wzór faktury do wystawienia, wypełniam odpowiednie pola (zajmują...
Kolega lanzul pomógł mi rozwiązać problem z usuwaniem wiersza tabeli, w którym jest konkretny wyraz. Tych wyrazów jest znacznie więcej, dla których potrzebuję usuwać te wiersze. Dlatego potrzebuję zbudować pętlę, która będzie brać kolejne wyrazy z jakiejś listy i będzie wykonywać to poprzednie makro, dla wszystkich wyrazów z listy. W załączniku makro...
Witam Mam taki problem. Do nowego skoroszytu do Arkusza2 importuję dane. Za każdym razem po jest to inna ilość wierszy. Raz jest to np.1900 , innym 3400 wierszy. Kolumny do A do U zawierają dane. W kolumnie V w pierwszym wierszu wprowadzam np. formułę i chcę, aby makro skopiowało mi tą formułę do pozostałych komórek w kolumnie V zgodnie z ilością wierszy...
Cześć, Stworzyłem makro do tworzenia Analizy ABC towarów na magazynie. Makro działa dla zakresu towarów od 1 do 10000. A działa następująco: 1. W arkuszu "dane" wklejamy dane dotyczące towarów (symbol/nazwa/j.m./wartość do analizy) 2. Klikamy przycisk "Stwórz Analizę ABC", makro tworzy nowy arkusz o nazwie "ABC" i tam wykonuje wszystkie działania z...
Dziękuję za odzew . Przekładowy plik w załączniku. Makro dochodzi do momentu zaznaczenie tabeli w Arkuszu2 i skopiowania na kolejny Arkusz3 i wyskakuje błąd. 1. Za pierwszym wywołaniem działa poprawnie, przy kolejnych jest błąd, prawdopodobnie chodzi o nazewnictwo "Arkusz1", "Arkusz8" itd., czy istnieje rozwiązanie, aby zawsze kolejny arkusz był brany...
Dzięki bardzo :) Działa. Dodano po 1 Działa w przypadku jednego zdania, jaki kod należy wpisać jeżeli jest więcej zdań i każde zaczyna się od nowego wiersza z wielkiej litery, a niektóre zdania zajmują dwa wiersze?
jeszcze prosze powiedz mi gdzie mam to umiescic :) dziekuje Ok, juz znalazlem co i jak - wystarczylo zarejestrowac nowe makro... Dzieki za pomoc Tylko dlaczego utworzone makro nie uruchamia sie automatycznie? Za kazdym razem musze klikac na uruchom :(
Dziekuje za szybka odpowiedz. Chodzi mi tu raczej o cos w stylu znajdz->zamien->skopiuj do odpowiedniej komorki. Poczatkowo wprowadzam dane, ktore maja zostac odnalezione i na jakie dane zamienione, a potem te zamienione dane wpisac w odpowiednie komorki. Nie zawsze kody wygladaja tak jak przedstawilem. Czasem kod wyglada tak CORRI-BLRE-BRAS075DD. W...
Dzięki za pomysł ale ja zacząłem myśleć o czymś innym.Może po prostu umieścić w SMARA NETHERLANDS gdzieś indziej osobno wyniki dla braku zapinki i brak woreczka, a później swykłą sumą umieścić je w komórce B5. Żeby nie było jednak za łatwo, zauważyłem dopiero teraz,że wyszukiwanie poprzez ("Paprika*") nie działa.Pewnie dlatego,że excel szuka w komórce...
Zamieszczam zgodnie z prośbą przykładowe dane. Tutaj akurat dla wierszy. Mamy wiersz dat i wiersz danych. Chciałbym żeby makro zanim np. policzy średnią dla liczb poniżej dat zapytało mnie z jakiego zakresu dat policzyć średnią, (lub np. zrobić wykres) i po wprowadzeniu daty od której ma zacząć wykonało operację do daty najwcześniejszej. Najlepiej by...
Witam. Posiadam makro ale chciałbym, żeby zaczytywało pliki nie tylko ze wsakzanego folderu ale również ze wszystkich plików w podfolderach. Czy jest taka komenda? Proszę umieszczać kod w znacznikach syntax . Opcja Listing kodu .
Jeżeli tak to proponuje nagrać makro i podpiąć je pod przycisk (będzie najprościej). Włącz na wstążce zakładkę deweloper Plik-opcje-Dostosowanie wstążki-i w oknie po prawej stronie zaznaczyć Deweloper i OK Na wstążce pojawi się karta deweloper.Otwórz ją. Przejdź na twój pierwszy arkusz. Wciśnij "Zarejestruj makro" Teraz postępuj tak jak zawsze robisz...
=TRIM(LEFT(SUBSTITUTE(A2;" ";REPT(" ";100));200)) :p teżź nie działą ^_^ Dodano po 1 Przyznam, że nie ogarniam o jakie moduły chyodzi :P Mowa o kodzie VBS do makr?
Witam, podaję przykładowy plik. Pytanie - jak zsumować ilości z kolejnych arkuszy styczeń-kwiecień do podsumowania, uwzględniając fakt, że dane nie występują zawsze w tych samych wierszach, czasami pojawiają się nowe, czasami są w innym wierszu. Mam nadzieję, że za bardzo nie zamieszałem.
No właśnie tutaj mam problem, bo dane odczytuję z aplikacji i mogę je mieć w pliku tekstowy gdzie kolejne wartości będą w osobnych wierszach. Teraz chciałbym je wkleić do kolejnych pól tabeli w Wordzie, ale juz nie jedno pod drugim, tylko w kilku kolumnach. Nie mam jakiegoś algorytmu wklejania do tabeli, adresować komórki do której trafić ma odpowiedni...
Dzień Dobry, potrzebuję Państwa pomocy. Jestem początkującym użytkownikiem języka VBA. Ciągle czytam tutoriale, poradniki fora, a nawet filmiki na YT. W końcu przyszło mi się zmierzyć z Makrem trudniejszym. Przynajmniej tak mi się wydaje. Do rzeczy. Mamy tabelę o zawsze stałej szerokości i nieokreślonej ilości wierszy. Potrzebuję z nieokreślonej ilości...
Nie wiem czy będziesz sobie w stanie sam dostosować formułę jeżeli to jest w innym miejscu arkusza - niemniej załączam jedno z rozwiązań (bez makra). Acha Numer wiodący wpisujesz między lp. a "pomoc" Na marginesie z makrem byłoby chyba prościej :) Działa w 100%. Wielkie dzięki.
Przeniesienie nie wchodzi w grę, bo to nie jest jeden arkusz, tylko kilkanaście, które są powiązane ze sobą makro... Osiwieję... Dodano po 6 Chyba nic nie wymyślę, zacznę przenosić powoli wszystko. Dzięki...
Witam ponownie mam problem z makro, stworzyłem poniższy kod i nie wiem dlaczego się nie wyszukuje tak jak bym chciał. [syntax=vb] Sub Data_usun() For Each wh In ThisWorkbook.Sheets For r = wh.Cells(65536, "A").End(xlUp).Row To 2 Step -1 If wh.Cells(r, "A").Value = InStr(1, wh.Cells(r, "A").Value, "Data:", vbTextCompare) Then wh.Rows(r).Delete Shift:=xlUp...
Potrzebuję pomocy przy stworzeniu makra do kopiowania zakresu komórek z Arkusza1 do Arkusza 2. Wybieram np. komórkę Arkusz1:D7. Makro kopiuje komórki C7, D7,E7,F7,G7 i H7 i wkleja je do Arkusza2(C15, H15). Wybieram drugą komórkę np. Arkusz1:D25 i makro wkleja zaznaczony obszar do Arkusza2 w kolejny wiersz(C16, H16). Makro powinno działać tylko przy...
Witam Mam takie proste makro które sprawdza czy w komórce G jest wpisane BBBB jeśli tak to komórkę I koloruje na zielono jeśli nie to koloruje na niebiesko kod wygląda tak Sub Makro1() If Range("G6") = "BBBB" Then Range("I6").Interior.ColorIndex = 4 Else Range("I6").Interior.ColorIndex = 5 End If End Sub Tabelka tak : BBBB 1220 BBBB 1220 BBBB 1220 BBBB...
Cześć, Bardzo proszę o pomoc, muszę zdobyć makro, które było by w stanie PORÓWNYWAĆ dwa arkusze na podstawie ich wierszy. Arkusz "NEW" oznacza nowy raport , natomiast arkusz "Old" oznacza stary raport. Chciałbym aby makro porównywało oba arkusze i wypisywało kropka w kropkę powtarzające się wiersze w następnym arkuszu , lub wypełniało powtarzające się...
Witam serdecznie! Mam zakres komórek w wierszu, np. A1:A10, które domyślnie posiadają białe tło. Pracując w arkuszu kolor tła będzie zmieniany na, powiedzmy, niebieski i z powrotem na biały. Potrzebne jest mi makro, które zliczy ile razy dokonano zmiany koloru na niebieski, w całym wierszu. Co więcej, przydałby się przycisk "zapisz", do zatwierdzania,...
Witam Potrzebuje pomocy przy napisaniu makra excel W kolumnie M mam 10 typów wartości liczbowych powtarzających się, pomieszanych. Chciał bym aby makro znalozło wiersze w kolumnie M zaierające wartości 1224, 1228 i 1232 Po czym usunęło całe wiersze, czyli wszystkie dane we wszystkich kolumnach w tym wierszu który zawiera te liczby. Ale tak było nie...
Witam :) Jestem początkująca w VBA, więc proszę o pomoc. Potrzebuję zrobić karty pomieszczeń: uproszczony przykład jest w załączniku. W skrócie wygląda to tak, że dane mam w jednym arkuszu, pogrupowane tak, że jednemu pomieszczeniu przypada jeden wiersz. W drugim arkuszu mają być karty, jedna na jedno pomieszczenie, i odpowiadające dane nie są zgrupowane...
Makro poniżej przesuwa nazwiska w prawo o wartość numeru grupy+1, a następnie usuwa puste komórki w obszarze danych. Nazwiska nie są posortowane. Jeżeli jest potrzeba. sortowania to na początku makra dopisać sortowanie.[syntax=vbscript]Sub Przepisz_Nazwiska() Dim Tab_Opis As Variant With ActiveSheet Tab_Opis = Array("Grupa 1", "Grupa 2", "Grupa 3",...
Cześć, potrzebuje napisać makro VBA w Excelu które: - będzie otwierać wszystkie pliki *.xlsx w katalogu w którym znajduje się uruchamiany plik skoroszytu (ew. będzie można wskazać kilkanaście plików w oknie wyboru) - z każdego pliku zostanie skopiowany zakres $$ i doklejony do arkusza "zaimportowane" w pliku w którym jest makro - po zaimportowaniu wszystkich...
O ile zrozumiałem to są dwa rozwiązania: 1. Wyszukanie danych dla pojedynczego, wskazanego (jak?) wiersza. Należy albo zaznaczyć odpowiednią komórkę i uruchomić makro, albo makro odpyta o komórkę. Czyli klawisz w zasadzie odpada, a wszystko jest takie "toporne". 2. Wyszukanie klawiszem danych dla wszystkich wierszy (nieuzupełnionych?), zdecydowanie...
Witajcie, Mam taki przykład. Handlowcy, region, punkty. Potrzebuję aby z arkusza "dane" kopiowały się wiersze w zależności od regionu. Tj wszyscy handlowcy z południa do arkusza "południe", ci we wschodu do "wschód" itd. Mam takie makro. Sub CopyWhenConditionMet() a = Worksheets("dane").Cells(Rows.Count, 6).End(xlUp).Row For i = 2 To a If Worksheets("dane").Cells(i,...
każde kolejne sczytanie z czytnika do Arkusza "NAZWA ODDZIAŁU" A2 kolejno wklei dane do pustej komórki w Arkuszu "DANE" Jeśli skaner korzysta tylko z komórki A2 :?: to możesz wykorzystać makro jak w załączniku 1063586
Cześć mam makro, które dzieli mi plik na mniejsze pliki - ale kopiuje do nich tylko po 1 linii oprócz nagłówków. Potrzebowałbym przerobić poniższe makro na takie, które kopiuje wszystkie unikalne wartości tzn. jeżeli w D3 mamy wpisane np. rower, samochód, pieszo kilka razy to makro będzie tworzyło plik z unikalnymi wierszami. Czy mogę prosić kogoś o...
Jak zmienia się którykolwiek TextBox uruchamia się procedura TTextBox. Jak wykonuje się makro w którym jest zapis do TextBox uruchamia się ponownie i tak ciągle. Proponuję zostawić Label, tu też można wyśrodkować tekst. W załączniku poprawiony Label i kod od Private Sub ListBox12_Change(), bo nie zawsze zwracał poprawne dane.
witam serdecznie! mam duzy problem z excelem, bardzo prosze o pomoc. szczegoly: posiadam duza baze danych w formacie xls do przetworzenia. sklada sie ona wlasciwie z 2 kolumn: data i wartosc. w polu data znajduja sie tylko dni robocze; weekendy i dni wolne sa pominiete. i teraz tak, potrzebuje obliczyc procentowe zmiany wartosci z miesiaca na miesiac....
Witam, mam prośbę, potrzebuję zrobić pewne makro i nie mam pojęcia jak. Problem jest następujący Mamy arkusz1 i trzy komórki np. B1, C1, D1 wpisuję w nie pewne wartości, zadaniem makra jest przenieść te dane (ale tylko C1 i D1) do innego arkusza np arkusz2 w odpowiednie dwie komórki np. B10, C10, z tym że komórki docelowe powinny być wybrane również...
Witam wszystkich, Potrzebuję pilnie informacji jak zapisać makro działające jak WYSZUKAJ.PIONOWO z odwołaniem do arkusza2 czyli mojej tabeli danych. Temat pewnie nie byłby jakoś strasznie skomplikowany gdyby nie fakt powtórzenia obliczeń do końca aktywnych kolumn ale również na zasadzie powtórzeń w wierszach ze stałą równicą 7wierszy - powtórzenia oczywiście...
Witam, Mam makro do usuwania wierszy, które zawierają w kolumnie A "0". Proszę pamiętać o używaniu znaczników syntax . Opcja Listing kodu . - arnoldziq
Witam, czy ktoś napisał makro które było by odzwierciedleniem formuły złącz teksty. Dane znajdują się kolumnie a w nieokreślonej ilości wierszy. Może to być zarówno kilka jak i kilka tysięcy. Czy jest możliwość napiania takiego stwora który rozpoznałby ilość wierszy niepustych i po takim rozpoznaniu złączył ze sobą watości tych komórek oddzielająć je...
VBA nie obsługuje polskich nazw formuł, tylko ich angielskie odpowiedniki. Najprościej zrobisz to tak, że włączasz rejestrator makr, wpisujesz w Excelu formułę i kończysz rejestrowanie. Potem przechodzisz Alt+F11 do kodu, wchodzisz w moduł i odnajdujesz ostatnie zarejestrowane makro. Z niego kopiujesz wspomnianą formułę, ewentualnie poprawiając jej...
Witam! Mam pewnien problem z markem. Przez parę dni szukałam na różnych forach informacji jak go poprawić, ale niestety nic nie znalazłam. Problem wygląda następująco. Mam makro, które generuje mi plik Worda od podstaw tj. tekst plus wstawianie danych z komórek na podstawie aktualnie zaznaczonego wiersza. Wszystko działa kiedy zapisuje tylko dokument...
Witam. Tak jak w temacie. Wiem, ze sposob (czy to formula, czy makro) istnieje, ale mimo staran nie moge tego znalezc, stad prosba pomocy. Nie wiem czy taka mozliwosc istnieje w Wordzie, wiele razy natomiast trafialam na porady dotyczace Excela (teraz jednak nie moge trafic w slowa-klucze do znalezienia rozwiazan). Problem jest taki, moze pomozecie...
Witam. Mając pewne wartości w kolumnie obliczam ich całkowitą sumę za pomocą formuły SUMA(D1:Dn) i jest OK , ale jeżeli w którymś wierszu w tej kolumnie zostaje wpisana wartość za pomocą makra pojawia się czarny punkcik w lewym górnym rogu i w/w formuła nie liczy tych cyfr, co powoduje nie prawidłowy wynik. Mam zatem prośbę co zrobić aby te pozycje...