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]
Może więc takie rozwiązanie jak w załączniku? Menu kontekstowe PPM jest zablokowane, ale jeśli nawet ktoś je wywoła, to nie może wykorzystać wklejania: http://obrazki.elektroda.pl/7679986700_1... Na wstążce zablokowane są funkcje przycisków: http://obrazki.elektroda.pl/8622171000_1... Cały czas jednak mam wrażenie, że takie całkowite...
Co masz na myśli pisząc "karta"? Dla arkuszy skoroszytu można zagnieździć kod w kolejnej pętli For ark = 1 to thisworkbook.sheets.count ' lub liczbowo indeksy Np 2 To 4 sheets(ark).select 'kod Next
Najprawdopodobniej wchodzą dwa slash'e. Najlepiej dopisywać warunkowo. Przy okazji: przypisujesz tę samą wartość do dwóch zmiennych (nieszkodliwa nadmiarowość)[syntax=vb] ImgFldr = InputBox(AnsDirPrompt, "Powitanie", "C:\") 'ImgFldr = AnsDir CurrentFile = Dir(ImgFldr & IIf(Right(ImgFldr, 1) = "\", "", "\"))[/syntax]
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'?
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...
dziekuje bardzo... a czy makro mogloby wklejać ten zakres jako wartości??
Istotne jest dla mnie też aby administrator w prosty sposób mógł przerwać działanie makr. . W tej chwili od momentu otworzenia pliku w arkuszu nr 2 makra nie pozwalają na wykorzystanie kopiowania i wklejania. Zadanie jest taki aby admministrator na czas swojej pracy mógł w prosty sposób wyłączyć makra, a po skończeniu pracy - z powrotem je włączyć....
szablon.SaveAs Filename:=sciezka Proponuję użyć SaveCopyAs. Ale nie wiadomo, czy makro (jego nazwa sugeruje tworzenie arkuszy), czy też ma tworzyć nowe pliki.
Spróbuj [syntax=vb]Sub Makro() wrs = 2 'pierwszy wiersz zakresu ile = 36 razy = 30 Do While Cells(wrs, 1) <> "" wrs = wrs + ile For i = 1 To razy Rows(wrs & ":" & wrs + ile - 1).Insert shift:=xlDown Rows(wrs - ile & ":" & wrs - 1).Copy Rows(wrs & ":" & wrs + ile - 1) Next wrs = wrs + ile * razy Loop End Sub[/syntax]
w jaki sposób makro będzie wiedziało z którego fragmentu kodu html pobrać dane? Takie rzeczy zrobisz za pomocą kwerendy. (excel>narzędzia >pobierz dane zewnętrzne) do jakiejś bazy z kursami
Sprawdź załączony plik.
Wkleiłem ten kod w visual BASIC i po uruchomieniu nic się nie dzieje. Nie bardzo wiem co mogę odpowiedzieć, ja wklejam i działa. Może prześlij plik do którego to wkleiłeś?
Istnieje na to jakaś funkcja, Mozna funkcja przy zalozeniu ze numery pozycji z CP-P, CP, TPP itd. i rok nie powtaraja sie tzn. ze np. 201207527 w kosztach jest tylko dla 2012 TWP w 'arkusz...2012 w B7 =INDEKS('[koszty pozyskania.xlsx]WYKONANIE 2011 2015'!B:B;PODAJ.POZYCJĘ($A7;'[koszty pozyskania.xlsx]WYKONANIE 2011 2015'!$A:$A;0)) przeciagnij wprawo...
Kod wklejamy pomiędzy znaczniki (Syntax) - opcja "Listing kodu". Twój post (z racji pełnienia funkcji) poprawiłem, przy okazji łącząc oba w jedno ;)
Porada okazała się skuteczna. Makro jest już pełnosprawne. Dzięki
Po pierwsze - ustaw breakpoint'y i zobacz, w którym miejscu Cie "wyrzuca". Po drugie - po osiągnięciu sumy >20 przechodzisz do nowego arkusza, coś tam wklejasz po czym nie wracasz do pierwotnego arkusza - a Twój kod pracuje na arkuszu w tym momencie aktywnym.
makro które z wybranego folderu pobiera jpg i wkleja w odpowiednią komórką Dlaczego to samo makro nie wkleja to zdjęcie do dwóch innych arkuszy? Zalacz to pierwsze makro. Dodano po 8 Od razu po wklejani Selection.Name = "To_co_Chcesz"
Gdybyś zarejestrował sobie makro, to pewnie udałoby Ci się je zmodyfikować pod ten problem. Makro nic więcej nie robi, jak kopiuje i wkleja. W załączniku masz rozwiązanie.
W 'Workbook_BeforeClose' kopiujesz zakres, otwierasz 'główny', określasz pierwszy pusty wiersz 'Cells(Rows.Count, "A").End(xlUp).Row + 1', wklejasz, 'Me.Save'.
Moze być tak :) [syntax=vb]Sub kopiuje() Application.ScreenUpdating = False Dim ws As Worksheet Dim ws2 As Worksheet Set ws = Sheets("Arkusz1") Set ws2 = Sheets("Arkusz2") With ws .Cells(1, 1).Copy End With With ws2 ws2.Activate Cells(Rows.Count, "A").End(xlUp).Offset(1).PasteSpecial End With ws.Activate Application.ScreenUpdating = True End Sub[/syntax]...
Jeśli nie tabela przestawna to myślę, że najlepszym rozwiązaniem jest zastosowanie makra. Takie makro może pobierać datę na którą ma być obliczona godzina wejścia wyjścia i dla wszystkich pracowników wklejać w odpowiednie pola odpowiednie czasy. Jeśli będziesz zainteresowany mogę przedstawić więcej szczegółów.
Metoda PasetSpecjal z klasy Range nie powiodła się. No pewnie, że się nie powiedzie. Podałem tylko przykład, a nie rozwiązanie. Zanim wykonasz Selection.PasteSpecial, musisz wybrać arkusz i komórkę, do której wklejanie nastąpi...
Zainteresuj się trochę innym podejściem do problemu. Może do wykonania tego zadania, wystarczy użycie wbudowanej w Word-a funkcji Mail Merge . Funkcja ta pozwala na wypełnianie szablonów dokumentów Word, danymi pochodzącymi z arkusza Excel.
A takie coś nie wystarczy? Po wykonaniu skryptu kopiujesz 2 kolumny wynikowe na nowy arkusz i wklejasz specjalnie tylko zawartość.
Nagraj makro jak wklejasz wartość i na tej podstawie zmodyfikuj swój kod
Przyznam się że makro jest dla mnie dośc egzotycznym pojęciem, możesz mi powiedzieć w jaki sposób je zrobić?
Uruchom rejestrację makr Zrób co chcesz aby zrobiło makro Formułę musisz wpisać do komórki (a nie wklejać) Zatrzymać rejestrację i wejść w edycję makra Tam zobaczysz kod i formułę w takiej postaci jak chce VBA Dostosować makr do swoich potrzeb I tyle Mam nadzieję iż teraz jest to jasne.
Czy takie makro w kodzie arkusza spełni zadanie? [syntax=vba]Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.CutCopyMode = False Application.CellDragAndDrop = False End Sub[/syntax]Pozostaje możliwość kopiowania przez schowek systemu Office i makrem.
Mnie te makra nie zawiesiły Excela ani razu, ale testowałem je na wersji 2007 i 2010. Być może problem jest spowodowany przez połączenie wklejania danych ze schowka z wstawianiem komórek. Jeśli formatowanie komórek nie ma znaczenia i kopiowane są stałe (tak to przynajmniej wygląda w przykładowym pliku), to może zrezygnować z kopiowania na rzecz przypisywania...
Makro umieść w kodzie arkusza, prawy pm i wybierz "Wyświetl kod" lub wklej przez edytor. Równie dobrze można wrzucić do modułu, wtedy makro (jeśli nie sprecyzujesz) będzie działać w aktywnym arkuszu.
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.
Formuły nie dam rady napisać, ale wklejam Ci makro. Tak mniej więcej mogłoby to wyglądać :wink:
Witam, bardzo serdecznie:) Makro wysypało mi się teraz trochę w innym miejscu. Niby prosta rzecz do zrobienia, tak mi się wydaje, skopiowanie zakresu pojedynczych komórek i wklejenie ich, żeby stały jedna obok drugiej w jednym wierszu zaczynając od komórki A1 (arkusz Excel). Makro w arkuszu Excel działa i wygląda mniej więcej tak: "Selection.PasteSpecial...
Dziękuję za odpowiedź. Tutaj szczególnie chodzi mi o makro. W oryginalnym pliku mam ok 300 rekordów, po posortowaniu kolejne makro (to już mam) kopiuje dane od nazw (które właśnie chciałbym aby posortowały się zgodnie z listą) i wkleja je gdzieś indziej. Właśnie dlatego potrzebuję aby było to makro.
Nagraj makro polegające na skopiowaniu i wklejaniu... jako formuły / jako wartości... Może coś rozjaśni...
trochę zmieniłem podejście Musisz założyć z góry co chcesz osiągnąć a nie co chwile wklejać jakieś makra. "Widzę", że chcesz pobrać tylko 5 wartości z kolumn(F,J,L,N,W) można to zrobisz tak j.w czy przez zwykłe kopiowanie. Chciałbym, żeby napisany kod mógł sprawdzić czy plik jest już otwarty i jeżeli tak, żeby pominął krok otwierania pliku - nie udało...
Tak samo F11. W oknie po lewej stronie dodajesz nowy moduł, a w treści po prawej wklejasz potrzebne makro. ----------- Miało być ALT+F11 ;)
Witam, mam stare makro na kilka stron a4 napisane jeszcze pod windowsem 2000. W firmie wszystko przeszlo na nowe windowsy poza jednym komputerem. Makro niedziala pod nowym excelem i wykrzacza sie w momencie wklejania. [syntax=vb] Worksheets("Working").Select Range("a1:iv65536").ClearContents Range("a1").Select ActiveSheet.Paste If ActiveCell.Offset(11,...
Wpadłem na taki sposób, wklejam wszystko poziomo (transpozycja) i czy da się teraz zrobić tak, żeby szło to poziomami? Np. Wklejam tak: 1 1 1 1 2 2 2 2 3 3 3 3 4 4 4 4 Chcę otrzymać tak: 1 1 1 1 2 2 2 2 3 3 3 3 4 4 4 4 I już by mnie to zadowoliło w 100%. Poziomo czy pionowo zdaje się, że to dalej będzie przekładaniec... W załączniku moje próby i pod...
Dzień dobry. Dziękuję za odpowiedź. Chodzi o to żeby komórki, które zaznaczyłam na pomarańczowo kopiowały się do następnej kolumny (po naciśnięciu guzika "+" z przypisanym makrem). Czyli żeby H60:H80 wklejało się do I60:I80, potem do J60:J80 itd. (po każdym naciśnięciu guzika). A mnie się wkleja ten zakres komórek w kolumnie A w odległych wierszach....
Podmień linijkę wklejania. Podaję cały blok copy-paste dla porównania kolRight = Range("d2").End(xl... Range(Cells(wrsLeftTop, 4), Cells(wrsLeftTop + 1, kolRight)).Copy Range(Target.Address).Offset(... 1).Select Selection.PasteSpecial Paste:=xlPasteFormats Application.CutCopyMode...
A jak zablokować tą "komórkę" żeby po odpaleniu programu i wybraniu np. pozycji Nowak nie było można usunąć ani zmienić tekstu ? bo jak odpalam program i wybieram Nowaka to mogę usunąć litery i wpisać własny tekst. [syntax=vb]ComboBox1.Style = fmStyleDropDownList[/syntax] [syntax=vb]Range("b1").Value = UserForm1.ComboBox1.Value[/syntax] [url=http://support.microsoft.com/kb/265...
Nie da się tego przedstawić w formule, ponieważ chodzi o to żeby makro WKLEJAŁO nowe komórki gdy znajdzie więcej niż jeden odpowiednik. Tak samo, żeby makro zliczało wszystkie powtarzające się wartości i do nich odpowiednio przypasowywało dane.
Temat do zamknięcia. Poradziłem sobie sam. Chodziło mi dokładnie o takie coś: [syntax=vbscript]Sub Makro1() ' ' Makro1 Makro ' ' Klawisz skrótu: Ctrl+d ' ile = Int(InputBox("Ile ma się skopiować tabelek? ", "Wpisz liczbę", 3)) If ile < 1 Then Exit Sub l = 1 Range("C4:D17").Copy ActiveCell.Range("A1").Select ActiveSheet.Paste For i = 1 To ile ActiveCell.Offset(0,...
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...
Dzięki za zainteresowanie. Jednak w rzeczywistości Arkusz B jest nieedytowalny i nie można w nim odkryć skoroszytu z danymi tak jak w załączonym. Zrobiłem taki arkusz dla przykładu. Jeżeli była by taka możliwość zastosowałbym funkcję WYSZUKAJ.PIONOWO. Tak więc muszę napisać takie makro aby mi pobierało numer z Arkusza A wklejało do Bazy Arkusz B i pobierało...
Cześć, mam taki problem. Chciałabym zarejestrować makro, które będzie kopiowało komórkę i przenosiło do innego arkusza. Jednak wartości tej komórki będą się zmieniać, a jak rejestruje zwyczajnie kopiując i wklejając, to potem makro wkleja mi tę wartość, którą skopiowałam przy rejestracji, zamiast nowej, która pojawiła się w tej komórce kopiowanej. Proszę...
tu masz makro kopiujące te dane z arkusz1 z komórkek b5:b10 do aktywnego arkusza do kolumny D kopiowanie z kolumny w Arkusz1, następnie transpozycja i wklejenie w wierszu w aktywnym arkuszu (każde użycie makra wkleja do kolejnego wolnego wiersza wiersza)
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...
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ę...
Tylko 2 będą ? Czy chcesz więcej żeby na dole się wklejało ? Mam coś dla Ciebie. Zobacz czy o ten efekt Ci chodziło ? Zrobiłem Ci od paczątku.
1. Załóż filtr w oryginalnej tabeli (niepuste) -> zaznacz całą tabelę i wtedy dopiero kopiuj dane . Może nawet lepiej wklejać "tylko wartości" niż dane z pełnym formatem każdej kopiowanej komórki. Zrobisz to w jednym ruchu zamiast korzystać z pętli (2000 razy). Po nagraniu makra można edytować zaznaczony zakres tak, żeby najlepiej nam odpowiadał. 2....
Przepraszam ,że zawracam głowę ale nie mogę sobie poradzić z prawidłowym wyznaczeniem ściezki pliku ,który ma zostać skopiowany. Powinna ona być następująca - I:\Wycena Efos\NabyciaUmorzenia + dane z Wyciagu powinny wklejać się do arkusza o nazwie PODST - Wkleić
Musiałbym wtedy kopiować tekst do innego edytora, tam usuwać entery i wrzucać przecinki, a później w Excela. Problem polega na tym, że chcę tego uniknąć, bo niektóre opisy są obszerne, a produktów 24.000 i do każdego opis jest inny. Może ktoś zna jakieś makro na pomijanie styli tekstu przez Excela? Dodano po 34 Temat rozwiązany. Sposób miałem prosto...
Chamski (podwójne NOT) kod, ale działa. - najpierw wybierasz sobie "co chcesz wstawić" z komórek D1..D6 - potem wybierasz sobie "gdzie to wstawiasz" - komórki A1..A6 O pierwszej nad ranem trudno o lepszy kod :) Myślę, że koncepcję moją już znasz, przerobisz sobie "na swoją modłę" - jak będziesz chciał. Kod wklejasz bezpośrednio w kod arkusza, którego...
Witam, Posiadam w pracy pewien program zakładowy do którego muszę wklepywać numery zamówień. Jest to trochę męczące zajęcie, ponieważ na dzień mam 150 pozycji do wpisania a właściwie przepisania z arkusza w excelu. Każdy numer muszę przepisac lub wkleić osobno. Każdy numer zamówienia mam w osobnym wierszu, dlatego po kolei kopiuje sobie komórkę i wklejam...
Jeżeli w kolumnie L zamiast formuły opartej na funkcji IFS() (której nie ma nawet w wersji Excel 2016 :cry: ) wprowadzisz formułę: =JEŻELI(ORAZ(D5<7000000;D5>6000000... :idea: to makro kolegi (at)PRL zacznie działać :spoko: - wystarczą drobne korekty kolumn do których wklejane są dane...
Tak, musisz zrobić Display (żeby się stopka pojawiła), a następnie zapamiętać wiadomość w HTML wraz ze stopką, wpisać resztę treści dodając zapamiętaną stopkę na końcu. Jeżeli w szablonie maila masz jakieś "Dzień dobry" na początku to musisz pokombinować z wklejaniem treści gdzie trzeba. Trudniejsze (bo to html), ale da się. Ja zrezygnowałem z tego...
Witam, Mając wykonany printscreen obrazku, z pozycji komórki, w której ma być wklejony, uruchamiam makro, które: - blokuje współczynnik proporcji - wstawia mi obrazek automatycznie pomniejszony do wysokości 2,5 cm - zmienia właściwości obrazu na "przenoś i zmniejszaj rozmiar wraz z komórkami". Już parę dni męczę temat i nie potrafię dopisać warunku,...
Przecież masz opisane Wklejasz makro do modułu (paski narzędzi - visual basic - edytor visual basic. menu insert - moduł ... i tu wklejasz kod funkcji) Edytor możesz zamknąć. Przechodzisz do arkusza i w wolnej komórce wpisujesz np =liczkolory(A1:B100;5) wg podpowiedzi: =liczkolory(zakres;indeks koloru) I masz policzony dany kolor
Kod w tym skoroszycie, uruchamiany skrótem kalwiszowym Może po kolei : - mam plik csv -wrzucam go do arkusza 1 przez dane\z pliku\tutaj zamienia mi pomaga już excel automatycznie rozdzielając " ; " średniki w tekscie. i tutaj dopiero uruchamiam makro które sortuje nazwisko a-z i daty a następnie wkleja posortowane dane do arkusza 2 i tam są dalsze czynności...
Nagrałem makro które kopiuje dana tak jak chce, lecz gdy zmienię datę (B2) to dalej wkleja do tych samych komórek a nie pod odpowiednią datę.
tak powiązane. W arkuszu 4 dane ułożone w wierszu od kolumny A do D 0123456 011-6500-011-00001/11 011-6510-011-00001/11 011-6520-011-00001/11 urbanek Makro w arkuszu1 w kolumnie A (dane są jakieś) i szuka zawsze w kolumnie A w arkuszu 2 i kolumnie a arkuszu 3 i jeśli znajdzie dane to przenosi dane do arkusza 4 i wkleja w kolejności wartości przyporządkowane
potrzebuję datę np 15.10.2021 rozdzielić na dzień 15 i miesiąc 10. Następnie połączyć dane z innej kolumny z dniem i miesiącem. Proponuję zamiast kombinować z makrem wprowadzić do kolumny H (tej ze złączeniami) prostą formułę :idea: :D : =E2&" "&TEKST(DZIEŃ(F2);"00")&"."&TEKST(MIESIĄ... i przeciągnąć ją w dół :D , albo nagrać sobie makro...
Spróbuj nagrać makro które zamiast wklejać wszystko ze schowka (Paste), będzie wklejało specjalnie jako wartości (lub inna opcja która nie wklei "kropeczek" - PasteSpecial + parametry).
Cześć, Mam ciekawy case do zrobienia, ale niestety nie ogarniam na tyle VBA, żeby to zautomatyzować, dlatego przychodzę po pomoc. Musze zautomatyzować proces SQL->EXCEL->WORD. Proces wygląda tak, że dane z tabeli źródłowej mam podłączone pod excela, po odświeżeniu zaczytują sie do 4 tabel w 4 arkuszach. Następnie odpalam WORDa, który pobiera dane klientów...
Jaka wersja Excela? mam tylko problem z tym, żeby te dane wprowadzały się do kodu i najlepiej od razu pojawiały w systemowym schowku. Wówczas można by je od razu wklejać w odpowiednie miejsca. Dlaczego chcesz używać schowka jako pośrednika? Gdzie znajduje się owo "odpowiednie miejsce"?
Udało mi się dopasować pliki i przetestować. Za każdym razem pojawia mi się komunikat - w schowku jest duża ilość informacji, czy chcesz później wklejać je do innego programu. Może źle dopasowałem? nie mam wprawy w excel. Czy można wprost przenosić dane bez np formuł. Tzn w każdym pliku jest lista rozwijana z RM (wybór z kilkunastu opcji), czy też...
Program masz "prawie" gotowy. Pomyśl, potrzebujesz odwołać się do Nr wiersza komórki spełniającej kryteria (tutaj zmienna "abc", zadeklarowana jako 'Range'). Będzie to wartość właściwości 'Row'. Następnie należy znaleźć lub określić Nr ostatniej w wierszu. Zadziałaj podobnie (metoda End), jak masz to z licznikiem pętli. Pozostaje przeliczenie (wymnożenie)...
Cześć, Może ktoś podpowiedzieć jak działa to makro ? Tj gdzie tu jest wklej zawartość do pliku .. albo co zmienić aby to działało. https://www.extendoffice.com/documents/e... Generalnie mam arkusz z dużą ilością obliczeń i chcę część z nich zapisać do pliku CSV - to makro robi teoretycznie to co chcę tj zaznacza...
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
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...
W ogóle nie masz żadnej wolnej komórki by tam wklejać dane? A może dołóż dodatkowy arkusz (choć jeżeli to jedna liczba to trochę bez sensu) Pozostaje makro - ale czy to będzie szybciej?
Pytanie dot. [url=http://www.elektroda.pl/rtvforum/to... Mam problem z przerobieniem tego makra. Chodzi o to, że u mnie dane są przesunięte. Nie występują też przerwy w przeszukiwanych danych, ale to najmniejszy problem. W załączniku przestawiłem dane w Arkuszu 2 - chodzi o to, że nie wiem jak to makro przerobić, by baza była przeszukiwana...
Nie rozumem o co chodzi z tym leczeniem kanałowym i co to ma do dolnej kolumny... Ogólnie ciekawy pomysł... dolna kolumna... Biorąc kod marcimix wyszło takie coś: [syntax=vb]Type iCell Row As Integer Col As Integer End Type Sub ColorNext() Dim C As iCell Dim r As Range Dim tmp As Range Dim step As Integer C.Row = Excel.ActiveCell.Row C.Col = Excel.ActiveCell.Column...
Możesz sobie dostosować makro z załącznika. Dziękuję bardzo piękna sprawa, kopiuje założone dane i wkleja je tam gdzie potrzeba. Pozostaje tylko dodanie nazwy pliku do wklejanych danych, a to ze względu iż plik dawcy nie ma informacji identyfikujących. Programik generujący pliki daje identyfikacje tylko po nazwie pliku... Czy ktoś może pomóc w tym...
Hej, podpowiedzcie mi proszę, jak zrobić następującą rzecz: Makro w istniejącym skoroszycie tworzy nowy skoroszyt, do którek wkleja dane, następnie szuka potrzebnych informacji i kopiuje je z nowego do już istniejącego. Na sam koniec nowo utworzony skoroszyt zamyka bez zapisywania go
Zawsze można użyć kopiuj/wklej. Mam kilkanaście dokumentów Worda Właściwie jest to kwestia skali i "powtarzania się problemu", czyli: jeżeli problem jest bardzo rozległy lub jeśli będzie się powtarzać dla różnych danych, to warto rozważyć makro. Jeśli nie, to po co makra skoro można to zrobić ręcznie? Rozwiązanie bez makr: tabela z pliku txt do Excela,...
Czesc. Próbuję napisać makro, które wysyła maila, z komentarzem, który wpisze w odpowiednie komórki ( to działa), załączy plik (to równiez działa) ale powinien równiez wklejac do treści maila wykres, który znajduje sie w pliku excel. Moż ektos pomóc jak to zorbic? Ponizej kod ktory wysyla: [syntax=vbnet]Dim oOutlook As Object Dim oEmail As Object Dim...
Ale po co ci makro. Kopiujesz tekst z pliku txt. Zaznaczasz w excelu komórkę a1 i wklejasz. Zaznaczasz całą kolumnę A. W menu "Dane" wyszukujesz "Tekst jako kolumny..." . (excel 2003, XP i starsze - w 2007 też to jest tylko ja nie trafiam gdzie to teraz pochowali) Wciskasz "stała szerokość" i bez żadnych ustawień wciskasz zakończ. Lub dla pewności zamiast...
Witam! Męczę się z tym od kilku dni potrzebuje pomocy przy stworzeniu pętli. potrzebuje aby program robił coś takiego [syntax=vb] Range("A16:V29").Select Selection.Copy Range("A30").Select ActiveSheet.Paste Range("A44").Select ActiveSheet.Paste Range("A58").Select ActiveSheet.Paste[/syntax] Chodzi o to aby wklejał zaznaczenie o 14 komórek niżej, najlepiej...
Próbowałem też bezpośrednio w kodzie makra wklejać lub wpisywać te znaki, ale nie chce przyjmować Ale przyjmie arkusz. Zrób tabelkę, do tego odpowiednie makro...
Wszystko gra jeżeli jest stała ilość arkuszy i one co miesiąc są takie same. czy u ciebie jest podobnie? Niestety u mnie miesiąc w miesiąc te arkusze się zmieniają, albo trzeba któreś usunąc albo nowe dodac więc to odpada.. Czyli zostaje makro, a ja z tego jestem kompletnie zielony:) ale dziękuję za pomoc. Będę sobie wklejał ręcznie ;]
Witam i proszę o pomoc stworzyłem co prawda za pomocą rejestrowania makr makro które po aktywacji wkleja tło do arkusz i działa ok. Problem pojawia się wtedy kiedy przesyła arkusz do innego użytkownika i makro wtedy nie działa. Pomyślałem że rozwiąże to w sposób taki że i plik excela obraz jpg umieszczę w jednym katalogu i karze pobierać plik zgodnie...
Bardzo ciekawy link :) Dalej nie wiem czy dobrze rozumiem ale... Wykorzystując idee z linka co podałaś można zmienić przypisanie zadanie skrótom klawiszowym (i przyciskom z menu zwykłego i kontekstowego - ale to bardziej skomplikowane). Podstawić tam własny kod wykorzystując np. makro z "wklej specjalne - wartości". Z tym że jak to autor napisał jest...
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...
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. (^_^)...
Dzień dobry, Muszę przygotować zestawienie w postaci dokumenty Worda na podstawie danych które mam w arkuszu Excela. Napisałem makro Excela, które uzupełnia przygotowany szablon w Wordzie danymi i wykresami z arkusza Excela (oba pliki w załšczaniu). Makro pobiera dane z arkusz i wkleja do pól szablonu Worda tam gdzie sš ustawione zakładki (bookmarks)...
Prot, bez wątpienia to krok w dobrym kierunku :idea: Ale chyba coś źle robię :/ bo jak kopiuję opis z Excela, wklejam go jako tekst do Worda, a następnie chcę zastosować Twoje makro to się źle formatuje :/ Nie wiem gdzie popełniam błąd. Podsyłam plik Excela z przykładowym raportem oraz Worda, w którym wklejony jest raport. Trzeba do pliku wkleić Twoje...
Witaj This Workbook , ale niestety nic się nie dzieje.
Makro ma pozwolić na przeliczenie danych z np. 20-30 osobnych plików, które mają dane zawsze w zakresie A1:U100. W pliku TESTY wklejamy do zakładki DATA dane skopiowane z otwartego pliku, następnie w zakładce REPORT w komórkach AE4:AE15, mam wybrane dane po przeliczeniach, które kopiuję do kolejnej zakładki ZBIORECZE WYNIKI. Kolejne pliki są przeliczne...
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,...
Kiedyś pomogłeś mi tak [url=http://www.elektroda.pl/rtvforum/vi... I właśnie w ten sposób bym to widział, ale nie wiem jak, Jutro podrzucę plik z pracy to będzie wiadomo jak to ma działać EDIT: Plik wrzucony. Dane z arkusza: WKLEJANE DANE dostaje jako raport w innym pliku. Wklejam je do arkusza TEMP i uruchamiam...
Witam, mam makro kopiujące tabelkę dowolną ilość razy (w zależności ile użytkownik ustawi). Niestety mam problem z obramowaniem - niektórych linii nie chce skopiować (próbowałem już wklejać specjalnie - nic nie pomogło). Wie ktoś może czy istnieje jakieś rozwiązanie? Chciałbym uniknąć zapisu tworzącego dodatkowe linie gdyż wydłuża to ponad 2 razy moje...
Właśnie zależy mi na tym bo można było normalnie skopiować ctrl+c ctrl+v Rozwiązanie z wklejaniem specjalnym nie rozwiązuje problemu bo jak kopiuje dane z tej mojej tabelki i wklejam do nowego arkusza, to dane są wklejane co 5 kolumnę, a chciałbym aby były kolo siebie. Poza tym w drugą stronę (czyli kupując dane z innego arkusza do tego mojego) cały...
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...
W poście niżej masz to opisane Ale tu zrobiłbym ciut inaczej, Np Fajnie działa, tylko jak jeszcze dodać, by po otworzeniu pliku automatycznie pobierało dane z komórek B3:AX500 i wklejało do mojego arkusza w te same komórki ?
Może wykorzystaj wklejanie przez schowek? Coś w s tylu: [syntax=vb]Sub Makro2() Dim WordApp As Object Dim ostwiersz As Integer Worksheets("arkusz1").Range("A1:E8").Cop... Set WordApp = CreateObject("Word.Application") ' otwórz worda Set wdDoc = WordApp.Documents.Add WordApp.Visible = True ' widoczny wdDoc.Paragraphs(wdDoc.Paragraphs.Count)...
używała opcję kopiuj wklej i tak puszczała do druku Makro też kopiuje i wkleja, tylko tyle, że bez udziału człowieka i nie 5 dni.;) Przygotuj plik z arkuszem Wydruk ze wzorcem wydruku jednej strony (tak, żeby wpasowało się w kartkę z etykietami) i podeślij.
excel wkleja makro makro wkleja skrypt wkleja
sterowanie silnikiem pradu stałego sterownik sauna wzmacniacz frontman fender
master klima projektowanie ogrodu
Sterowanie długością impulsu napięciem: PWM, NE555, mikrokontrolery Xerox WorkCentre 6605: Szary zamiast czarnego w trybie czarno-białym