A ja potrzebuję, żeby wklejając 2 wiersze niżej wartość była "A3+B3". Jak to zrobić? Chodzi ci o A$2+B$2
Mówią, że deklarowanie zmiennych, to dobra cecha programisty. Są języki, gdzie bez deklaracji się nie da. W VBA nie jest _wymagane_ deklarowanie, ale jak chcesz, to używaj 'Dim'.;) P.S. Wykorzystałeś makro 'Kopiuj2'?
Słuszna uwaga, tego raczej nie nie przegapiłem, raczej błąd przy zaznaczaniu i wklejaniu. Dzięki za poprawkę.
tytuł tematu trochę zagmatwany, ale już wyjaśniam. Mam takie testowe makro: [syntax=vb]Sub agregacja() ' ' agregacja Makro ' ' Sheets("agregacja").Select Range("A3").Select Sheets("kohezja").Select Range("G1").Select Selection.Copy Sheets("agregacja").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False...
[syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column = 1 Then Application.ScreenUpdating = False w = Target.Row Set a = Sheets("Arkusz2") nw = a.Cells(Rows.Count, "A").End(xlUp).Row + 1 Range(Cells(w, "A"), Cells(w, "D")).Copy a.Cells(nw, "A") Range("E" & w).Copy a.Cells(nw, "E").PasteSpecial...
Problem mam z tym, ze jak bierze już dany wiersz do kopiowania w którym są checkboxy i kazdy z nich ma jakieś odwołanie, to wkleja wiersz ponizej już z tym odwołaniem. Nie wiem jak zrobić aby odwołanie się nie kopiowało, a checkbox tak
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...
Wielkie dzięki, w życiu bym tego nie ogarnął. Całość jednak działa tylko, gdy numer_wiersza = 1(wartość stała) Gdy jednak do kodu wklejam wiersz: [syntax=vbscript]numer_wiersza = Range("A" & ActiveSheet.Cells.Rows.Count).End(xlUp).... 0)[/syntax] niestety makro nie działa i nie bardzo wiem jak to naprawić. Plik rośnie z każdym kolejnym i nie wiem...
Rzecz w tym, że schowek office to inny obiekt niż schowek windows. Poniżej przykład umieszczenia danych w schowku systemowym oraz odczyt i wyświetlenie w msgbox. Uwaga: wymagane referencje, Edytor VB>Tools>References, zaznacz "Microsoft Forms 2.0 Object Library" Przyjąłem, że dane są w kolumnie "A", komórka "C1" użyta jako licznik. [syntax=vb]Sub proba()...
W sam notatnik wklejasz tylko te wiersze wyżej wyszczególnione przez (at)Acorus 20 . A jak otworzysz notatnik to na jego dole będzie linia w którą wpisuje się jego nazwę.
Witam. Może brzmi dziwnie, ale wytłumaczę: - jest w pierwszym wierszu funkcja typu: =ILE.NIEPUSTYCH(C9:C188) - ktoś mi wkleja wiersz z danymi przed wierszem C9 - funkcja automagicznie zmienia się na =ILE.NIEPUSTYCH(C10:C189) i diabli biorą obliczenia Potrzebuję to wykryć albo zablokować taką autodestrukcyjną reakcję w konkretnym arkuszu (nie całym pakiecie...
Wpisujesz tekst, zaznaczasz wszystko (Ctrl+A), włączasz numerowanie, kopiujesz (Ctrl+C) i wklejasz gdzie chcesz
No to lecimy: Uruchamiasz wiersz poleceń (cmd) w trybie administratora, wklejasz całą linijkę poniżej: "C:\Program Files\Common Files\microsoft shared\ClickToRun\OfficeC2RClient.exe" /update user updatetoversion=16.0.13901.20462 Klikasz, uruchamia się Office Update i jak skończy - cieszysz się terścią wiadomości
Najpierw wyznacz pierwszą wolną komórkę [syntax=vbscript] lastRow = Range("BZ" & Rows.Count).End(xlUp).Row + 1 If lastRow < 3 Then lastRow = 3 End If [/syntax] nastęnie wkopiuj: [syntax=vbscript] Sheets("Dane").Range("BZ" & lastRow) [/syntax]
Bojisz sprobowac? :) For r = 920 - od tego wiersza idzie 2012 2013...
Proszę o przykładowe makro kopiujące pierwszy wyfiltrowany wiersz z listy do nowego arkusza. W nowym arkuszu wklejane wiersze muszą dodawać się jeden pod drugim wraz z datą ich kopiowania.
tu masz makro kopiujące te dane z arkusz1 z komórkek b5:b10 do aktywnego arkusza do kolumny D [syntax=vb]Sub macro1() Worksheets("Arkusz1").Range("B5:B10").Co... Range("D:D").PasteSpecial End Sub[/syntax] Reszte musisz bardziej sprecyzowac bo nie bardzo czaje, nowy wiersz czyli do kolejnej kolumny?
Po złożeniu zamówienia w necie kumpel przepisuje teks na kartkę i mam zabawę wklepywania danych do excela. W excelu napisałbym mu makro ze skrótem klawiaturowym, ale z programowania jestem prawie zielony. Czy jest jakiś prosty sposób dodania do paska skrótów do aplikacji bądź skrótu klawiaturowego kopiującego zaznaczony tekst ze strony internetowej...
Wklej do modułu pliku z linka i uruchom. Makro w tej postaci "wydłubało" 1341 wierszy. Po wszystkim wyeksportuj, lub skopiuj arkusz "Wynik" do swojego pliku. Reszta w komentarzach.[syntax=vb]Sub Yoasia() ileArk = 2 'są dwa z danymi w pliku z linku. Zmień jeśli jest inaczej. 'tu sprawdzimy czy jest arkusz wynikowy, wstawimy jeśli nie 'nie zmieniaj kolejności...
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...
O teraz działa praktycznie w każdym wypadku! Tylko gdybyś mógł jeszcze włączyć opcję obsługi przypadku w którym w wierszu nie ma nic innego tylko "|". Program do raportów po tytułach części raportu wkleja jeden wiersz w którym jest ten jeden znak i to wykrzacza... i gdybyś mógł mi pomóc z tym oknem dialogowym..
Może to pomoże. http://www.elektroda.pl/rtvforum/topic30... Dodano po 1 Uruchamiasz wiersz poleceń jako administrator -> wklejasz do niego poniższe komendy ( tzn. każda linia potwierdzona enterem ) i sprawdzasz czy jest Internet. netsh int ip reset ipconfig /release ipconfig /renew ipconfig /flushdns ipconfig /registerdns arp -d nbtstat -r nbtstat...
Przed formatem możesz jeszcze wykonać poniższe polecenie. Nie będę teraz opisywał która linia co oznacza bo nie oto teraz chodzi. Uruchamiasz wiersz poleceń jako administrator -> wklejasz do niego poniższe komendy ( tzn. każda linia potwierdzona enterem ) i sprawdzasz czy jest Internet. netsh int ip reset ipconfig /release ipconfig /renew ipconfig /flushdns...
Mam jednak pytanie jak to się dzieje że wkleja to w odpowiednie miejsce? Cały mechanizm makra polega na przechodzeniu krokowym (założyłem wstępnie od wiersza 1 do 10 - ale to można odpowiednio dostosować do potrzeb) wzdłuż kolumn arkusza 1 i porównywaniu wartości z odpowiednimi komórkami arkusza 2 :D Jeśli makro napotka w którymś wierszu inne wartości...
Stosuj adresowanie bezwzględne, czyli zamiast BB2 napisz $BB$2. Niestety nie pomaga- próbowałem wcześniej- przelicza formuły. Przed importem jest =SUMA(Dane!$BB$2) po zaimportowaniu =SUMA(Dane!$BB$18) Nie wiem co zrobić by przy imporcie danych nie wklejało wierszy (tu upatruję problem)
Czy wiesz, że w "Arkusz2" prawdopodobnie w wyniku kopiowania, wklejania a następnie usuwania wierszy jest ponad 500 przycisków o nazwie "CommandButton1"? Kiedyś był już podobny temat poruszający ten problem. Kopiowanie i wstawianie wiersza z przyciskiem działa OK, ale usunięcie wierszy powoduje układanie się obiektów w stosik, z których widoczny jest...
Robisz zmienną, która odczytuje z określonej komórki wartość czyli ilość wierszy do wklejania i kolejne zmienne z wartościami do wklejenia. Wierszy = Cells(wiersz, kolumna).Value
Już mam =ZŁĄCZ.TEKSTY(A2;" ";B2;" ";B2) to wklejamy do wiersza nr 2 następnie przeciągamy na pozostałe wiersze
Niestety jest jeszcze jeden kłopot, kod nadpisuje wiersze w arkuszu 3, przy ponownym uruchomieniu wkleja dane w już wypełnione wiersze.
Cześć Wszystkim Proszę o zrozumienie ale dopiero raczkuję w vba i staram się sam rozwiązywać problemy ale teraz obecny problem mnie przerasta. Mam 12 tabelek, każda tabelka to jedno podejście do badań przez osobę kontrolującą . Uzupełnia wyniki i blokuje Swoją część. Ponieważ mój czysty formularz zawiera 12 takich tabelek chciałbym stworzyć takie makro...
tak najprościej to dopisz na końcu modułu Generate SQL to: Cells(16, 2).Value = szSql Wstawi ci tego stringa w komórce. Ewentualnie: Workbooks.Add ActiveSheet.Paste wrzuci do nowego sheeta. Albo jedno albo drugie wklejasz zaraz po: MsgBox ("Dane zostały wygnerowane: " & iColumnCount & " kolumn i " & iRowCount & " wierszy." & vbNewLine & vbNewLine &...
Cóż, taka już natura Excela... Pewnie wklejają się wszystkie odfiltrowywane wiersze, tylko jeden pod drugim, począwszy od pierwszego widocznego. Jak po tej operacji zdejmiesz filtr, to wszystkie odfiltrowywane wartości z kolumny A powinny być w kolumnie C, tylko jedna pod drugą. Nic na to nie poradzisz, trzeba po prostu być ostrożnym przy używaniu filtra...
Na przykład dodaj jeszcze jedną kolumnę przy wierszach które mają być liczone wpisz 1, w kodzie dodaj jeszcze jeden if który sprawdzi czy jest jeden jeśli jest to liczy jeśli nie to następny wiersz, lub po ostatnim Next do wartości p. K. i dodajesz tyle ile ma być pominiętych wierszy, np i =i +10 i jeszcze raz wklejasz swój kod który sprawdzi następny...
Witam, Nie zrozumiałem wcześniejszego posta. Zrobiłem pliki robocze. Jest jeszcze jeden plik związany z inną grupą produktowa i jego dane również będą musiały sie skopiować na takiej samej zasadzie jak wyżej. Jednak te dane będą wklejane od wiersza 2001 natomiast kasowanie powinno się odbywać się na wcześniejszym etapie od wiersza 2002 bo w wierszu...
Witam ponownie! Zrobiłem tak, jak w sposobie Adama, czyli: string strNapis1; char napis[65000]; do { cin.getline(napis, sizeof(napis), '\n'); strNapis1 = napis; }while(1); Kod kompiluje się bez problemu i wkleja wiersze :) Tylko co trzeba wpisać w while, żeby wyszedł z tej pętli ? Póki co cin.get lub 1 nic nie...
Najprościej: Nie zadziała jeśli target jest większy niż pojedyncza komórka (np. wklejanie kilku komórek). Odnośnie mojego przykładu - a u mnie działa ;) tzn. reaguje tylko na wiersz 5. Edit: Mała modyfikacja eliminująca pewną niedogodność przy wklejaniu kilku komórek na raz ;) [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Dim...
wstawiłam formułę. działa super ale kiedy próbuję ją skopiować w dół mam komunikat "ta operacja wymaga aby wszystkie scalane komórki miały takie same rozmiary". wklejanie formuły w każdy wiersz z osobna jest niemożliwe (mam ponad 2000 wierszy). w załączeniu plik z formułą. co zrobić ? jest jakiś sposób? pomocy!
Witam Rozumiem że korzystasz z tego kodu? [syntax=vbscript]Set Poczta = CreateObject("outlook.application") Set MojMail = Poczta.createitem(0) With MojMail .To = "mail(at)domena.pl" .CC = Poczta.Session.CurrentUser.Address .Subject = "Mój tytł" .ReadReceiptRequested = False .OriginatorDeliveryReportRequested = False .body = 'Tutaj chce w formie tabeli...
Dzięki za wszystkie wskazówki (bardzo pomogły). Pętla działa już jak powinna: For i = pierwszyWiersz To ostatniWiersz If Sheets("Arkusz2").Rang... = Sheets("Arkusz1").Rang... & i) Then licznik = licznik + 1 Sheets("Arkusz1").Rang...
Przenoszenie danych między wierszami i kolumnami Skopiuj dane znajdujące się w kolumnie (lub w kilku kolumnach) albo w wierszu (lub w kilku wierszach). Zanim wkleisz skopiowane dane, kliknij prawym przyciskiem myszy pierwszą komórkę docelową (pierwszą komórkę wiersza lub kolumny, w której chcesz wkleić dane), a następnie kliknij polecenie Wklej specjalnie....
Witajcie, Napisałem makro kopiujące cały wiersz. Problem mam z tym, ze jak bierze już dany wiersz do kopiowania w którym są checkboxy i kazdy z nich ma jakieś odwołanie, to wkleja wiersz ponizej już z tym odwołaniem. Nie wiem jak zrobić aby odwołanie się nie kopiowało, a checkbox tak. Poniżej wklejam kod: [syntax=vb]Sub WstawPo(SearchedRn As Excel.Range,...
Tak tez probowalem,ale Jak w komorce zaznacze archiwizuj wiersz i ten wiersz zaznaczam, wycinam, w drugim arkuszu znajduje pierwszy wolny wiersz i wklejam. Super tylko, ze jak zrobic ,by wycial ten z zaznaczona komorka i znalazl pierwszy wolny wiersz. W tym drugim arkuszu. By tam wkleic. Ok probowalem makro zrobic nawet na zasadzie, by w tym drugim...
Kolego. W Twoim arkuszu wklejasz ten kod w komórkę K11 i przeciągasz formułkę w dół. Od wiersza 11 wprowadzasz dane które Cię interesują. Później po wprowadzeniu nastu * dziesięciu faktur dajesz np sortowanie wg zapłaconyc * niezapłaconych faktur.
Na początku musisz ustalić długość kolumny, którą będziesz przeszukiwać tzn. ostatnią niepustą komórkę. Możliwe jest to za pomocą: Application.WorksheetFunction.CountA(... Do wyszukania wartości użyć można: Selection.Find() Cały wiersz zaznaczasz za pomocą: Rows().Select Zaznaczony wiersz kopiujesz: Selection.Copy Wklejasz: Range().Select...
Zamiast wklejać tonę zbędnych wierszy, proszę zastosować sie do tematu http://www.elektroda.pl/rtvforum/topic12...
Cześć wszystkim. Przygotowuję plik excel pod korespondencję seryjną, a dokładniej pod druk etykiet. Rzecz w tym że ilość etykiet jest różna, stąd i niektóre dane są powielane. Próbuję stworzyć makro kopiujące komórki A, B, C, F w każdym z wierszy, tyle razy jaka jest liczba w komórce H. Np. w H1 = 2 to pobiera dane z komórek A1, B1, C1, F1 i wkleja...
vcarter - w pierwszym poście przedstawiłeś kod, w którym wystarczy tylko zmienić wklejanie całej zawartości pliku na odczyt wiersz po wierszu i umieścić wszystko w pętli. VBA posiada wbudowane funkcje. które radzą sobie z własnymi oraz niektórymi obiektami systemowymi, w przeciwieństwie do Np Basica w Open Office, gdzie niemal wszystkie obiekty wymagają...
Witam wszystkich. Potrzebuję napisać macro, w którym: 1. Z Arkusza początkowego kopiuje wartości (nazwy dostawców) do osobnego Arkusza. 2. Przycina te wartości do wskazanej ilości znaków (tak, żeby mogły stanowić nazwę Arkusza). 3. Otrzymany wynik zwraca do pierwszego Arkusza w miejsce oryginalnych wartości. 4. Wracamy do nowego arkusza, w którym nazwy...
Rzeczywiście można bez pętli. To pozostałość bo pierwotny kod pozwalał wybrać liczbę kolumn jaką chcę się dodać. Po przemyśleniu stwierdziłem że może prościej będzie kopiować ostatnią kolumnę? Zamieniłem tę linijkę "ws1.Columns(iCol).EntireColumn.Insert" na "ws1.Columns(iCol).EntireColumn.Copy ws1.Columns(iCol)" i ładnie działa tylko zależy mi na tym...
Witam Jak napisać makro które będzie przeszukiwało kolumnę A i B http://obrazki.elektroda.pl/4124127900_1... Jeżeli w kolumnie B będzie więcej niż jeden ciąg znaków to dodaje wiersz i scala komórki jak na zdjęciu poniżej wartość z komórki A wkleja do scalonej komórki a wartości z kolumny B z danego wiersza wkleja do oddzielnych komórek...
adamas_nt , wyszukiwanie odpada. Często kopiuję i wklejam kilkanaście wierszy naraz. I chciałem sobie zautomatyzować proces edycji, żeby Excel również automatycznie uzupełniał dane w pozostałych komórkach kolumn. Stąd to moje dłubanie w Excelu.
Więc na początku programu daje wiersz = ActiveCell.Value a tam gdzie wklejam daje Range(wiersz).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False ale chyba jest cos nie tak bo niedziala i pokazuje na ten drugi kod :/
Cześć Marku! Plik działa wyśmienicie, jest znacznie więcej niż chciałem, o tym aby rejestrować PW i PZ nawet sobie nie pomyślałem a tak będe wiedział kiedy co weszło i wyszło! REWELACJA. Powiedz mi taką rzecz, czy dałoby się w zakładce technologia zamienić kolumny z wierszami tak aby w łatwiej było wklejać z BOMA materiał i ilości. Druga rzecz czy...
Intersect(Target, Columns(...)) zwraca zakres komórek typu Range(), będący wspólną częścią - w przypadku zdarzenia Worksheet_Change - obszaru, który uległ zmianie (Target) oraz wybranej kolumny (Columns(...)). Tym obszarem który uległ zmianie (Target) może być tylko jedna komórka (np. kiedy wpisujesz w nią wartość ręcznie), ale też zakres komórek (np....
Wszystko powinno być dobrze jeżeli pozbędziesz się kropki przy liczbach (a przynajmnierj przy ostatniej - największej). Innymi słowy jeżeli w pozycji Lp będą liczby jako liczby "moje" makro wstawiając kolejną pozycję będzie powiększać maksymalna liczbę Lp o jeden i wpisywać ją w pierwszej komórce wklejanego wiersza. (W kodzie makra za to odpowiada zmienna...
Ja pracuję na excelu XP i 2003 wszystko działa jak trzeba. Po włączeniu autofiltru i ustaleniu jakiś kryteriów zaznaczam dane (całą tabelę) http://obrazki.elektroda.net/1_127307734... przykładowe dane: http://obrazki.elektroda.net/94_12730764... ustawienie kryterium http://obrazki.elektroda.net/50_12730764... wynik: http://obrazki.elektroda.net/54_12730764...
Nie wiem, ale z Twojego pliku widać, że można tutaj zastosować bardzo prosty trick rozwiązujący ten problem - wprowadzenie na początku tabeli dodatkowej kolumny z identyfikatorem (numerem) trasy Umożliwi to dokładne wychwycenie wszystkich wierszy z określonym identyfikatorem Powiem szczerze nawet o tym myślałem, ale po pierwsze arkusz generowany jest...
To jest NIE-SA-MO-WI-TE! Działa! Excel/programowanie jest przepotężne. Robiłem ten "kod" za pomocą nagrywania makro oraz dodawałem coś od siebie, żeby to działało automatycznie. Asem w kodowaniu VBA nie jestem, ale jeżeli mój działał, to działał, a że działał tak sobie, to zwróciłem się o pomoc do (jak widać) odpowiedniej grupy użytkowników. (^_^)...
Kolejna prośba. Wiem, że dla Was będzie to sprawa prosta, ja się cały czas uczę i będzie mi potrzebna pomoc: W Arkuszu 1 wprowadzam dane w wierszu 1 Po naciśnięciu przycisku ZAPISZ (tutaj właśnie potrzebuję makra) kopiuje wpisane dane i wkleja w kolejny wolny wiersz w Arkuszu 2 (jednocześnie kasując wpisane dane w Arkuszu 1 i przygotowując go do dalszej...
(at)pkaczmarek2 Ponieważ często używam Tasmota z „backlogiem”, piszę ciągi poleceń w kilku wierszach za pomocą edytora Windows i kopiuję i wklejam je jako blok do wiersza poleceń. Działa to również z OBK. Wieloliniowy wyświetlacz spowodowałby, że byłbym trochę leniwy, jeśli chodzi o dokumentację ;-) Dziękuję za całą Twoją pracę! Dodano po 15 Wygląda...
Próbuje napisać makro, ale z uwagi na brak wiedzy odnośnie najprostszych poleceń nie umiem sobie poradzić. Wydaje się, że makro jest dosyć proste. Mianowicie: 1.Istnieje ciąg wyrazów w arkuszu A (CEL) 2.Po tych wyrazach przeszukuje arkusz B (BAZA) 3.Gdy znajduje to kopiuje wartość stojącą przy wyrazie w arkuszu B. 4.Wstawia ten skopiowany wyraz w kolumnie...
W tym, że nie ma kopiować całego arkusza. Jak znajdzie w kolumnie O i wierszu 10 wartość większą niż 70, to ma kopiować i wklejać do innego pliku tylko wskazane wartości z kolumn i wiersza 10.
Chciałbym, żeby to makro wyszukiwało mi ostatni wolny wiersz i tam wklejało dane z plików, czyli: [syntax=vb]wiersz = Sheets("dArk").Range("C65536").End(xlUp)... + 1[/syntax] Niestety moja znajomość VBA jest na razie (mam nadzieje :D ) na niskim poziomie i dołączenie tej części kodu wywala mi błąd. Druga rzecz. Pobierane dane nie zawsze są tej samej...
dotychczasową formułę mam zastąpić tą podaną wyżej ? Tak oczywiście :D wybraną formułę (albo tą długą, albo tą krótką naszego mistrza) wklejasz do komórki N4, zaznaczasz tą komórkę, "łapiesz" za uchwyt i przeciągasz ją wzdłuż całej kolumny N (od wiersza 4 do 19) :idea:
Witam, Potrzebuję makra, które będzie kopiowało i wklejało zawartość wiersza w którym: Jeżeli w kolumnie G komórka zawiera wartość to wstaw <pod nią> wiersze n-1 i skopiuj dane z tego wiersza. Czyli w komórce g8 pojawia się wartość 3 to makro wstawia pod 8smym wierszem 2 puste i kopiuje cały wiersz 8 do wstawionych wierszy. Mam nadzieję że dość,...
Wygląda na to że bez zmian dla przykładu jeden wiersz a arkuszu Arka w którym sformatowałem ceny kolorem czerwonym: Sam chciałeś W nagranym przeze mnie makrze takie wklejanie daje taką linijkę kodu: Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats Niestety nie wiem czy można ja dopisać do Twojego makra. Niestety nie potrafię z kodu wychwycić...
Dzięki za odpowiedź. Hmm,niestety nadal nie działa. Znalazłem za to inne rozwiązanie. Wklejam kod do wierszu poleceń Windowsa i mam to co chcę.
Witam wszystkich mam poważny problem z dodawaniem nowego wiersza za pomocą przycisku. Stworzyłem tabelkę, która zawiera wiele list rozwijanych i funkcji jeżeli to coś tam. Przycisk z odwołaniem do Makra dodaje mi kolejny wiersz zachowuje listy rozwijane ale nie przenosi funkcji i pojawiają się puste komórki. Czy może ktoś wie jak powinno wyglądać prawidłowe...
Można. Najłatwiej w VBA. Aktywujesz pierwszą komórkę wiersza (zakładam, że w przykładzie jest to pierwsza kolumna). Stosujesz pętlę Do While {ostatni znak = np.1 } ... kolumna = kolumna + 1 Loop zaznaczasz zakres od pierwszej kolumny do kolumny o numerze określonym przez "kolumna" z powyższego kodu. Kopiujesz i wklejasz w odpowiednim wierszu....
Cześć, Mam problem. Muszę porównać Stary plik z Nowy. Chciałbym, aby w kolumnie D w pliku Nowy wstawiała się wartość z pliku C dla danego zamówienia + plus komentarz np "Uwaga zmiana ilości z "wartość ze starego pliku" na "wartość z nowego pliku". Dodatkowo w kolumnie E pliku Nowy wklejały się wartości nie występujące w plik Nowy. Przykładowo w Nowym...
Można w ten sposób: 1. Wykorzystajmy kolumnę DA jako pomocniczą. W DA4 wklejamy =MOD(WIERSZ();2) przeciągamy w dół do DA229 i wiemy, który wiersz jest parzysty, który nie. 2. W komórkę H4 =JEŻELI(ORAZ(I4<>"&qu... i przeciągamy do H213 3. W J215 =JEŻELI(SUMA.ILOCZYNÓW((J4...
Bardzo dziękuję za pomoc, działa teraz bez zarzutów :) Naprawdę jestem bardzo wdzięczny, "życie mi ratujesz" Muszę tylko jeszcze wymyśleć coś z tym stałymi danymi, które muszą się wklejać do każdego wiersza zaimportowanego. Ale i tak już jestem zdecydowanie bliżej rozwiązania niż dalej :) Jeszcze raz dziękuję i pozdrawiam
Cześć, mam 2 pętle, ale niestety nie działa to tak jak trzeba. Chce brać z zakładki pierwszej konkretne komórki co 50 wierszy i wklejać je do innej zakładki co 31 wierszy. Niestety tak jak jest teraz kopiuje mi się tylko jeden zakres danych i wkleja do drugiej zakładki powtarzając się 332 razy. Wiem, z czego to wynika, ale nie mam pomysłu jak inaczej...
Witam, Mam problem którego jeżeli nie uda mi się rozwiązać w postaci kodu vba będę chyba siedział tydzień kopiując ręcznie dane. Chciałbym żeby kod kopiował zakres danych z Arkusza1 Kolumny A pomiędzy kolejnymi pustymi wierszami i wklejał je transpozycją do arkusza 2. W pliku wysyłam dane i w Arkuszu2 jak chciałbym żeby kolejne pozycje były przedstawiane.
WItam Mam taki o to problem. Jest tabela w ktorej muszę zamianić miejscami dwa wiersze, tzn. jeden jest na samej górze a drugi po środku. Da się je jakoś zamienić miejscami? Próbuje w następujący sposób: dostawiam na chwile na samym dole jeden wiersz odpowiednio już podzielony na komórki, następnie zaznaczam interesujący mnie wiersz i wybieram kopiuj....
Dziękuje bardzo za zainteresowanie tematem. Próbowałem jeszcze raz sam coś zdziałać na podstawie waszych sugestii ale poległem. Przesyłam w załączeniu arkusz z problemem. Sposób działania arkusza przedstawia się następująco: W zakładce DANE wklejany jest wiersz z innego pliku, w którym są wprowadzane pewne wartości na Stanowiskach nr 1-7. Jeżeli nie...
Witam, Mam pewien problem ze skopiowaniem a w zasadzie z wklejeniem danych z jednego arkusza do drugiego. Potrzebuję przekopiować każdy z wierszy z arkuszy Teryt Gminy, Teryt Mapy. itd i wkleic go do odpowiedniej kolumny w arkuszu "Polaczone dane z gmin" 21 razy. Pierwsza procedura w makro działa poprawnie, niestety w drugiej gdzie kopiuje dane z Tery...
Hej Chodzi mi o wszystkie pełne wiersze poniżej i wklejenie tego zakresu o wiersz wyżej. Kod trochę zmieniłam na swoje potrzeby i obecnie wygląda jak poniżej, zaznacza i kopiuje 1000 wierszy (tu wolałabym żeby zaznaczał wszystkie pełne) po pierwszym pustym ale brakuje mi wklejania skopiowanego zakresu o wiersz wyżej. Sub usuniecie() Application.ScreenUpdating...
A jeżeli obszar jest ogromny i nie ma możliwości zaznaczania pojedynczych komórek? Jakby to opisać... W Arkusz1 mam całą tabelę danych, kilkanaście wierszy jest ukrytych - nie są już w nich wprowadzane dane (archiwum - nie można usunąć czy przesunąć w inne miejsce) w Arkusz2 mam tabelę TYLKO z obecnymi danymi wprowadzanymi na bieżąco za pomocą formuł...
Witam uprzejmych forumowiczów. Od jakiegoś czasu borykam się z tematem uniwersalnego pliku, który miałby kopiować dane pomiędzy plikami pomiędzy kolumnami o takiej samej nazwie. Pliki powinny działać w sposób następujący: 1. Przycisk 1 -wskazuje plik (PA), z którego dane mają być kopiowane 2. Po wyborze pliku, z listy rozwijanej w komórce D9 należy...
Dzięki za sugestie Wcześniej wyrzeźbłęm wklejanie do nowego wiersza Został jeszcze wybór danych z aktywnego wiersza Sub Kopio_aktyw_wiersza() ' ' Kopiowanie danych z aktywnego wiersza kol. A do D ' ' kolumna = 1 ostatnia = Cells(Rows.Count, kolumna).End(xlUp).Row Range("A4:D4").Select 'zakres do kopiowania zawsze w aktywnym wierszu kol. A do D Selection.Copy...
Akurat robiłem coś takiego do swojego projektu i mam kod pod ręką. Wklejasz go do arkusza, który ma obsługiwać "kolorowanie wiersza" po wpisaniu wybranego znaku (w moim wypadku: litery x do kolumny 1). Kod został rozbudowany o "dynamiczne" ustalanie zakresu kolumn do zaznaczenia (ost_col - ostatnia kolumna nagłówka), obsługę zarówno wpisania pojedynczej...
Próbujesz wklejać zbyt duży zakres danych w stosunku do posiadanego miejsca w arkuszu, tak mniej więcej działa twoje makro: http://filmy.elektroda.net/24_1502974789... ( odtwarza się na pewno w mpc-hc ) Wklejany zakres jest o min. 1 wiersz większy niż dostępne miejsce w arkuszu. Pytanie: Jaki właściwie zakres danych chcesz kopiować z jednej zakładki...
Też miałem kiedyś ten problem.Założyłem się, że rozpracuję blokadę rodzicielską w tym tunerze,a jeśli mi się to uda,to tuner mam za darmo.Pomogło mi wyedytowanie zawartości pamięci i kombinowanie z wklejaniem pojedyńczych wierszy,aż doszedłem do wartości jednego bajtu odpowiedzialnego za blokadę.Teraz już nie pamiętam,który to był bajt i jego wartości(pamiętam,że...
Witam potrzebuję pomocy z vba otóż chciałbym żeby stworzyć makro które kopiuje i wkleja wartości(bez formatów jest taka opcja w excelu wklej wartości) ale żeby to makro przeszukało mi pewien zakres np g2 do h30 i jeżeli w np w g15 = "" lub w innej komórce albo w h 23 = "" itd. Wtedy kopiowało mi cały ten wiersz np a5 do h5 i wklejało np od l1 do s1...
Witam Mam pewien problem z kodem vba, zaznaczam jestem początkujący i jeszcze wszystkiego nie umiem. Napisałem taki kod który mi formatuje w pliku wiersz od B do N w przypadku kiedy jest spełniony warunek w kolumnie S, czyli w moim przypadku kiedy w Kolumnie S w jakimś wierszu jest liczba 30 wtedy formatuj na pomarańczowy wiersz od kolumny B do N itd....
A czy makro nie może być przerwane w momencie kiedy napotka pierwszą pustą komórkę w kolumnie A? Na ten moment makro długo działa chyba z uwagi na to czyszczenie kolumny B. W moich danych nie ma pomiędzy pustych komórek, tak jak w twoim pliku. Np. wklejam do pliku 100 wierszy (ciągiem, nie ma pustych pomiędzy) i te 100 ma ponumerować. Co więcej: Za...
nowe rekordy muszą się wklejać po kolei w te tabele obok (A1:D1, A8:D8 itd.) :?: :?: :?: Czy to ma znaczyć, że nowe rekordy mają być dopisywane do poszczególnych tabelek z tym samym ID ??? Jeśli istnieją jakiekolwiek racjonalne przesłanki, że poszczególne segmenty tabeli nie mogą być dziesięcio-wierszowe :cry: to w kodzie te dane mają kopiować się...
W 'Workbook_BeforeClose' kopiujesz zakres, otwierasz 'główny', określasz pierwszy pusty wiersz 'Cells(Rows.Count, "A").End(xlUp).Row + 1', wklejasz, 'Me.Save'.
Próbowałem to wszystko i bez pozytywnego rezultatu. Jest tam opcja wklejania "zachowaj szerokości kolumn żródłowych". Brakuje tam aby opcji - zachowaj wysokość wierszy źródłowych. Ale najlepiej jakby się dało nic nie robic przy formatowaniu tabeli wklejanej np. do nowego arkusza. Aby ona miała wymiary kolumn i wierszy takie jak w "oryginale". Może da...
Witam, Bardzo proszę o pomoc... Potrzebuję makro w Excelu, które będzie kopiowało po kolei komórki z wierszy z 'arkusza 1', wklejało je do 'arkusza 2' w odpowiednim miejscu, po skopiowaniu danych z jednego wiersza z 'arkusza 1', będzie drukowało 'arkusz 2' i jechało do następnego wiersza z arkusza 1 i robiło dokładnie to samo i tak aż do ostatniego...
Witam! Szukam i szukam od rana i znaleźć nie mogę. Problem mam taki: Mam kilkanaście plików Excela. W każdym kilkanaście - kilkadziesiąt arkuszy. W każdym arkuszu jakieś dane. Potrzebuje zrobić podsumowanie tego w jednym skoroszycie. Chciałbym, abym mógł wskazać plik z którego pobierałby dane ze wszystkich arkuszy z dwóch różnych wierszy i wklejał do...
Udało mi się napisać makro służące do kopiowanie i wklejania w innym arkuszu. Tylko teraz mam problem aby wklejanie odbywało się w kolejnych wierszach, tzn. pierwszy wiersz wklejony A2, następny A3 itd. Ktoś mógłby pomóc? [syntax=vbscript]Sub Makro8() ' Makro8 Makro ' ' Range("C4:C11").Select Selection.Copy Sheets("Dane").Select Range("A3").Select Selection.PasteSpecial...
Dzięki, makro jest bardzo dobre. Niestety przeszukuje tylko ten arkusz w którym je uruchomię. Bardzo proszę o jeszcze jedną modyfikację: Aby makro przeszukało arkusz pierwszy o nazwie 2010, później arkusz drugi o nazwie 2011 i arkusz trzeci o nazwie 2012. Po przeszukaniu każdego arkusza niech kopiuje wiersze jeden pod drugim do arkusza o nazwie RAZEM,...
Uzupełniłem kod ale nie działa mi IF i kopiowanie do komórki f9 w arkuszu oferta. Przesyłam w załączniku plik. Czy możesz mi napisać co tu jest nie tak? Ponadto zależy mi na tym aby dodać zależność taką: Jeśli w ofercie pierwsza pozycja jest pusta to program kopiuje do pierwszego pustego wiersza daną pozycję. Chodzi o to, że jak wybiorę coś z drugiego...
Witam, a mam pytanie, jak zrobić żeby skrypt w momencie wklejania nie czyscił trzech pierwszych wierszy (a'la stalych naglowkow?). Cos w stylu odsunięcia operacji o 3 wiersze w dół.
Jest postęp :) Makro działa ale po włączeniu pokazuje się błąd "400". Do kolejnego wiersza arkusza 2 wkleja się nazwa pliku który jest obecny w katalogu i jego struktura nazwy jest zgodna z tą opisaną w kodzie. Teraz tylko pytanie, jak dalej zrobić aby kopiować zawartość wiersza nr 2 z pliku 1_19, 2_19, ... n_19 do tego pliku zbiorczego?
Wiersze maja być wybrane losowo? Jeśli tak to ustawiasz kursor na początku wiersza w notatniku przewijasz o x wierszy trzymasz shift i klikasz na końcu wiersza, kopiujesz i wklejasz do Excela, możesz tak skopiować wszystko partiami do kilku plików excel, myślę że max godzina i miałbyś już to zrobione. Kopiuj ac po 50k wierszy wykonał bys ok 40 operacji...
dane z wielu plików i wklejać je jako niesformatowane dane do jednego arkusza w oddzielnym skoroszycie... każda tabela z danymi ma inna liczbe wierszy . Zaczynają się zawsze w tym samym punkcie i liczba kolumna jest taka sama ale liczba wierszy zawsze inna. Różna jest także liczba arkuszy ale dane zawsze znajdują się w ostatnim . Wszystkie pliki z...
Postarałem się to uprościć. Na dzień dzisiejszy muszę wszystko kopiować i wklejać w zamówienia. Robię to niby raz w roku ale...
wklejać kolumna wiersz wklejać zdjąć instrukcja wklejać
schneider gniazda automatyczne przełączanie elektrowni gniazdka angielskie
panasonic szybkie przewijanie impuls cd4011
Czy opona 215/65/R16 pasuje do Golf Plus 2009? Wymiana sanek w Passacie B5 1.9 TDI 90 KM - krok po kroku