Najprościej (rozumiem, że kod nadal dotyczy procedury zdarzeniowej) to:[syntax=vb]If Target.Column = 2 Then Cells(Target.Row, 3).Select[/syntax]
z komórek A1:A100 do komórek Z3:Z103 Raczej do z3:z102(100-1=99; 102-3=99) Przed 'End Sub' [syntax=vb]ark2.Range("Z3:Z102") = ark1.Range("A1:A100").Value[/syntax]
Witam, Sprawdź, czy taka prosta pętla kopiująca załatwi sprawę. Nazwę dostawcy definiujesz w kodzie na górze. [syntax=vbscript]Private Sub CommandButton1_Click() On Error GoTo myErr Application.ScreenUpdating = False Const NAZWA_DOSTAWCY = "Dostawca B" Set wsDest = Worksheets("Dostawca B") ost_dest = 4 koniec_dest = wsDest.Cells(wsDest.Rows.Count, "H").End(xlUp).Row...
Widzę, że nie bardzo lubisz makra ;) a wystarczy: 1. makro z WorkbookOpen powtórzyć przy WorksheetActivate (aktualizacja listy Combobox''a). 2. Usunąć instrukcje warunkowe dot. producenta Listę kolorów modyfikujesz w arkuszu "Opcje". Musi być "ciurkiem" (bez dziur). Edit 20:17 - zmieniłem załącznik (Clear brakowało przy Activate)
Spróbuj z kopiowaniem w pętli. Przykład w załączniku. Edit: Zacznij od Range.Clear (po With), przeoczenie...
Moja propozycja - kod do umieszczenia w module arkusza: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column > 2 Or Target.Value = "" Then Exit Sub Select Case Target.Column Case 1 Call UtworzFolder(Target.Value) Case 2 If Target.Offset(0, -1).Value <> "" Then Call PrzeniesFolder(Target.Offset(0, -1).Value)...
Jego przeznaczeniem jest użytkowanie przez bardzo amatorską osobę Już podpowiadam. Dla w/w osoby: "4D, 5D, 5N, 29N" ; "4d ,5d ,5n ,29n" ; "4D,5D,5N,29N" ; "4D. 5D. 5N .29N" w zasadzie wygląda tak samo. O pomyleniu literki, bo przecież można się pomylić, nawet nie wspomnę. Jeśli 15 razy dziennie nie chcesz słyszeć: "Panie kefler! Ten pana program znowu...
Wszystko działa prawidłowo tylko tych danych mam dość dużo bo około 90 komórek do przeniesienia do dwóch arkuszy. Jestem jeszcze na początkowym etapie a działanie makra zaczyna się dość mocno wydłużać. Excel nie jest i nigdy nie był uważany przez Microsoft za narzędzie do developmentu oprogramowania
Witam serdecznie, chciałbym napisać makro do excela, może ktoś mi pomoże z tematem A mianowicie: gotowy arkusz z uzupełnionymi danymi chciałbym zapisać w nowym pliku (sam chce wpisywać nazwę tego pliku. Nowy plik a arkuszem powinien wyglądać tak samo z tym, że kilka komórek ma być skopiowanych w inne miejsca a część usunięta do nowej edycji. Być może...
W takim razie musisz mieć poustawiane jakieś formatowanie niestandardowe, albo jakieś niedrukowane znaki w komórkach. Zrób jeszcze tak, ustaw się w komórce E8 (transfer) i np. J5 (inventory) i zrób zrzuty, tak żeby było widać wartości tych komórek na pasku formuły. Albo jeszcze inaczej skopiuj wartość z od J5 do E8 i wtedy Uruchom.
defincje wksz as worksheet oczywiście były, dużo wierszy to już ok 200 (jesli ogranicze pętle Do - do na przykład x=5 wtedy też jakby lepiej działa jak jest wiecej to nawet cały widok czasem sie nie odswieża - skopiowana tabela sie wogóle nie pokazuje, muszę kliknąc 2 razy (dokładnie 2 razy) na jakąś komórke i wtedy pokazują sie skopiowane wiersze -...
Witam, jestem kompletnie poczatkująca jeśli chodzi o tworzenie makr a chciałabym uprościć sobie pracę. W jednym arkuszu (Tab.2b) wpisuję dane w kolumnach odpowiednio: B- numer projektu C- numer raportu parasolowego G- wartość przekazanych refundacji H- data refundacji w drugim arkuszu (rejestr) mam inne dane dotyczące projektów wykazanych w kol.B arkuszu...
(...)prosiłbym aby ktoś bardzo łopatologicznie wyjaśnił mi co to jest impedancja? Czy jest jakaś różnica pomiędzy impedancją a impedancją falową? Wiem że chodzi tutaj mniej więcej o opór przy prądzie stałym. Próbowałem poczytać trochę o tym ale te regułki z podręczników jakoś do mnie nie trafiają. Ja tylko objaśnię czemu rezystor szeregowy pomaga w...
Witam. Bardzo proszę o pomoc w makrze, które przenosiłoby wartości z tych samych komórek w jednym pliku do takich samych komórek w innym pliku. Np z pliku 1.xls Arkusz1 do pliku 2.xls Arkusz2 komórek z zakresu B8:Z47; B53: Z92; B98:Z137. Nie chodzi mi o kopiuj/wklej lecz przeniesienie wartości.
Marku, masz rację, ale potrzebuję "czegoś" co po tym przesortowaniu scali mi komórki i przeniesie wartości np. z trzech komórek do jednej.
Witam. Chodzi mi o to, że mam dwie tabele z wynikami meczy i chcę przenieść wynik jednej tabeli do drugiej, ale tak żeby jak się zmieni w pierwszej to automatycznie też będzie się zmieniał w drugiej. Zrobiłem to przez scalenie dwóch komórek metodą kopiuj --> wklej łącze, ale jak pierwsza tabela (komórka) jest pusta to w drugiej wyskakuje mi zero, a...
tylko w jaki sposób ja to mogę powielić na 100 formularzy? odwołanie jest bezwzględne więc każdy kolejny będzie miał taki sam wynik. Przeciągnąć formuły nie jestem w stanie ponieważ część komórek jest scalonych.
[syntax=vbscript]Sub Niepuste() Sheets("Arkusz1").Select ow = Cells(Rows.Count, "A").End(xlUp).Row For x = 1 To ow If Left(Cells(x, 1), 13) = "Pomieszczenie" Or Cells(x, 1) <> "" And Cells(x, "F") > 0 Then y = y + 1 Rows(x).Copy Sheets("Arkusz2").Cells(y, 1) End If Next Sheets("Arkusz2").Select End Sub [/syntax] Masz błąd w nazwie pomieszczenia...
Moim zdaniem to tutaj występuje przenoszenie co drugiej z posortowanych komórek a nie samo sortowanie.
aby zniknęły te puste pola po słowie KONIEC dynamiczny zakres dodaj nazwe =PRZESUNIĘCIE(PODS.!B7;0;0;LICZ.JEŻELI(P... żeby ta lista była trochę dłuższa Mam wątpliwości
Nie sądzę ... podsumujmy zatem, na podstawie kodu, co mamy: 1. Arkusz zbiorczy nazywa się "Aktywność" 2. Tabela zbiorcza znajduje się w zakresie "B18:O2000" 3. Nagłówki tabeli zbiorczej znajdują się w zakresie "B18:O18" 4. Tabele źródłowe w plikach dawców znajdują się w arkuszach nazwanych "Aktywność" 5. Tabele źródłowe w plikach dawców mają nagłówek...
Ze względu na to, że nie znam Access, bardzo chciałbym pozostać przy Excelu - Jeśli uda się zaprogramować plik !wprowadzenie żeby przenosił dane do wszystkich plików raportów wtedy byłyby one używane tylko do odczytu wprowadzonych danych, bez ich dodatkowej modyfikacji. W pliku do wprowadzania cześć kolumn będzie docelowo ukryta a komórki z formulami...
Witam Mam mały problem z napisaniem Makra w Excelu: Potrzebuje takiego makra które z Textbox1 (który ma kilka wierszy) przypisze mi każdy pojedynczy wiersz w nowej komórce (A1, A2,....) A następnie potrzebuje żeby z Komórki B1, B2, pobierały się wartości tekstowe i wstawiały do Textbox2 i były rozdzielone spacjami (B1 B2 B3), a następnie pod nimi /dwa...
Czy rozwiązaniem jest tylko makra, czy jest możliwość zrobienia tego za pomocą funkcji?? Próbowałem z funkcją Wyszukaj, ale zostawało wtedy dużo wolnych pól gdyż każdy wiersz jest przeszukiwany dla każdego miasta, a właściwy rekord jest tylko dla jednego miejsca dostawy... Pewnie można ... :| ... Tylko wzory będą kosmiczne i będą zajmować dużą ilość...
Przenoszenie danych może zniszczyć wzajemne zależności. Jeśli jednak "wytniesz" zakres komórek i "wkleisz" je w inne miejsce, to formuły powinny się automatycznie zaktualizować. Jeśli w arkuszu działają makra, to trzeba uważać, bo one działają według wcześniej określonych reguł i odwołują się do konkretnych komórek - operacje kopiuj/wklej/wytnij nie...
Tak, zawsze wpisując do tych samych pól w arkuszu zostaje mi baza przyjęć towaru od klienta. Całość ma wyglądać w ten sposób mam pierwszą stronę w arkuszu wypełniam wyżej wymienione pola zawsze te same 1a 1b i 1c i klikam drukuj drukuje mi się potwierdzenie pobrania sprzętu do naprawy a wszystkie dane zostają zapisane w drugim arkuszu kolejno 1,2,3...
Więc same przenoszenie wierszy w odpowiednie miejsce zrealizuję ręcznie ponieważ odpowiedniego kodu kopiowania i przenoszenia nie potrafię napisać. Ale jak zmniejszyć kod z pierwszego mojego pytania żebym nie musiał w kodzie pisać 140 linijek ale podać powiedzmy na to zakres numerowania komórek biorąc pod uwagę że komórki są łączone po dwie?
Witam, będę wdzięczny za pomoc w napisaniu formuł lub makra. W pliku wklejane będą dane do arkusza Total dla trzech zmian I zmiana 6:00-13:00 II zmiana 14:00-21:00 III zmiana 22:00-05:00 Teraz chodzi o to, aby dane z tego arkusza automatycznie kopiowało do poszczególnych arkuszy w zależności od przypisanych godzin zmianowych tzn. aby np. do arkusza...
Najprościej rzecz ujmując [syntax=vbscript]licznik = 3 For i = 1 To 100 If Sheets("Arkusz1").Range("B" & i) = 1 Then Sheets("Arkusz1").Range("C" & i & ":S" & i).Copy Sheets("Arkusz2").Range("B" & licznik & ":R" & licznik) licznik = licznik + 1 End If Next[/syntax]
Dzięki za info. Spróbuję i pokarzę rezultat. Teraz klecę wcześniejsze etapy. Skończyłem 1. czyli przenoszenie danych. Teraz zaczynam 2 czyli układanie danych i usuwanie dubli, a łączenie tekstu będzie w 3 etapie Dodano po 5 Mam prośbę o krótki przykład. Nie dałem rady sam nic zdziałać. Dzięki.
nie potrafię sobie poradzić aby odpowiednio przekształcić zaproponowane rozwiązania na potrzeby mojego pliku To nie kwestia "nie potrafienia", to kwestia Microsoft'u. Chodzi o nazewnictwo zakładek. Nazwy zakładek do hiperłącza poprzez funkcję "HIPERŁĄCZE" nie mogą posiadać odstępów, ich nazwa musi być "jednociągowa", tzn. taka zakładka nie może się...
Czego to ludzie nie wymyślą? Jak to ma niby działać? Robię zdjęcie, powiedzmy 5Mpix, po kompresji do JPG zajmie to około 1MB. Nie ma Wi-Fi w zasięgu a ja chciałbym (gdybym miał) wysłać to na Fejsbuka. To co? HSPA? Trochę bez sensu ale operatorzy komórek się będą cieszyć! Ja nie wiem, ale chyba jednak wolę zwykły kabel USB2.0 i to "powolne" przenoszenie...
Dzień dobry, Dziękuję za wyjaśnienie w kwestii sumy liczb nieujemnych. Tak jak myślałem, chodzi o to, żeby co najmniej jedna wartość była niezerowa, więc jeśli liczby są nieujemne, właściwym kryterium jest suma. Formuły z ostatniego postu znowu nie rozumiem, bo w tej wersji, którą Pan załączył w komórkach B166 i C166 nie ma żadnych liczb. Ale zostawmy...
Ta "pięciopunktowa" metoda wyznaczania mocy wyjściowej oraz znieksztalceń prądu a tym samym napięcia anodowego opierała się na założeniu że napięcie siatki będzie niezniekształcone. Tak jest tylko we wzmacniaczach pozbawionych USZ. Gdy USZ jest dostatecznie silne, sytuacja się odwraca: napięcie anodowe jest prawie nieznieksztalcone, za to silnie zniekształcone...
[syntax=vbscript]Sub Przenies() Sheets("Arkusz2").Select ow = Cells(Rows.Count, "D").End(xlUp).Row ow3 = Sheets("Arkusz3").Cells(Rows.Count, "A").End(xlUp).Row For x = 1 To ow If Cells(x, "D") <> "" Then Rows(x).Copy Sheets("Arkusz3").Cells(ow3, 1) ow3 = ow3 + 1 End If Next End Sub [/syntax]
Sprobuj takie makro [syntax=vb]Sub sortgodz() With ActiveSheet.UsedRange .Sort key1:=.Columns(4).Cells(1), header:=xlYes Set bt = .Find("Zast") r = Cells(Rows.Count, 4).End(xlUp).Row + 1 Rows(bt.Row).Cut Rows(r).Insert shift:=xlDown End With End Sub [/syntax]
[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Target.Column = 5 Then nw = Sheets("Logistyka").Cells(Rows.Count, "A").End(xlUp).Row + 1 If nw = 2 Then nw = 1 w = Target.Row Range(Cells(w, 1), Cells(w, 5)).Copy Sheets("Logistyka").Cells(nw, 1).PasteSpecial xlPasteValues End If End Sub [/syntax] Kod na tyle prosty,...
Rozumiem, że w pliku jest arkusz roboczy, do którego do określonych komórek wpisuje się dane, które potem w arkuszu "Baza" mają utworzyć dwie kolumny. Zakładam, że arkusz "Baza" istnieje. W przytoczonym makro dostrzegam 2 błędy: 1. W wierszu NewRow = Range("A65536").End(xlUp).Row + 1 powinno być C65536 lub D65536, bo do tych kolumn dopisywane są dane...
O jaki czas Ci chodzi z zegara RTC czy z któregoś z Liczników/Timerów? Użyjesz funkcji porównania, w wyniku porównania otrzymasz wartości TRUE, ta funkcja uruchomi funkcję mov, copy (coś w tym rodzaju dokładnie odpowiem Ci jutro gdy sprawdzę) i przeniesie daną komórkę do innej. Z tego co pamiętam w PLC Modicon Telemeqanique funkcja ta by wyglądała:...
Nie, bezwzględnie musisz zrezygnować z układu wielowierszowego przenosząc te procenty do kolumn.
To są te kwadratowe pola, w których stawiasz lub zdejmujesz znacznik (krzyżyk albo taki nike). Funkcja [Wklej specjalnie] ma tych pól do zaznaczania kilka, m.in. [Transpozycja], ale popatrz też na inne. Za pomocą [Wklej specjalnie] możesz skopiować wszystko, albo same wartości, formuły, czy formaty komórek. Pomogłem? :-)
Nie można usuwać komórek do których odwołują się formuły bo właśnie wtedy pojawia się błąd odwołania. Odwołania również są usuwane. Jeżeli chcesz by odwołanie było cały czas "sprawne" kasuj dane a nie usuwasz wiersz. Jeżeli chcesz aby wybierać różne wiersze w arkuszu docelowym skorzystaj z formuły indeks() i poprzez dodatkową komórkę określającą nr...
Witam, Poszukuje pomocy, mianowicie próbuje znaleźć rozwiązanie, aby były wykonywane automatycznie następujące czynności: -przenoszenie podsumowań kolejnych dni z jednego arkusza do kolejnych pustych pól arkusza z danymi archiwalnymi. -czyszczenie pól w arkuszu z danymi i zmiana dat w nagłówkach na te z danego miesiąca -przenoszenie danych z konkretnych...
Dzień dobry, Niezbyt to jasne. Czym różnią się te 2 arkusze? Na jakiej zasadzie miałyby być uwzględniane te zmiany, czy chodzi o powiązanie funkcjami, czy o dosłowną kopię? Czy te arkusze są tam na stałe, czy są okresowo przenoszone gdzie indziej? Czy poszczególne wiersze (pracownicy) są zawsze w obu arkuszach w tym samym miejscu, czy mogą być w różnych...
[syntax=vbscript][/syntax] Cześć, Mam pytanie odnośnie zautomatyzowaniu pewnego procesu, dostaję co tydzień plik z excela w którym interesują mnie zawsze dwie komórki (C30,C46). Jeśli w danej komórce jest jakikolwiek tekst (komórka nie jest pusta) to żeby ta komórka została przeniesiona do innego pliku excela. Czy ktoś mógłby wspomóc kodem, gdyż nigdy...
Cześć, czy ktoś ma pomysł dlaczego zaznaczenie pomimo, iż jest ustawiona odpowiednia opcja, nie przenosi się wraz z komórką po jej rozszerzeniu.
Jeśli ładunek przenosi się między komórkami NAND flash to należy zrobić kopię dopóki nie jest za późno a pendrive wymienić.
[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row = 3 And (Target.Column = 5 Or Target.Column = 6) Then ow = Cells(Rows.Count, "A").End(xlUp).Row Cells(ow, 1) = Cells(3, 5) Cells(ow, 2) = Cells(3, 6) End If End Sub [/syntax]
nie chciał bym bawić się w makro Czy w Excelu mogą migać komórki? Te dwie rzeczy nie są zgodne... ale mogą migać np. http://www.goldenline.pl/grupy/Zainteres...
Naprawdę nie chcesz pójść w tym kierunku? Zobacz w pliku - Arkusz1 komórka A2 - wybierasz użytkownika i resztę danych przenosi ci się samo. Szybko, prosto i bez makr.
Przy sortowaniu formuły zachowują się jak przy kopiowaniu, a nie jak przy przenoszeniu komórek. W tym przypadku należy zastosować odwołania absolutne (z dolarami), przynajmniej w części odnoszącej się do wierszy.
Witajcie Nie znalazłem odpowiedzi na mój problem, zatem piszę. Mam plik Excel, w którym pewne komórki są zablokowane a pewne odblokowane do użytkowników. Problem pojawia się, gdyż użytkownik kopiuje dane z innego pliku i wkleja dane do mojego pliku ( w pola odblokowane). Po tym pola odblokowane "przekształcają się" w zablokowane. Przenosi format komórki...
W załączniku, wartość z D41 jest przenoszona do AK1 Na to nie wpadłem, że dane mogą się przenosić do komórki... kodem. Genialne. I działa. Resztę już ogarnę. Bardzzzzzzzo Ci dziękuję michaelxxxl
Witaj Przytrzymanie klawisza Ctrl, można zauważyć kursor po komórce w wierszach, dla którego konieczne Etykiety. Następnie kliknij przycisk OK.
Dzień dobry, mam problem z wydaje się prostą "sprawą". W pliku excela mam ponad 200 arkuszy. Dane do tych arkuszy przenoszone są z arkusza z danymi - Arkusz1. I tak dane kolejnych wierszy kolumny A Arkusza1 mają być przenoszone do komórki np. A1 arkuszy 2,3,4, itd. Czyli np. wartość z komórki A1 Arkusza1 ma znaleźć się w komórce A1 Arkusza2; wartość...
Jeśli koniecznie chcesz przenosić wartość jednej komórki do drugiej przy użyciu makra - to po zarejestrowaniu edytuj to makro i skoryguj wklejanie ze schowka (zapisana jedna wartość :D ) na wklejanie wartości komórki pierwotnej. Znacznie prostszy sposób przenoszenia wartości z jednej komórki do drugiej to łączenia typu d10 = a1 :!:
Zacznę od tyłu. c. Grafiki na arkuszu czwartym nie są w żadnej tabeli. Obrazki nie są zawartością żadnej komórki, więc nie znajdziesz formuły, którą przeniesiesz je na inny arkusz. Za pomocą VBA możesz je przenosić, kopiować w inne miejsca, usuwać. Ale to już wymaga trochę więcej zabawy. ponad a. Schowaj pole powiązane z Combo pod nim a w komórce w...
A możesz trochę zmienić opcję wykresu tzn. W opcji etykiet wybierz "wartość" (nie "wartość procentową") a w drugiej "zakładce" liczby zaznacz "połącz ze źródłem". Wtedy będziesz miał ten format który masz w komórce i nie powinno nic przy przenoszeniu zmieniać. Sprawdź mój plik na paru innych kompach.
... wynik z komórki E2 kopiowany byłby do ... odpowiednio komórki B2 ... Nagmatwał prezes ... tam jest 'ilość' a nie 'kwota' ... ale cóż niech będzie ... dla prezesa wszystko .... :D :D :D ... przenosi i ilość i kwotę: 842520 Ps.: Zdjąłem prezesowi listę pracowników z 'A2', bo mi zawadzała ... :|
Witam, jestem początkującym w pisaniu makr. Walczyłem cały dzień aby napisać makro i nie wyszło dlatego proszę o wzór. Z arkusza „dane”, aby przenosiło komórki wszystkie z wiersza oprócz komórek z nagłówkiem „Ilość etykiet” do arkusza „widok” i skopiowało tyle razy, jaka jest wartość w komórce z nagłówka „ilość...
Tak o to chodziło aby dane były w jednej komórce a adres przenoszony do komórki obok. A jak się włącza to makro? Proszę o krok po kroku jestem zupełnie zielony jak widać.
Nie analizowałem szczegółowo Twojego nowego projektu, ale na pewno widzę w nim niekonsekwencję jeśli chodzi o komórki LinkedCell, powiązane z kontrolkami, w zestawieniu z komórkami, które odblokowujesz. To muszą być te same komórki, a u Ciebie jedne są w kolumnie H, a drugie w I. Jeśli chodzi o zapis, o który pytałeś, to trzeba pamiętać o kolejności...
Witaj. Sama funkcja "znajdź wszystko" nie ma (przynajmniej w wersji Excela, której używam) funkcji umożliwiającej kopiowanie czegokolwiek. Natomiast Excel umożliwia napisanie makra, w którym da się zdefiniować dowolne czynności, w tym również porównywanie ze wzorcem oraz kopiowanie czy przenoszenie zawartości komórek.
A tak sprawdzałeś? Dziękuję za pomoc - ale niestety hiperłącze nie przenosi mnie do odpowiedniej komórki/kolumny. przenosi mnie na początek Archiwum
lub tak: =WYSZUKAJ.PIONOWO(A7;Dane!$A$4:$B$8;2;FA...
Dane źródłowe są w zakresie AG7:AG27 i te komórki można klikać wielokrotnie, bo dane są kopiowane, a nie przenoszone. Jeśli zakres docelowy jest początkowo pusty, kopie są umieszczane od komórki J4 w dół. Nie dałem ograniczenia na wierszu 14., bo nie zostało opisane zachowanie procedury w tym momencie. Jeśli wypełniona zostanie komórka J14 i użytkownik...
Korzystając z opisów kolegów np. z tego wątku https://www.elektroda.pl/rtvforum/viewto... oraz przenosząc sumowanie w Arkuszu2 z dołu do góry (łatwiej znaleźć pierwszą pustą komórkę w kolumnie) możesz użyć takiej procedury: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Row...
Najpierw musisz utworzyć marko które będzie się uruchamiała po zmianie tekstu w komórce. Przykład Cells.Find . Na końcu wyrażenia dajesz .Activate i komórki w których znaleziono daną wartość robią się aktywne. Na końcu używasz czegoś [url=http://java2s.com/Code/VBA-Excel-Ac... żeby przejść do właściwej komórki.
Sprawdź czy przenosi wartość komórki z pliku w drop do otwartego. Wpisz w jakiejś komórce = i wskaż komórkę w drop. i potwierdź enterem. Jak zmienisz w drop to powinna się zmieniać w twoim arkuszu. np. ='[Nowy Microsoft Excel Worksheet.xlsx]Arkusz1'!$A$1
Proponuję takie proste makro:[syntax=vbscript]Sub Przenoszenie() Dim ws1 As Worksheet: Set ws1 = ThisWorkbook.Worksheets("Arkusz1") Dim ws2 As Worksheet: Set ws2 = ThisWorkbook.Worksheets("Arkusz2") Dim tbl As Variant Dim lr As Long tbl = ws1.[e5:z5] With ws2 lr = .Cells(.Rows.Count, 3).End(xlUp).Row + 1 .Cells(lr, 3) = .Cells(lr - 1, 3).Value + 1 .Cells(lr,...
Wykorzystaj stary "elektrodowy" :) sposób z kolumna pomocniczą i max() w przykładzie kolumna F jest pomocnicza Można ją ukryć lub ustawić tekst na biały. W komórkę F1 wpisujesz rodzaj który się interesuje i masz aktualne zestawienie w drugim arkuszu.
To jeszcze kilka podpowiedzi: - Wartość bezwzględna liczby (przydatne przy obliczaniu różnicy) = funkcja MODUŁ.LICZBY(xx) - Obliczanie średniej - funkcja ŚREDNIA - Adresowanie bezwzględne komórki oznacza, że odwołujemy się do konkretnej komórki, a następnie podczas kopiowania/przenoszenia zawartości komórki, adresacja w jej funkcji zmienia się dopasowując...
Przenoszę opcje do komórki I1, I2, I3, I4... w 'dzieleniu': Rows("2:2").Clear - usunie I2, bedzie od J2 wprawo
A orientujesz się może czy można zrobić tak żeby po zeskanowaniu zamiast potwierdzenia ENTER, przenosiło mnie do wskazanej komórki gdzie od razu mógłbym wpisać ilość, tzn. skan --> automatyczne przeniesienie do kolumny ilość --> ręczne wpisanie ilości i po naciśnięciu enter przejść od razu do kolumny kodu, wiersz niżej, tak żeby skanować kolejny produkt....
Może takie makro zdarzeniowe w module skoroszytu (jeśli ma działać we wszystkich arkuszach) lub w module arkusza (jeśli tylko w jednym arkuszu): [syntax=vbscript]Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) Dim tval Application.EnableEvents = False If Application.CutCopyMode = xlCopy Then tval = Target Application.Undo...
Niestety nie działa owszem wpisuje się ten tekst ale nie przenosi danych.Może dlatego że komórki są sformatowane jako tekstowe.
Zastosuj zakresy danych i formułę z sumą iloczynów (zwykłe Enter) lub sumą (Ctrl+Shift+Enter) [syntax=text]=SUMA.ILOCZYNÓW(MOD(C5:BK5-... komórek [gg] lub lepiej [g], bo po co te zera podwójne? Oczywiście jak będziesz to przenosił w inne miejsce, zwróć uwagę, czy liczyć kolumny parzyste, czy...
Jeżeli chodzi o przenoszenie formatowania to excel właściwie nie ma żadnych funkcji. Można to zrobić jedynie poprzez makro (VBA) lub "pisaniną" poprzez formatowanie warunkowe i to w excelu 2007 i powyżej, bo niższe mogą mieć tylko max 3 warunki. Ten kto zna jako-tako programowanie w VAB może sobie poradzić. Ten kto nie ma pojęcia na początku upadnie,...
Ale nic się nie uczysz. :( i nie czytasz ze zrozumieniem. Jeszcze raz zaznaczę: musisz ustawić zmienną globalną która będzie pamiętana poza działającą procedurą. Zwróć uwagę gdzie jest deklaracja zmiennej "i" w moim kodzie a gdzie w twoim. (gdzie jest deklaracja a gdzie początek procedury) ... aby przy naciśnięciu skrótu Ctrl+Shift+A przenosiło wartość...
Co ma wspólnego makro do zaznaczania aktywnego wiersza z funkcją, której nagłówek pokazujesz? Jak i do czego używasz tej funkcji? Zaznaczanie aktywnego wiersza masz zrobione formatowaniem warunkowym z formułą: [syntax=text]=KOMÓRKA("ROW")=WIERSZ()[/s... z tym są dwa. Pierwszy - należy właściwie zaznaczyć zakres komórek, w którym to formatowanie...
Przenosić wartości komórek z wybranego pliku w zdefiniowane wcześniej komórki w pliku z aktywowanym makrem :) Przykład: Z pliku o nazwie 1234.xlsx (plik chce dowolnie wybrać Application.GetOpenFileName) przenieść wartość komórek "b2, b82, c41, e75" itd. do pliku 4321.xlsxm w którym aktywowałem makro do komórek o tym samym położeniu "b2, b82, c41, e75"....
Działa ale też nie do końca tak jak trzeba - nie przenosi szerokości komórek i formatowania warunkowego. Ale spox poradziłem sobie w inny sposób. Na bazie poprzedniej procedury nagrałem sobie makro, które usuwa zbędne wiersze i zmienia nazwę arkusz i pozamiatane. Jeszcze raz wielkie dzięki za pomoc.
Tu chodzi też o to że gdy przenoszę wybrane komórki na arkuszu (drag & drop) wtedy program mi zmienia formuły a ja chciałbym tego uniknąć. Chodzi Ci o to, żeby po skopiowaniu formuły ona dalej sumowała te same komórki (jak na przykładzie - A3+B3+C3? Zablokuj adresy komórek w formule przy pomocy znaku "$" - ma mieć w tym przypadku postać $A$3+$B$3+$C$3.
lanzul jesteś wielki !!! Oba warianty działają bez zarzutu. Jest tylko jeden szkopuł. Numery PESEL są przenoszone z komórki Excela do szablonu. Natomiast nie generuje się plik Word o nazwie pochodzącej z komórki "B3" w katalogu "wyniki". Próbowałem zmienić część kodu, która za to odpowiada: wordDoc.SaveAs ThisWorkbook.Path & "\wyniki\" & Cells(3, 2).Value...
kurcze w pracy mam wersję 2007 i nie mogę żadnej frazy wpisać :/ Mało prawdopodobne :D , zaznacz dotychczasowy wpis i wtedy zacznij wpisywać swoją frazę :!: pole edycji Comboboxa i jego lista automatycznie się przestawi po pierwszej literze :D co należy zrobić , aby kolor danej komórki wyświetlił się w arkuszu "wyszukiwarka" w oknie "szt" Po prostu...
Arkusz zbiera bezpośrednio dane pomiarowe z urządzenia. Zbieranie danych w programie zewnetrzym i export do excela jest rozwiązaniem mniej korzystnym, niż wstawienie danych do konkretnej komórki wskazanej przez użytkownika.
Tyle to ja wiem, ale chodzi o to żeby to się samo wpisywało, bo trzeba ręcznie różne równania wpisywać i nie chcę ich za każdym razem przepisywać, tylko żeby się automatycznie przenosiły do sąsiedniej komórki, tak aby tamta oddawała już wynik zapisanego równania.
W zasadzie wszystko działa idealnie oprócz tzw. przeksięgowania ... :D Wpisuję numer RZ w komórkę "G-1" a następnie przyciskiem "Obciąż RZ" zdejmuję liczbę podzespołów z arkusza "RZ" ... :?: mechanizm arkusza "robi" rozliczenie tak jaby wszystkie dane tabeli arkusza "Przeksięguj" dotyczyły tylko RZ zawartego w komórce "G1"... :?: Po pierwszym użyciu...
A ja tak do tego posta się dołączę i zapytam o makro co nie zakres komórek ma przenosić tylko wybrane komórki do nowego arkusza i ustawiać je w jednym wierszu. Mam już coś napisane ale nie działa. Proszę o pomoc. Kod makra: Sub zapisdobazy() ' ' zapisdobazy Makro ' Przyjmujący_zamówienie = Range("E6") ID_zamówienia = Range("E7") Sheets("Baza").Select...
Żaden ze standardowych komponentów zdaje się nie obsługuje takiego zapisu do pliku - musisz go sam oprogramować. Co do samego komponentu - ze standardowych StringGrid powinien Ci wystarczyć. Dodawanie wierszy realizujesz poprzez zwiększenie własności RowsCount. Usuwanie wierszy ze środka musisz oprogramować tak, aby niższe przenosiły się na wyższe,...
Troszkę mi się zeszło z odpowiedzią, ale chwilowo zająłem się innymi sprawami. Jak wcześniej wspomniałem moim założeniem jest stworzenie makra/funkcji która po kliknięciu na na pole obok "Współczynnik częstotliwości [FM]" przenosi nas do tabelki znajdującej się w arkuszu 2. Po kliknięciu na odpowiednią komórkę w tabeli danych makro/funkcja zwraca wartość...
Witam panowie... i panie Jaki jest okres wypowiedzenia umowy w Orange ? Umowa na komórkę kończy mi się 7 marca 2014r. Będę się przenosił do Play dla firm. Pozdrawiam,
hej mam pytanie pewnie banalne ale nie bardzo znam się na excelu. Potrzebuje przenosić do kilku komórek jednego arkusza zawartość komórek z innych arkuszy. Jakiej funkcji mogę użyć. W arkuszu mam kolumny usługa jednostki miary cena i muszę nanosić do poszczególnych wierszy pozycje z innych arkuszy gdzie mam wszystko spozycjonowane. Z góry dzięki wielkie...
Witajcie. z góry przepraszam za być może błahe pytanie ale nie miałem nic wspólnego z Excelem i być może nawet z złym temacie pisze ale mianowicie potrzebuję pomocy. posiadam arkusz1 gdzie mam imiona i nazwiska poszczególnych osób i arkusz3 gdzie mam adresy i dane dych samych osób i moje pytanie czy istnieje jakaś formuła czy jakieś odwołanie które...
Czy jest jakiś program (oprócz "7650-3650-3600 Handset Manager") do prostszego przenoszenia danych z komórki na komputer i z powrotem?? Oxygen pod symbiana też mi nie chce sie połączyć...
wyładowywanie bagażnika i przenoszenie opon z komórki do samochodu. Jestem leniwy :D O, to, to! Ja jeździłem na zimówkach tylko dlatego, że nie dało się zmienić "od ręki", wszyscy kazali czekać ponad tydzień. A przecież nie będę jeździł z czterema zapasowymi kołami!
Jest. Mało tego, masz wybór: formuła w docelowej komórce, lub makro.
A dlaczego chcesz zastosować makro do tak prostego działania :?: Pokaż swój plik (ewentualnie pliki żródłowe i docelowy) :!: , albo szukaj na elektrodzie przykładów rozwiązań "przenoszenia danych" :idea:
Witam kolegów i koleżanki. Zwracam z prośbą do was o pomoc, język VBA jest mi obcy. Wszystko dzieje w obrebie tego samego zeszytu o nazwie "Dane" W zeszycie "DANE", arkuszu " Baza" w kolumnie J od komórki 13 mam dwa słowa Auto i Ciągnik. Chciałbym aby w momencie jak pojawi się słowo " Auto" makro przenosiło dane do arkusza "Produkt". Arkusz "Baza" w...
No więc tak. Nagałam sobie makro, aby zobaczyć jak przeniść samą wartość. Sęk w tym, że na początku przenosiło wartości, tyle że do innej komórki. Potem się zorientowałam, że moją zmienną nie są kolumny, tylko wiersze. Po poprawieniu tego makro przenosi mnie do drugiego arkusza, ale nie wyrzuca wartości. Podsyłam plik.
makro przenoszenie komórek przenoszenie aplikacji przenoszenie basów
integra czujnik obecności profile grzania napięcie rezystorze katodowym
captor aplikacji captor aplikacji
Jak usunąć logger z aplikacji Solarman? Samochód nie odpala, kręci, jest iskra, nie łapie na plaka ani z popychu – diagnostyka rozrządu
