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]
W załączniku.
Kopiowanie komórek: [syntax=vb]Sub Kopiowanie() Linia = 2 Sheets("Sheet1").Select Range("C6:H45").Select Application.CutCopyMode = False Selection.Copy Sheets("PASS").Select While Range("A" & Linia).Value <> "" Linia = Linia + 1 Wend Range("A" & Linia).Select Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ False,...
W załączniku.
Sheets("DATA ENTRY " & s)
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]
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,...
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.
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...
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)...
Wstawiam plik z rozwiązaniem problemu, tak jak ja go zrozumiałem. W kodzie makra nie wstawiałem objaśnień, bo zmienne nazwałem aż naddto opisowo. Jeśli czegoś nie rozumiesz z procedury, korzystaj z F1 ustawiając kursor na nieznanym Ci "słowie". Aha, nie zapomnij włączyć makr w Excelu, najlepiej na stale. Dostęp do edytora VBA to chyba wiesz: Alt + F11...
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
Dziękujemy za pozdrowienia. Proszę załączyć plik z przykładowymi (fikcyjnymi) danymi. Pytania dotyczące zagadnień związanych z pakietem Office, Open Office i tym podobnych, w miarę możliwości, powinny być uzupełnione załącznikiem w postaci pliku, zawierającym układ i rodzaj danych, oraz własne próby rozwiązania.
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
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...
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...
[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,...
Dla mnie trochę przerost formy no ale każdy ma swój styl programowania. Zauważ że warunek w głównej procedurze wyjkonuje się jedynie gdy nie ma arkusza o danej nazwie. W przeciwnym wypadku nie robi nic. Proponuje dodać "w przeciwnym wypadku - gdy warunek jest niespełniony" czyli Else i ustawić temp na istniejący arkusz o danej nazwie. Z tym że wyjąć...
Witam wszystkich Potrzebuję pomocy w stworzeniu makra działającego wg poniższego 1. w arkuszu "dane2" mamy cennik produktów 2. w kolumnie E są przyciski pod które muszę podpiąć makro; przycisk z E2 kopiuje wartość komórki C2 do arkusza "dane1"w pierwszą wolną komórkę z zakresu A3:A20; przycisk z E3 kopiuje wartość komórki C3 do arkusza "dane1"w pierwszą...
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",...
Załącz przykładowy plik, bo 1 plik jest lepszy od 1000 słów. To trzeba sprawdzić w działaniu. Prawdopodobnie potrzebna będzie jakaś procedura zdarzeniowa, ale trzeba zobaczyć jak ona będzie działać przy ukrytych kolumnach.
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.
Witam, Czy jest sposób na kopiowanie tylko samych wartości komórek w excel-u (przez przeciąganie), tz. aby do komórki docelowej kopiowane była wartość z komórki kopiowanej ale formatowanie (kolor, obramowanie,itd.) pozostawało bez zmian w docelowej komórce ? pozdrawiam.
No to pewnie arkusz "XXX" & Cells(Y, "B") nie istnieje. Stojąc mniej więcej tam napisz w oknie poleceń (Immediate, jak nie mam to sobie włącz: View, Immediate Window) coś takiego: ? "XXX" & Cells(Y, "B") Napisałem, że muszą być przygotowane wszystkie potrzebne arkusze z nagłówkami, makro ich nie tworzy.
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)
sprawdź załącznik
Lepiej opisz konkretne zadanie które ma ten arkusz wykonywać bo może to się da załatwić lepiej. Chodzi o wybranie jakichś konkretnych danych spełniających określony warunek? To można zrobić np. przy pomocy tabeli przestawnej.
Tylko już .xlsm
Wartość komórki C15 powinna trafić do wiersza 1, natomiast wartość komórki C16 do wiersza 2. Jeśli komórka C15 jest pusta, wtedy w wierszu 1 powinno zostać puste miejsce, natomiast w kodzie, który zamieściłam następuje przesunięcie i C16 trafia do 1 wiersza.
MOVX (at)R0,A ; Kopiuje zawartość akumaulatora do komórki pamięci zewnętrznej o adreści umieszczonmym w rejestrze R0. MOV A,#WOT ; Kopiuje do akumulatora wartość spod etykiety WOT, czyli 1101111B MOVX (at)R1,A ; Kopiuje zawartość akumaulatora do komórki pamięci zewnętrznej o adreści umieszczonmym w rejestrze R1.
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...
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ę...
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...
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
domyślnie kopiując zaznaczone komórki i wklejając do edytora tekstowego wartości odzielone są TABem :?: :not: Typowe ustawienia :idea: przy kopiowaniu komórek arkusza 965302 i wklejaniu do edytora tekstowego 965305 wartości rozdzielane są "powrotem karetki" CR i "przesunięciem linii" LF :D
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.
Scalone komorki w zakresie kopiowania?
[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]
Żeby od komórki z wartoscia="DANE TECHNICZNE" Kopiował wszystkie wartości komórek poniżej, aż do komórki , w której wartośc= "INNE WARIANTY" i wklejał do jednej komórki w arkuszu3 Oraz poza tym - chciałbym, aby w komórce zostawały tylko liczby - bez tekstu, (np. KOŁO CENA 391,00 C = 391,00) próbowałem w formatowaniu, ale nie dało rady, jest jakiś inny...
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
Chodzi o to, że w arkuszu "Rejestr" mam komórkę do której kopiuje się wartość z innego arkusza: Cells(Rows.Count, 3).End(xlUp).Offset(-NrR... + 1, -1).Select ActiveCell.Value = strNrZP I ten moment jest ok..., ale następnie chciałem aby od tej aktywnej komórki (która już ma wartość) skopiować tą komórkę o ilość razy poniżej......
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:...
nie wiem czy będzie działał, DSM-51 to taki niby asembler ale z dodatkami. mova,23h - do akumulatora jest kopiowana wartość komórki pamięci o adresie 23h. Jeśli chcemy do A skopiować wartość 23h należy wpisać MOV a,#23h więc jak już to: lcallwait_key adda,#30h ;movR2,a ;movA,23h ;23h-# w tabeli asci cjneA,#3fh,pomin_poprawienie_znaku ;3fh- funkcja enter...
CTRL+SHIFT+" (CUDZYSŁÓW) Aby skopiować wartość z komórki nad aktywną komórką do komórki lub paska formuły CTRL+` (POJEDYNCZY CUDZYSŁÓW) Aby przełączać się między wyświetlaniem wartości komórek i formuł komórek Znalazłem tylko takie określenia. Sprawdź jaki format ma komórka po tej operacji. Przed użyciem tego skrótu za pewnie miałeś format komórki jako...
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.
Witam mam mały problem z makrem, a mianowicie chciałbym żeby to makro kopiowało tylko wartości komórek, a nie całe komórki nawet z ramką i kolorem czcionki, da się je jakoś przerobić.[syntax=vb]Option Explicit Sub CopyMultipleSelection() Dim SelAreas() As Range Dim PasteRange As Range Dim UpperLeft As Range Dim NumAreas As Integer, i As Integer Dim...
Potrzebuje makra w VBA, które wypełni komórkę wartością z komórki powyżej aż do dojechania do innej wartości. I później znowu nową wartość kopiuje do kolejnej nowej wartości. Proszę o pomoc
wartość w komórce "B18" była kopiowana z komórki "B18" pierwszego arkusza skoroszytu "Karty C-34 [syntax=vb]Private Sub Workbook_Open() sPath = ThisWorkbook.Path & "\" sFile = "Karty C-34.xls" sShName = Range("C2") sAddress = "'" & sPath & "[" & sFile & "]" & sShName & "'!" & Range("B16").Address(ReferenceStyle:=xlR... '" vData = ExecuteExcel4Macro(sAddress)...
Cześć wszystkim, jestem początkującym programistą VBA częściej używam nagrywania makr a później próbuję je przerobić na całość. Posiadam dwa arkusze "Arkusz A" to baza "Arkusz B" to formularz do którego chcę przekopiowywać z bazy ("Arkusz A") komórki A2 wartość wklejać ją do formularza ("Arkusz B"), do komórki B10 jako wartość, a następnie z komórki...
ok, postaram się napisać to co potrzebuje jak najlepiej umiem W arkuszu 1 w kolumnie A (A1:A10) i w arkusz 2 w kolumnie D (D1:D10) znajdują się te same dane. Chciałbym żeby makro porównało te dwie kolumny i skopiowało komórkę C1 do B1 jak w kolumnie A będzie ta sama wartość co w kolumnie D. Chodzi o to żeby w Arkuszu1 komórce A1 znajduje się słowo Fiat...
Dla Ciebie to bardzo proste, a ja nie mam pojęcia o takich rzeczach. Chciałbym tylko zwrócić uwagę na fakt że na początku miałem 1 wiersz zaznaczałem go i kopiowałem zmieniając wartość komórki z 1 na 2 itd. do której się odnosiło pole gdzie musiałem potwierdzać.
kopiować wartość wskazanej komórki do kolejnej pustej komórki w kolumnie innego pliku Co znaczy "do ... komórki w kolumnie innego pliku" ? Tam jest kilka kolumn, gdzie w pliku źródłowym będą komórki-dawcy danych do zestawienia ? I co znaczy "wskazana komórka", będziesz zaznaczać myszakiem daną komórę i po wciśnięciu przycisku/wybraniu makra ma przenosić...
Witam! Bardzo dziękuję - faktycznie chodziło mi o to żeby wartość się kopiowała a nie przenosiła :-) - i działa to tak jak chciałam :-) A podpowiesz jeszcze jak zmienić żeby kopiowała się sama wartość z klikniętej komórki bez formatowania?
Ja bym to zrobił mało elegancko, ale skutecznie. W kolumnę C poleceniem "wypełnij" kolejne liczby 1.....999 (żeby mieć możliwość powrotu do oryginału po sortowaniu) W D1 wpisujemy 1, w D2....D999 wpisujemy funkcję "JEŻELI" o parametrach: jeżeli w komórce ( D,powyżej) jest wartość = 40 to wartość bieżącej komórki = 1, a jeżeli jest mniej to wartość...
Wrzucam plik z makrem. W komórce M1 wartość jest liczbą.
Nie mogę jeszcze porównać szybkości, ale wcześniejsze makro które działało na podobnej zasadzie z tym, że wplecione w nim było bardzo dużo działań na arkuszach, w sensie kopiowania wartości komórek z jednego arkusza, wklejanie do innego, sprawdzanie czy pasuje i tak w koło, co podobno brało bardzo dużo mocy obliczeniowej, było w stanie przerobić około...
Witam. Mam za zadanie napisać makro kopiujące wartości z jednego arkusza do drugiego. Jak dotąd nie było z tym problemu ale teraz są to dość obszerne arkusze więc nagranie makra trochę mija się z celem bo dużo wartości musi zostać skopiowane. Najbardziej zastanawia mnie dlaczego wartości z komórek AF54 i AG54 usuwają się za każdym razem jak odpalę to...
Jeżeli kilka, to Kopiuj>Wklej...
Wydaje mi się, że najlepszym rozwiązaniem w przypadku wartości stałych, wpisywanych z klawiatury jest stosowanie grupowania arkuszy. Wtedy w obu arkuszach jest dokładnie ta sama zawartość. Pozwala to również na formatowanie komórek, ukrywanie i odkrywanie wierszy, usuwanie i wstawianie wierszy. Trzeba tylko zadbać, żeby wiersze sobie odpowiadały. Poprawki...
Proszę o modyfikację makra, w załączniku. Makro nie kopiuje funkcji zawartych w komórkach, na czym mi zależy, kopiuje tylko wyświetlaną wartość. Jestem osobą niewidomą i raczkującą w temacie. Używam program do odczytu ekranu, niestety pomoc w VBE nie dostępna dla mnie
Przekopiuj wszystkie komórki do worda i kopiuj je z worda to TEGO programu.
Zmodyfikuj np. tak :D [syntax=vbscript]Private Sub CommandButton1_Click() Dim rg As Range 'komórka docelowa - wystarczy lewy górny róg zakresu' Dim k As Integer Set rg = Range("Q3") k = rg.Value Range("arkusz1!I13:I169").Copy 'kopiuj' rg.Offset(0, k).Select Selection.PasteSpecial xlPasteValues 'wklej wartości' Application.CutCopyMode = False 'kasuj...
Niestety, nie bardzo mi oto chodziło. Otóż mam plik: Zeszyt2, w którym podaje się dane wejściowe w jednej komórce, następnie wykonywane jest w tym pliku skomplikowane działanie i wynik wyświetlany jest w drugiej komórce. Takich danych wejściowych mam dużo, ale wynik jest wykonywany tylko z danymi z jednej komórki i podawany też tylko w jednej. Działanie...
Mam jeden arkusz z danymi w komórce A1 oraz B1 .Chciałbym aby w drugim arkuszu kiedy wpiszę dane z komórki A1 automatycznie kopiowały mi się dane z komórki B1 jak to zrobić ? Jeśli chcesz, aby w drugim arkuszu dane z komórki B1 z pierwszego arkusza kopiowały się automatycznie po wpisaniu określonej wartości w komórce A1, możesz to osiągnąć używając...
Witam. Mam dziwny problem z arkuszem kalkulacyjnym w Open Office. Otóż kiedy kopiuję jakąś komórkę, wartość w niej. To dopiero po ok 5sekundach mogę wkleić. Coś blokuje kopiowanie do schowka systemowego? Ogólnie to się program przycina na chwilę i nic w nim nie można zrobić. Z innymi programami nie ma takiego problemu tylko z arkuszem kalkulacyjnym....
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?
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...
Jeśli nie robisz tego często, może wystarczy Kopiuj > Wklej Specjalnie z zaznaczoną opcją "przemnóż" (wcześniej mnożnik trzeba skopiować, zaznaczyć przemnażany zakres, ppm i wybrać wklej specjalnie)
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...
Wszystko ok tylko potrzebuję jeszcze taki moduł gdzie będzie kopiowało tylko wartości komórek a nie formuły i przy wkopiowaniu w oddzielny arkusz będzie sprawdzać który wiersz jest pierwszy wolny i zapisywać pod pierwszym wolnym. Dodano po 3 Mam takie makro to prawie wykonuje to co bym chciał ale kopiuje całe formuły a nie same wartości komórek, jak...
Witam, Szukam sposobu na rozwiązanie takie problemu: Mam plik, który zawiera kilka lub kilkanaście arkuszy. Liczba arkuszy jest zmieniana na bieżąco (zazwyczaj są dodawane) Chciałbym aby do jednego arkusza powiedzmy pierwszego były kopiowane wierszami wartości konkretnej komórki z każdego arkusza (oprócz tego, w którym jest raport). W każdym arkuszu...
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...
Witam Po raz kolejny zwracam się z prośbą. Potrzebuje zrobić makro które będzie mi kopiowało wartość komórki A35 z pierwszego arkusza o nazwie "Pierw" do pierwszego wolnego wiersza w arkuszu o nazwie "Po za" Jednocześnie potrzebuje też makro które będzie wyszukiwało komórkę w arkuszu "Po za"( i kasowało ją) o takiej samej zawartości jak komórka A35...
Witam. Mam może śmieszne pytanie, jednak dla mnie jest to wielką zagadką. Jeśli w Excelu włączę filtr je jakiejś kolumnie czy ukryje wiersze. Kopiuje wszystkie komórki z filtrowaną wartością, to czasem kopiują się tylko te wartości filtrowane, a czasem wszystkie, nawet te ukryte. Np: http://obrazki.elektroda.net/40_12706476... Jeśli skopiuje komórki...
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! Potrzebuję pomocy z odpowiednim zaprogramowaniem makra. Opisuję dokładnie czego potrzebuję - mam w pliku 2 arkusze : "m-ki" gdzie w kolumnie A mam kolejno wypisane materiały a w kolumnie B do każdego materiału mam przypisany index "karta wadliwe" jest to karta finalna, do której chciałbym aby po podwójnym kliknięciu w wartość z komórki A w karcie...
No właśnie z tym mam problem. Ustawienie kolumn jest różne. A jest B a B bywa Z w zależności od dnia. Chcę żeby makro sprawdziło za każdym razem wartości pierwszych komórek i tylko wybrane kopiowało do innego pliku. Zaznaczam że nagłówki się nie zmieniają. Zakładając A1 to "deska" a następnym razem Z1 to "deska" - za każdym razem będzie kopiowana cała...
Cześć. Szukam i szukam i znaleźć nie mogę więc kiepsko szukam. Problem mam taki. Mam w komórce wartość powiedzmy "A2+B2" Wiem, że "łapiąc" tę komórkę i przeciągając w dół w następnych będzie "A3+B3", "A4+B4". Natomiast jeżeli robię kopiuj i wklej to - jeżeli wklej jest w komórkę 1 wiersz niżej to wartość mam "A3+B3" - jeżeli wklej jest w komórkę 2 wiersze...
Z Copy już próbowałem w kilku wariantach. Zmieniłem kod zgodnie z Twoją sugestią. Z tym kodem kopiuje się niestety wypełnienie komórki kolorem, obramowanie, a co najważniejsze przy problematycznych wartościach kopiują się one jako tekt bez odpowiednich końcówek zł, %
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ą...
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....
Witam. Nie wiem jak to zrobić. Próbowałem coś wymęczyć kopiowaniem potem udało mi się filtrowaniem zaawansowanym ale niestety za każdym razem trzeba było uruchamiać nowy filtr. Ja potrzebuje aby kopiowanie nastąpiło zaraz po zmianie statusu na Zaakceptowane. Kopiowanie powinno się wpisywać w kolejne wiersze aby stworzyć w zakładce Północ wszystkie wpisy...
mniej wiecej. Chodzi o to, że jeżeli komórka z arkusza 1 do Arkusza 2 jest kopiowana po raz piewrszy to w kolumnie obok zostaje przypisana jej np wartość 10. przy kolejnej próbie kopiowania to licznik zostaje zmniejszony o 1.
Proponuję: 1) Zamiast formuły z funkcją JEŻELI zastosować formułę z funkcją MAX. Uniknie się w ten sposób dwukrotnego odwołania do tych samych danych. 2) Jeżeli będziesz przestrzegał zasady, że nowe arkusze są dodawane zawsze na początku (a nie na końcu, jak robi się zazwyczaj), to będziesz potrzebować zawsze odwołań do następnego arkusza w kolejności....
Pierwszy kod od PRL zapisuje do pliku z rozszerzeniem .csv , ale kopiuje wszystko do tych samych komórek usuwając formatowanie komórek. Mój kod wartości z komórek z jednego wiersza zapisuje do A1 , A2 itd. rozdzielając wartości z komórek przecinkiem, tak jak przy kopiowaniu książki adresowej z telefonu do .csv . Drugi kod próbuję zmodyfikować, bo po...
A co tu kupować ? Schemat i rozpoczęty wątek jest tu - http://www.elektroda.pl/rtvforum/topic15... . Bezproblemowo działa z każdym urządzeniem z szyną I2C . Możesz wiele zrobić pod warunkiem , że będziesz wiedział co robisz i za co odpowiadają poszczególne komórki i ich wartość bitowa . Choć do kopiowania tak szeroka wiedza nie jest potrzebna...
Pomóżcie stworzyć następujące macro: w komórce a1 mam dane które są wynikiem operacji (ale to może mniej istotne). dane z komórki a1 chciałbym skopiować do komórki c1 uwzględniając to iż w komórce c1 są już jakieś dane, więc operacja musiałaby uwzględniać dodawanie danych (wartości) z a1 do wartości c1. dodatkowo, operacja kopiowania (dodawania) wartości...
A jakie to formuły w kopiowanych komórkach?
Pętla FOR Wiersz =1 to wartość cells(wiersz, kolumna).Value =..... kopiowanie ; ; ; Next wiersz
czy da się za pomocą jakiegoś makra pobierając dane tak jak teraz kopiować pliki o takich nazwach jak wartości z tabeli? Raczej tak. Chodzi o skopiowanie arkusza do pliku o nazwie wpisywanej do komórki na samej górze (Np "P3.xls")? Nagraj rejestratorem. Ale jeśli już makro, to "przy okazji" zamiast formuł w komórkach (łącz w nowym pliku), lepiej przypisać...
A filtr oraz kopiuj - wklej specjalnie nie wystarczy?
"=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...
Dziękuję za odpowiedź jednak coś nie do końca mi działa.. wkleiłem ten kod w jeden warunek który mam stworzony i dodałem też zmienną Dim Ctrl As Control , jednak wartość wyrzuca mi błąd i podkreśla kod: "If TypeName(Ctrl) = "Textbox" And Ctrl.Value <> vbNullString Then" Nic nie kopiuje do komórki a (Ctrl) po najechaniu kursorem pokazuje wartość...
Ja zaczynam nauke. Chodzi o to aby makro kopiowało dane z arkusza obliczenia od komórki F4 pod warunkiem że tam sa liczby a nie puste komórki. Zakładając że w komórce F5 jest liczba 0,1, to makro ją wstawia do arkusza działki do komórki B2, po zidentyfikowaniu danych w komórce F5 kopiuje wartość przypisana(znajdującą) w komórce D4 w arkuszu obliczenia...
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" ;)
witam Was serdecznie ;) Mam problem ze zrealizowanej pewnego makra. Postaram sie opisać w jaki sposób program ma działać na bardzo uproszczonych danych. Poniżej zamieściłem również prezentacje graficzną tego co ma zrobić makro. Na wstępie jedno podstawowe pytanie: skąd Wy bierzecie różnego rodzaju wymyślne funkcje, z jakich materiałów korzystacie? ja...
Coś pokręciłaś z tym hasłem. Odblokować trzeba ten arkusz, do którego dane będą kopiowane, czyli: [syntax=vbscript]Worksheets(2).Unprotect Password:="123"[/syntax]Potem analogicznie zablokować. Oczywiści można też z Activesheet pod warunkiem, że ten arkusz (docelowy) będzie aktywny. Arkusz źródłowy może być chroniony. Odblokowana musi być w nim tylko...
Witam, szukam funkcji która by wyszukiwała daną nazwę w komórce następnie kopiowała nazwę przypisaną do danej komórki oraz sumowała wartość przypisaną do danej komórki. Przykład podaję w załączniku. Na niebiesko zaznaczone dane tabeli a na czerwono tak jak ma to teoretycznie wyglądać
wymazując w pierwszym arkuszu A po co 'wymazywać'? I tak pewnie zostaną one zastąpione nowymi wartościami, prawda?
excel kopiowanie wartości komórki kopiowanie wartości wyświetlanie wartości komórki
stukają zawory wykrywacz metal monet ariston hotpoint pralka
electrolux ew8tn3372p politechnika łódzka
Odblokowanie radia Renault Scenic 1 z napisem "CODE" Parametr P27 w piecu Termet - funkcja i zastosowanie