Dwie wątpliwości: 1) Czy te formuły będą takie jak w przykładzie tzn. będą się odwoływać tylko do danych z tego samego wiersza? 2) Czy to ma być kopia z zaznaczenia (zaznaczam x wierszy i to kopiuję, tylko dokąd? jak określić miejsce docelowe?), czy kopia wszystkiego co jest (do ostatniego wypełnionego wiersza w określonej kolumnie), wtedy miejsce docelowe...
Dlaczego nie załączyłeś pliku? Przecież na obrazku niczego nie można sprawdzić. Podejrzewam, że linie obramowania, które Ci się nie kopiują są przypisane do sąsiednich komórek. Ramka rozdziela komórki, ale nie musi być przypisana do obu, może być przypisana tylko do jednej z nich. Wtedy przy kopiowaniu trzeba zadbać o to by obramowania były przypisane...
Dobry wieczór, Nie znam się na SolidWorks, ale w kodzie VBA widzę przynajmniej dwa błędy: pierwszy w połączeniu Range("Q5...BJ5").Selection.Copy Powinno być rozbite na dwie instrukcje Range("Q5...BJ5").Select Selection.Copy Można też pominąć selekcję i pozostawić tylko: Range("Q5...BJ5").Copy Drugi błąd: Active.Worksheet.Paste Po pierwsze ta instrukcja...
Usuwam dla danego guzika konkretną kolumnę, potem zmieniam wartość w nawiasie (1) dla pierwszego guzika, potem dla drugiego zmieniam (2) itd. Czyli jak mam na razie te dwa przyciski to tak, żeby następny już wiedział, że ma kopiować dane do datachart ale o jedną kolumnę dalej niż poprzedni - robiłem to zmieniając wartość counter - kolejno 1 2 3 itd....
Jeśli chodzi o klasyczne odwołanie, to nie jest to możliwe, gdyż odwołanie zwraca tylko wartość komórki, bez formatowania. Ponadto, nawet z użyciem VBA, komórka zawierająca formułę musi być sformatowana jednolicie (to znaczy można sformatować całą komórkę, ale nie poszczególne znaki). Szkoda, że nie dałaś pliku załącznika, bo wtedy łatwiej można by...
Nie wiem co miałeś na myśli Po następnym wpisaniu daty w I4 powinno kopiować zakres dat z I4 do R4 itd. Ale pozostałe funkcje działają. [syntax=vb] Public Blokada As Boolean Sub Przesun(Wiersz As Integer) Dim a As Integer For a = 7 To 0 Step -1 ActiveSheet.Cells(Wiersz, a + 9 + 1).Value = ActiveSheet.Cells(Wiersz, a + 9).Value Next a ActiveSheet.Cells(Wiersz,...
Super Adamas_nt. Wielkie dzięki. Czy może kopiować zakres danych bez nazw pierwszego wiersza na który nałożony jest filtr. pozdrawiam MMKP
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, Ewentualnie jeszcze takie rozwiązanie formułami. Zakres danych nazwany kody (można wydłużyć w Menedżerze nazw). Obszar zaznaczony na żółto w Arkuszu2 stanowi wynik formuły tablicowej. Można kopiować w prawo do kolejnych kolumn i w dół w miarę potrzeby. Formuły dla Excela >=2007. Po wczytaniu przykładowego pliku zapisać jako .xlsx Pozdrowienia.
Witam, Staram się napisać makro, które zlicza ilość rekordów w przedziale od (B2:B2000) Zaznacza formułę w wierszach A2 i kopiuje ją do zakresu A3:A(wynik z liczenia +1) Nieudolnie napisałem coś takiego, ale nie wiem jak ustawić zakres odwołując się do wyniku z operacji liczenia... PS. Docelowo formuły będą się kopiować z kilku "zakresów" np. Range("D2:E2")...
Zawsze możesz też zrobić tak aby Makro pytało Ciebie przy odpaleniu z jakiego pliku zewnętrznego ma kopiować jaki zakres danych.
Cześć, zwracam się do Was z uprzejmą prośbą o pomoc w rozwiązaniu następującego problemu. Potrzebuję skopiować wartości z zakresu B10:C23 w plikach JEDNOSTKAA i JEDNOSTKAB do pliku OCENA_ZBIORCZA w kolumny odpowiadające nazwom tych plików. Dotychczas potrzebowałem tylko kopiować wartości z pliku JEDNOSTKAA i realizowałem to za pomocą prostego makro:...
Ok Działa, ale nie przenosi do innego arkusz. Ponadto kopiuje tylko wiersz A2 i to jest dziwne bo w kodzie jest umieszczony zakres od A2 do U3. Nie wiem czym to jest spowodowane. To może tak, zarejestrowałem nowe makro: Sub kopiowanie() ' ' kopiowanie Makro ' ' ActiveWindow.ScrollColumn = 2 ActiveWindow.ScrollColumn = 1 Range("A1:U2").Select Selection.Copy...
witam, próbuję zrobić makro, które, kopiowałoby komórki z wartością >0 i wklejało wartość do tej samej komórki, ale w całkiem innym skoroszycie. Ścieżka do skoroszytu, w którym miałyby się znaleźć wklejane wartości byłaby zawsze ta sama. z góry dziękuję za pomoc
[syntax=vbscript]Sub NowaKolumna() nk = Cells(60, Columns.Count).End(xlToLeft).Column + 1 Range("H60:H80").Copy Cells(60, nk) Application.CutCopyMode = False End Sub [/syntax]
Cześć, mam problem z poprawnym umiejscowieniem pętli w kodzie. Moje makro ma za zadanie umieścić w osobnym arkuszu każdy zakres ograniczony z góry i z dołu wierszem z ciągiem gwiazdek o długości 92 znaków z pierwszego arkusza. [syntax=vb] Sub Dostawy() Dim OstWiersz As Long Dim j, l As Integer Dim LArkuszy, LArkuszy2, LWierszy As Integer Dim zakres,...
Trochę zależy jak to wygląda z resztą makra. Generalnie, wczytywanie powinno być niezależne od aktywnego arkusza. Czyli [syntax=vb]Sub wczytywanie_danych() Dim dane As Variant dane = Worksheets("Arkusz1").Range(Cells(1, 1), Cells(10000, 3)) End Sub [/syntax]
Witam. Mam pytanie, czy dysponuje ktoś makrem lub byłby w stanie napisać * lub doradzić jak napisać makro , które pozwoliłoby kopiować zakres danych do skoroszytu głównego. Oczywiście wszystkie inne skoroszyty są "kopią" tego głównego. Interesuje mnie taka sytuacja. Ktoś pracuje na pliku 1.xlsx w skład którego wchodzą powiedzmy 2 arkusze ( arkusz1 oraz...
Dzień dobry, proszę o pomoc w wykonaniu makra w Excelu. Zewnętrzny program eksportuje dane do Excela w postaci tabelki o kilku kolumnach. Ręcznie usuwam niepotrzebne mi kolumny zostawiając tylko jedną z potrzebnymi danymi w Kolumnie A. Teraz w kolumnie B1 wstawiam formułę =("słowo1" &$A1&" słowo2"). Teraz muszę ręcznie przekopiować zakres w kolumnie...
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...
W szczególności co oznacza 7 różnych rodzajów typów? Coś mi mówi, że nie są to typy w rozumieniu programistów. I co oznacza różny zakres danych. Można kopiować więcej lub mniej danych w zależności od "typu", brać dane z innych miejsc? Ogólnie schemat powinien być podobny do tego: pętla po wierszach do końca (jak zdefiniujesz koniec? może do napotkania...
Witam. Napisałem makro (excel 2010) które kopiuje pewien zakres (od A8 do kolumny E ostani zajęty wiersz) do komórki w kolumnie A pierwszy wolny wiersz w arkuszu w innym skoroszycie, problem polega na tym że chciałbym skopiować kilka zakresów (np A8 do kolumny E ostani zajęty wiersz, O8 do kolumny AK ostani zajęty wiersz, AM8 do kolumny BC ostani zajęty...
Witam, Uprzejma prośba o pomoc / podpowiedź / wyjaśnienie (na wstępie nie jestem programistą …. niestety!). 1. Formatowanie kilku zakresów jednocześnie. Chce nadać (za pomocą makra w VBA Excel) kilku zakresom danych ten sam format. Zakresy tu np: (B15:B38) (B51:C62) (B98:D112) Format to: ###,00;[Czerwony] - ###,00;- Bez tła (przeźroczyste tło)...
Zobacz w załączniku, czy ta propozycja spełnia Twoje oczekiwania. To jest makro zdarzeniowe, które reaguje na wpis dokonany ręcznie (nie przez makro), ale można kopiować z innej komórki. Wypełniać komórki można tylko pojedynczo. Jeśli chce się zmienić proporcje składnika, trzeba usunąć wpis istniejący (delete), a następnie wpisać nowy. Makro nie przelicza...
Witam serdecznie. Jest to mój pierwszy post więc proszę o wyrozumiałość. Mam pewien problem a że VBA nie znam zbyt dobrze ( raczej jakieś podstawy) trochę mnie to przerasta. Szukałem coś nt. temat ale ciężko znaleźć jakiś podobny przykład. Do sedna: Dane: W pliku znajduje sie kilka arkuszy : arkusz1, arkusz2,arkusz3, arkusz4 itd. W 4 pierwszych arkuszach...
Z zamieszczonego fragmentu można wywnioskować, że chcesz kopiować z arkuszy o identycznym fragmencie nazwy (- 4 ostatnie znaki). Wnioski: 1. Gałąź 'Else' jest zbędna (dlaczego chciałeś w niej zerować licznik?) 2. Brakuje najważniejszego: co chcesz kopiować (jaki zakres mogą zajmować dane)? 3. Najprościej wydzielić arkusz i po wszystkim skopiować/przenieść...
Dzięki za szybką odpowiedź. Niestety masz rację i niedokładnie opisałem problem i nie dostałem tego czego oczekiwałem. Przepraszam. Postaram się dokładniej przedstawić całą sytuację. Co miesiąc dostaję zbiorczy plik z danymi (Raport), jeden wiersz arkusza odpowiada jednemu handlowcowi. Ponadto każdy handlowiec ma swój indywidualny plik. Pod koniec miesiąca...
Dzień dobry, Na wstępie powiem że ze wszystkich sił starałam się nie fatygować nikogo by mi pomógł znaleźć rozwiązanie problemu, próbując sama zrozumieć dlaczego tak się dzieje. Jednak moja nieznajomość VBA wzięła górę i do co utknęłam w martwym punkcie (choć może nie do końca bo makro w sumie robi co chce). Makro które udało mi się stworzyć, przerabiając...
Procedurę vlookup która będzie szukać danej wartości w kolumnie A i kopiować cały zakres wiersza do oddzielnego pliku raport . Problem w tym że formuła vlookup szuka tylko pierwszej wartości więc chcę to ominąć przez dodanie do każdego pliku formuły która będzie zmieniać wartość kolumny A poszczególnie do zmiany . [syntax=vbscript]Private Sub CommandButton1_Click()...
ten InputBox nawet nie jest tu konieczny bo zawsze z każdego pliku źródłowego z tego samego arkusza i tej samej komórki będzie spływała jakaś wartość do tej samej komórki w arkuszu UZYWANE. Więc muszę i tak wpisać ręcznie Array. Problem pojawia się wówczas gdy chciałbym nie tylko kopiować ze wszystkich Arkuszy1 do Arkusza1 w UZYWANE. A jeżeli w plikach...
Witam raz jeszcze, Formuła jest tablicowa jednokomórkowa, tzn. trzeba ją zatwierdzać przez CTRL+Shift+Enter, ale tylko w jednej komórce. Potem taką formułę można kopiować w zwykły sposób. [syntax=text]=SUMA(JEŻELI.BŁĄD((spolka!$...
Sprawdź takie makro: Cells(CC, 3).Cut zastąp linijką Cells(CC, 3).Copy . Makro działa od pierwszego wiersza, jeśli pierwszy wiersz Twojej tabeli to nagłówek, początkowe parametry CA oraz CC zmień na numer wiersza, od którego zaczynają się faktyczne dane. Makro działa do momentu napotkania pierwszej pustej komórki w kolumnie C.
Witam, pojawiły się kolejne problemy a mianowicie: mamy coś takiego http://obrazki.elektroda.pl/1436607500_1... gdzie zastosowałem dużo z powyższych rad i tak : kolumny R i S liczą się za pomocą makra: Private Sub CommandButton1_Click() Dim i As Integer Set kom = Worksheets("Grafik 2012").Range("D10:...
Jeśli makro, następnie tak
Witam, Mam pytanie o możliwość stworzenia makra które będzie kopiować wypełnione wartościami kolumny w dół zaznaczając komórkę A2, jednak przy kopiowaniu pomijało by wiersze dla których nie ma podanych wartości w kolumnach D i F: https://obrazki.elektroda.pl/8651122400_... Na chwilę obecną przy poniższym kodzie: [syntax=vbscript] Range("A2").Select...
Witam. Właśnie poszukiwane z mojej strony.Visual Basic- Excel. - Jeżeli Ktoś z kolegów zna dobrą pozycję książkową Visual Basic z wiązaną z Excelem to bardzo proszę o tytuły. Będę wdzięczny.
sprawdź załącznik
Trochę Cię okłamałem To nie kłam na przyszłość. Mama nie uczyła?;) A w takiej sytuacji umieść arkusz 'Zbiorczy', jako ostatni na liście arkuszy. P.S. Próbowałeś uruchomić to makro? Zapewne nie...
Jeśli dobrze rozumiem wystarczy przesunąć zakresy. Przykład w załączniku.
[syntax=vb]Sub kopia() If ActiveCell.Column <> 4 Then MsgBox "Wybierz indeks z kolumny D": Exit Sub ow = Sheets("Arkusz2").Range("C" & Rows.Count).End(xlUp).Row + 1 If ow < 15 Then ow = 15 r = ActiveCell.Row Range(Cells(r, "C"), Cells(r, "H")).Copy Sheets("Arkusz2").Range("C" & ow) End Sub [/syntax]
1. Wyrzuć "górne" r=r+1, ustaw (u góry) r=2 jeśli... sam już nie wiem. Wypróbuj. 2. Nie ta metoda. Musiałbyś copy-paste i wybierając (select) wiersz (zakres) docelowy. P.S. Zmykam. Dobranoc ;)
Napisałam proste makro kopiujące zakres komórek z aktywnego arkusza do archiwum. Chciałabym, aby tabela z aktywnego arkusza po zapisaniu do archiwum automatycznie "się wyczyściła". Dodatkowym problemem jest również makro działające w arkuszu "BAZA" - zaznaczam tu dowolne pozycje w kolumnie K poprzez dwukrotne kliknięcie myszy, po czym wybieram przyciskiem...
Chce mieć to makro w drugim pliku do którego będa dane kopiowane i pod przycisk makro przypisane
Jeżeli pola są oddzielone spację, wystarczy taka modyfikacja pętli: [syntax=vb]Do While Not EOF(1) Line Input #1, TextLine If Left(TextLine, 13) = "121401_2.0011" Then arr = Split(TextLine, " ") wsdane.Cells(i, 1).Value = arr(0) wsdane.Cells(i, 2).Value = arr(1) wsdane.Cells(i, 3).Value = arr(2) wsdane.Cells(i, 4).Value = arr(3) wsdane.Cells(i, 5).Value...
od O2:O17 jest Gdańsk I ten zakres kopiujemy do L23, a co mamy zrobić z kolejnym miastem, zakres O18:30? Chcesz się poduczyć, czy oczekujesz gotowca? Jak to pierwsze, to lepiej na jakimś komunikatorze, a nie tutaj.
Jest wystarczająco fragment z zmodyfikowanymi danymi, nie należy wskazać prawdziwe i wszystko 7. Kopiuje zakres np. linii P P, P1 lub P2 - z którego to zależy?
Sprawa jest bardziej skomplikowana niż się na pierwszy rzut oka wydaje, bo Target.Value w zdarzeniu Change będzie też przyjmowało puste wartości (przy czyszczeniu/usuwaniu komórki), a także może być zakresem Range() np. przy kopiuj - wklej do kilku komórek (podobnie przy czyszczeniu zakresu komórek), przez co makro będzie się wywalać. Trzeba ew. je...
Witam, Mam pewien problem, ponieważ chcialem stworzyć makro a nawet nie wiem jak to ugryźć. Generalnie chodzi o to aby: po uruchomieniu makra wyswietlało sie pole do wpisania od... i do... w którym będę mógł okresic daty. Format daty to dd-mm-rrrr. Daty są w każdym arkuszu w jednej kolumnie, powiedzmy D. Wyświetlone komórki powinien kopiować do nowego...
Co Ty kombinujesz? Wyślę Ci plik z makrem, które kopiuje zakres 'B2:B7' do pietwszego wolnego wiersza w kolumnie 'A'. Nie opisałeś, gdzie 'B2:B7' ma być wklejane, więc zmień sobie indeksy komórki.
dziekuje bardzo... a czy makro mogloby wklejać ten zakres jako wartości??
Czasem pomaga skopiowanie całej zawartości arkuszy, elementów VBA do nowego pliku (Ctrl+c, Ctrl+v) Spotkałem się też z podobnym zjawiskiem przy makro kopiującym spory zakres, zdefiniowany "z górką" (dużo pustych wierszy/komórek). Gdy w v2003/2007 szło to bardzo sprawnie, v2013 "myśli" nad tym denerwująco długo. O dziwo: im więcej pustych, tym makro...
makro excel kopiować zakres makro kopiować zakres filtr makro kopiować zakres komórka
oporność głośnik amatorska elektronika schemat przerobić dekoder
Czy wyłączniki siłowe działają przy 2-15V, 15mA? Podgrzewacz wody: ciepła woda, potem zimna - przyczyny i rozwiązania
