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...
Yogi (przypominasz mi dzieciństwo) ;). Nie pamiętam, czy był to 'Zwierzyniec', czy też 'Ekran z bratkiem'. Ale autor napisał: potrzebuję makro A do Autora. Może ten kod będzie wygodniejszy (jest bez obsługi błędów, sam się pobaw): [syntax=vb]Sub Przenies() Dim d As Date, p As Date, k As Date ow = Cells(Rows.Count, "B").End(xlUp).Row y = Sheets("Arkusz2").Cells(Rows.Count,...
Tylko już .xlsm
W załączniku.
Witaj [syntax=vbnet]Sub CellToComment() Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection For Each Rng In WorkRng koment = koment & Rng.Value & vbLf Next WorkRng(1).Offset(WorkRng.Count).NoteTex... Text:=koment End Sub [/syntax]
Taki sposób kopiowania skopiuje również format komórki źródłowej. Można spróbować zrobić to w inny sposób. Załóżmy, że komórka "do rozciągnięcia" to A1. Jeśli chcemy rozciągnąć w prawo to w B1 można wpisać formułę "=$A$1", co w wyniku w komórce B1 da wartość z A1, ale już bez formatowania. Dalej B1 można rozciągnąć w prawo. Analogicznie w dół, można...
Jak masz już zapamiętany w zmiennej numer kolumny, to możesz odwołać się do komórki w trzecim wierszu przez [syntax=text]Cells(3, numer_kolumny)[/syntax] Jeśli potrzebujesz się odwoływać za każdym razem do innej kolumny, to: [syntax=text]Cells(3, ActiveCell.Column)[/syntax]
Sheets("DATA ENTRY " & s)
Niestety Run-time error '1004': Metoda PasetSpecjal z klasy Range nie powiodła się.
Wiem ;) ale nie widzę związku za bardzo. Nigdzie dolarów nie mam, a nawet jeśli, to jak miałyby wpłynąć na procedurę kopiowania?
Cześć, potrzebuję pomocy w przetłumaczeniu procedury na język VBA. Mam 2 arkusze: Arkusz1 i Arkusz2. W Arkusz2 użytkownik wpisuje w komórkę B2 liczbę całkowitą. Następnie w wybranych komórkach zakresu D7:D100 również Arkusz2 wpisuje dane. Wpisane dane (i tylko te wpisane) mają się po naciśnięciu na przycisk (przycisk i podpięcie akcji sobie ogarnę)...
Napisałem krótki kod w VBA, który tworzy mi historię edytowania każdej komórki z danego zakresu w komentarzu. Pokazuje też, kto wprowadził zmiany wraz z datą. Wszystko ładnie działa, tylko musi to być bardziej - że tak powiem - idiotoodporne :) ...i z tym mam problem, tzn.: 1. Jak już komentarz automatycznie się stworzy, to nie może być możliwości usunięcia...
potrzebuję każdy wodomierz rozpisać oddzielnie i nie łączyć ciepłej wody w kuchni z ciepłej wody w łazience. Musi być każdy osobno. Kobitki, to takie marudy są odrobinę ... :| ... "Ułatwianie sobie życia" - dodać jedną kolumnę w arkuszu ''Arkusz1'' na "indeks" wylistowujący "adreso-wskazania" wodomierzy, np. w kolumnie ''E'' - i tak przecież są tam...
Cześć, mam problem z przyciskami, w których umieściłem makro, które kopiuje wartości z komórek C6:C45 w zeszycie Sheet1 do zeszytu PASS (A3:AN3). Jak wciskam przycisk "Pass" wartości są kopiowane do zeszytu pass, ale jakoś dziwnie bo nie w jednym wierszu tak jak bym chciał tylko łapie kilka wierszy?? Drugi problem jest taki, że nie wiem jak to zrobić,...
Witam. Niestety moja przygoda z VBAdopiero się zaczyna dlatego potrzebuję pomocy, dokładnie potrzebuje stworzyć makro które będzie kopiować dane z np. komórki( od A1do D1 ) do drugiego arkusza jednoczesnie wymazując w pierwszym arkuszu skopiowane dane (za pomocą przycisku) i by po następnym wpisaniu danych do tych samych komórek i kolejnym skopiowaniu...
Witam, Chciałbym skopiowac zawartość 5 komórek, ale to kopiowanie miałoby się zacząć od komórki, w której wartość = "DANE TECHNICZNE" Niezbyt wiem czy idzie to zrobic wogole formułą? Czy trzeba makro? Tak czy owak, w necie nic znaleźć nie mogłem, a sam niezbyt ogarniam jak makro napisać w VB. Proszę o pomoc.
Witam jak w temacie,chcę skopiować komórkę zawierającą formułę i wkleić ją do innego arkusza,zonk chodzi mi tylko o skopiowanie danych z komórki a nie formuły,poradziłem sobie tak ,że ręcznie przepisuje zawartość komórek a potem dopiero przenosze do drugiego arkusza jest prostszy sposób?
Mam problem aby zrobić jako makro kopiowanie do dowolnej komórki wartosci z komórki formatowanej jako data i z funkcją DZIŚ. Chodzi o to że w pliku potrzebuje wstawić w jedną kolumnę (kol. C) aktualną datę (ale jeśli zrobiłbym z funkcji dziś to codziennie ta data by się aktualizowała dlatego chodzi mi tylko o wartość formuły). Zrobilem komórkę z funkcją...
Witam, jestem calkowicie ciemny jezeli chodzi o pisanie makra, i potrzebuje pomocy. Chodzi o to ze chcialbym aby makro kopiowalo zawartosc z komorki np. A1 do komorki B1 ale w okreslone miejsce np. Zawartosc komorki A1: mocne Zawartosc komorki B1: Dzis opady byly bardzo slabe Chodzi teraz o to zeby slowo "slabe" z komorki B1 zastapic automatycznie slowem...
Witam mam dwa arkusze - baza - są zawarte dane rozszerzone oraz PA- zbudowany na podstawie ark pierwszego z danymi uproszczonymi. i tak np. w arkuszu PA są w kolumnie B - nr boxów i należy skopiować z bazowego arkusza "service level" czyli albo INTP albo INTE. I to już nie problem bo kolega z forum pomógł mi z formułą jeżeli. Problem się pojawia przy...
Witam. Potrzebuję pomocy w jednej kwestii, a mianowicie - w dwóch kolumnach mam wartości : 111 a 111 a 112 b 113 b 113 b 113 b 114 c potrzebuję ten zakres skopiować do innej tabeli i by wyglądał w ten sposób: 111 a 112 b 113 b 114 c Nie wiem w ogóle jak się za to zabrać. Funkcja usuń duplikaty nie rozwiązuje problemu, bo docelowo musze przypisać kolumnie...
Hej. Proszę o podpowiedź czy jest taka funkcja która w zależności od tego jaka cyfra pojawi się w komórce to cyfrę z komórki sąsiedniej przepisze do innej komórki. Np. jeśli w komórce C1 zostanie wpisana cyfra 8 to, cyfrę z komórki B1 skopuj do komórki D1. Dalej, jeśli w komórce C1 zostanie wpisana cyfra 10 to, cyfrę z komórki B1 skopuj do komórki E1....
Witam Dopiero zaczynam z Vba Exel i mam problem z przyśpieszeniem swojej pracy. Mam 2 arkusze. W pierwszym uzupełniam wiersze od (a2:h22) oraz komórkę "k1". Po włączeniu makra chcę by komórki z podanego przed chwilą zakresu dopisywały się w drugim arkuszu od "a2:h" a komórka "k1" żeby skopiowała się tyle razy ile dopisało się wierszy i to do ostatniej...
Mam 3 arkusze w jednym skoroszycie. w każdym arkuszu około 15 kolumn i 150 wierszy. Porzebuję makro, które w przypadku wystąpienia w kolumnie C danego arkusza wartości "TAK" (może występować w różnych wierszach), zwróci mi i skopiuje do osobnego arkusza dane z wierszy kolumn od C do F. Jak to ugryźć?
Witam mam problem z budową makra. Za pomocą przycisku uaktywni się makro: 1. Kopiuj Komórkę X z zakładki A 2. W zakładce B w zakresie A1; A150 znajdź komórkę Y (która jest zmienną i jest przypisana do komórki zakładce A) 3. Wklej komórkę X w wierszu komórki Y w pierwszej nie pustej komórce, która jest nie większa od 10 (ograniczony zakres) Nie wiem...
Problem mam tego typu. Mam kilkutysięczną listę komórek. Wartość każdej z osobna muszę przekopiować do innego programu w celu dalszych obliczeń. I tu jest problem. Jak do worda, czy notatnika wartość komórki mogę wkleić bez problemu to do tego programu już nie mogę. Dopiero po zaznaczeniu tejże wartości w górnym pasku formuły daje się skopiować do tego...
Witam, jak w większość w dziale stawiam swoje pierwsze kroki z tworzeniem makr (a w sumie to z ich nagrywaniem). Mam plik z dwoma arkuszami, w pierwszym arkuszu wybieram z listy rozwijanej jeden z trzech rodzajów zapalników (komórka E3) a następnie wpisuje ich liczbę do komórki H3. Chciałbym aby makro kopiowało wartość z komórki H3 do odpowiedniej kolumny...
Witam. Szukam pomocy i mam nadzieję że tu ją znajdę. Sprawa zapewne błacha, ale nieposiadam dużej wiedzy o VBA. Postaram się jak najkrócej opisac potrzebę na przykładzie. Na przykład w komórce A1 mam wartość "5" która jest wynikiem funkcji np. =2+3. Potrzebuję teraz skopiować ten wynik "5" z komórki A1 do komórki A2 za pomocą VBA by uzyskać "czysta"...
Witam, Mam problem z makrem, które znalazłem na forum i które staram się przerobić pod moje potrzeby. Docelowo, makro ma sprawdzać czy w komórce w kolumnie F arkusza 1 jest wyraz "tak" i jeżeli to się potwierdzi to kopiować w pierwsze wolne miejsce w kolumnie D akrusza 2 zawartość komórki B arkusza 1. I jednocześnie usuwać ten wiersz z arkusza 1. Poniżej...
Teraz wszystko jasne. [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 2 Then Application.ScreenUpdating = False Plik = "C:\PlikiSpraw\" & Range("A" & Target.Row) & ".xlsx" If Dir(Plik) <> "" Then Rows(Target.Row).Copy Set s = Workbooks.Open(Plik) nw = s.Sheets(1).Cells(Rows.Count, "A").End(xlUp).Row...
W komórkach J3:L3 wpisujesz wartości alternatywne, które zastąpią te z WYSZUKAJ.PIONOWO. Jeśli te komórki zostawisz puste lub będzie tam wartość nieliczbowa, to pozostaje wynik pierwotny z WYSZUKAJ.PIONOWO.
Ja bym tak to zrobil Dim Tekst As String For i = 2 To Worksheets.Count Tekst = Tekst & Worksheets(i).Cells(1, 1).Text Next i Worksheets(1).Cells(1, 1).Value = Tekst
gdy ilość znaków wynosi 14 Proponuje np. [syntax=vbscript]Private Sub TextBox1_Change() Lr = Range("A" & Rows.Count).End(xlUp).Row + 1 If Len(TextBox1.Value) = 14 Then Cells(Lr, "A") = TextBox1.Value End If End Sub[/syntax] Jeśli chcesz 14 znaków lub więcej to oczywiście zmień zapis warunku na => 14 :D
[syntax=vbscript]For y = 1 To ile - 1[/syntax]
Hmm, może dwie pętle? Jedna do określenia Nr wiersza, druga do wypełniania... [syntax=vb]wrs = 1 strS = "MAGMA" maks = 1000 'ustawienie maksimum, coby nie wpaść w nieskończoną Do While Cells(wrs, 6) <> strS If wrs = maks Then Exit Sub wrs = wrs + 1 Loop Do While Cells(wrs, 7) <> "SUMA" If wrs = maks Then Exit Sub wrs = wrs + 1 Cells(wrs,...
Brak załącznika to poważny mankament! Nie wiadomo, jakie dane są w kolumnie "O". W kodzie PRL jest sprawdzany warunek: [syntax=vbscript]Sheets(x).Cells(y, "O") >= -30[/syntax]Otóż warunek ten spełniają nie tylko liczby >= -30, ale również puste komórki, dowolne teksty, w tym teksty puste, wartości logiczne. A jeśli w komórce jest wartość błędu, to program...
Sprobuj takie makro - jest bardzo proste zaklada ze uruchamiasz je z arkusza Dane i ze tabelka w arkuszu Dane jest w tym samym miejscu co dales w przykladzie Sub test() Dim DaneX, DaneY, SpisX As Integer DaneX = 2 DaneY = 2 SpisX = 10 Do While Cells(DaneX, 1).Value <> "" Do While Cells(1, DaneY).Value <> "" If Val(Cells(DaneX, DaneY).Value)...
W załączniku.
Makro poniżej przesuwa nazwiska w prawo o wartość numeru grupy+1, a następnie usuwa puste komórki w obszarze danych. Nazwiska nie są posortowane. Jeżeli jest potrzeba. sortowania to na początku makra dopisać sortowanie.[syntax=vbscript]Sub Przepisz_Nazwiska() Dim Tab_Opis As Variant With ActiveSheet Tab_Opis = Array("Grupa 1", "Grupa 2", "Grupa 3",...
Przy założeniach że w arkusz1 dane w kolumnie A rozpocząć 3 wiersz, tabela na arkusz2 rozpoczyna się w 2 wiersze =INDEKS(Arkusz1!A:A;(WIERSZ()-2)*45+3)
No i masz odpowiedź! Wywal dolary i będzie OK! Pierwszy $ ustala kolumnę, drugi wiersz. $X$Y to stały adres komórki, nie zmieni się przy kopiowaniu.
Gwoli ścisłości: sprawdzanie poprawności danych nie chroni przed kopiuj-wklej z innego arkusza (czytaj: robiąc kopiuj-wklej i tak możesz wkleić w komórki dowolną wartość). Ale, nie ma rozwiązania idealnego.
A czy dane z wierszy w sekcji "Zakup paliwa" są powiązane jakoś z danymi w wierszach "Zużycie paliwa"? Masz tam kolumny stan pocz./kon. licznika, których brak w zakładce "Razem dział", co z nimi?? Last but not least : czemu po prostu nie dodawać wierszy z datą tylko wtedy, kiedy rzeczywiście jest jakiś zakup robiony? Bo co tak komplikować plik tyloma...
W miejsce 'Sheets("Sheet2").Select' umieść wstawianie arkusza (Sheets.Add) i nadanie nazwy (Activesheet.Name). Jeśli wartości w kopiowanych komórkach nie są unikatowe, musisz najpierw sprawdzić czy arkusz z taką nazwą istnieje.
Plik jest jeden i w nim są oba opisane makra. Pierwsze makro opisałem na początku postu nr 7; nosi ono nazwę "LiczX", a drugie makro, które opisałem na końcu postu nr 7, nosi nazwę "Makro1". Czyli mam 1 plik o nazwie: Kalkulator - Koszty Allegro v10f.xls w którym są 2 arkusze, a ich nazwy to: Kalkulator oraz Tablica wyników Odnośnie wymienionych niejasności...
Jeśli masz jakieś przeciwskazania co do zastosowania makr :cry: to w Twoim układzie danych najprościej moim zdaniem wykorzystać "wewnętrzny import" danych z Bazy przy użyciu Microsoft Query :D W kwerendach zmieniasz tylko kryterium filtrowania i po każdej zmianie Bazy możesz odświeżyć i zaktualizować wszystkie arkusze asortymentowe :spoko: 899914
Chyba łatwiej zrobić dwuklik na wierszu, z którego chcesz kopiować. Równocześnie uruchamiasz makro i wskazujesz wiersz. Możesz też się upewnić, czy to właściwy wiersz. Oczywiście można też wstawić tam InputBox, tylko wtedy jak chcesz uruchamiać to makro? Jeśli chodzi o moją propozycję, to komórki docelowe wypisujesz po kolei jako adresy obiektu Range:...
[syntax=vbnet]Sub Makro1() Set toskopiowac = Selection.EntireRow Range(toskopiowac.Offset(1, 0), toskopiowac.Offset(Selection.Value - 1, 0)).EntireRow.Select Selection.Insert Selection.EntireRow = toskopiowac.Value End Sub[/syntax]
wpisywane "ręcznie", a nie poprzez formuły - jak ogarnąć drugą część mojego problemu? Żeby wykorzystać makro zdarzeniowe :D to proponuję wykorzystać jednak inną kolumnę np. wolną obecnie kolumnę A :spoko: . W załączonym pliku proponuje w przedostatniej komórce kolumny A wprowadzić wartość 1 , a wówczas cały ten wiersz (od B do AH) zostanie wstawiony...
Jaką regułę zastosować, żeby w programie Excel dane z jednego arkusza kopiowały się do drugiego arkusza automatycznie. Dodano po 3 (at)ElektrodaBot Jaką regułę zastosować, żeby w programie Excel dane z jednego arkusza kopiowały się do drugiego arkusza automatycznie ?
początku dla $A$1 B2 z obrazka ELEKTRODA.jpg wynika, ze dla $A$1 C2 Poniewaz nie ma zalacznika, patrz przyklad(karta i baza w jednom skoroszycie) Wiersz dla druku - wartosc w C1(za ramami PrintArea) B1:B19 - funkcja tablicowa Ctrl+Shift+Enter
Filtruj wg kolumny z wynikami LICZ.JEŻELI http://obrazki.elektroda.pl/7228439700_1... i ostatnia czynność: kopiuj > wklej specjalnie/wartości - w z góry upatrzony arkusz. Przy odrobinie wprawy wszystko "idzie piorunem" ;)
To już wystarczyło zmienić numery wierszy w adresach. Natomiast ważne, aby nie kopiować formuł tablicowych do scalonych komórek. Generalnie to ze scalonymi komórkami same kłopoty. Scalanie komórek - jeśli jest konieczne - powinno być ostatnią czynnością w arkuszu, po umieszczeniu wszystkich danych i formuł. Pozdrowienia
Sortowanie w Excelu działa tak jak kopiowanie, a nie jak przesuwanie. W związku z tym odwołania z zewnątrz do obszaru sortowanego nie aktualizują się. W odwołaniach zewnętrznych trzeba się odnosić do stałych, a nie do adresów. Zaprezentowany problem można rozwiązać np. za pomocą funkcji WYSZUKAJ.PIONOWO.
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...
Tam w tej komórce z FZ występuje numeracja pierwsze Fz to FZ1 ale nie wiem czy numer tutaj ma znaczenie. Ma o tyle, że do tej pory sprawdzałem, czy wartość komórki = FZ, teraz trzeba sprawdzić, czy w łańcuchu znaków, będącym wartością komórki, znajduje się fragment FZ. Dodatkowo w komórkach A pod fz znajdują się głównie cyfry bądź puste pole więc może...
Wstaw nową kolumnę, wklej funkcję (przykład dla kolumny źródłowej A od 1 wiersza) =FRAGMENT.TEKSTU(A1;1;DŁ(A1)... i przeciągnij w dół. Następnie zaznacz kolumnę, Kopiuj, Wklej specjalnie>wartości i usuń kolumnę źródłową. Tę samą funkcję można użyć w pętli VBA (mid, len, right). Warto, jeśli czynność...
Dziękuje za pomoc. Mam jeszcze pytanie - czy istnieje możliwość pomijania kopiowania, gdy w danej komórce dodatkowej nie ma żadnej wartości / danych?
Czy nie byłoby prościej: Kopiuj > wklej specjalnie 1. Wpisujesz w dowolną komórkę dzielnik 2. Kopiujesz komórkę do schowka 3. Zaznaczasz zakres do przeliczenia 4. Ctrl+Alt+v 5. http://obrazki.elektroda.pl/6045363600_1...
Dzień dobry, Specyficzną cechą Excela, która na ogół jest uważana za zaletę jest to, że formuły w arkuszu są automatycznie przeliczane po każdej zmianie. Na poziomie arkusza można wyłączyć przeliczanie (tryb ręczny), ale w odniesieniu do całego arkusza, a nie poszczególnych komórek. Więcej można osiągnąć posługując się Visual Basiciem, ale Pan go nie...
A jakie to formuły w kopiowanych komórkach?
Najprościej, zapisać nową 1. zaznacz w innym miejscu arkusza lub w innym arkuszu zakres równy żródłowemu 2. napisz "=" 3. zaznacz zakres źródłowy 4. wpisz o ile ma się zwiększyć. Np "+2" 5. zatwierdź Ctrl+Shift+Enter (formuła tablicowa) http://obrazki.elektroda.pl/5481118400_1... 6. Ctrl+c (kopiuj) 7. Ctrl+Alt+v (wklej specjalnie), wybierz:...
czyli np.: =arkusz1!A1 jak przeciągnę tą formułę w bok (poziomo), to excel automatycznie w następnej komórce skopiuje dane z komórki B1, czyli =arkusz1!B1, a chciałbym żeby w następnej komórce była wartość z komórki A2, czyli =arkusz1!A2 Hmm, to jeszcze byłoby wykonalne. Jeśli kolumny po kolei w jednym wierszu, to skąd wiadomo gdzie ostatnia komórka...
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...
"=RC Tak Nie wiem jeszcze czy okaże się szybsze, ale warto spróbować. Jeżeli podłączysz makro pod skrót klawiszowy (obsługiwany jedną ręką), np w stylu CTRL+D to wbrew pozorom będzie to szybsze niż to co teraz robisz. A szybciej nie osiągniesz nic więcej bo przecież też żeby wkleić wciskasz ctrl+v. Po prostu stajesz myszką na danej komórce, wciskasz...
kopiować komórka excel excel kopiować wartość excel wartość komórka
oprawa schemat composite commodore generator klatkowy
massey ferguson dynashift akumulator elektronarzędzi
Cobra Rally GT900 Pro – niedziałające sprzęgło, diagnostyka, potencjometr, przewód RJ-12 Schemat ideowy Unitra Diora Tosca AWS-307 – PDF, naprawa, typowe usterki, modernizacja
