usunąć wyraz excel

EXCEL - Jak usunąć wartość w B1, jeśli liczba z B1 jest w A1?

Można formułą wyodrębnić ostatni "wyraz" (kolumna D), pomnożyć przez 1 i jeśli jest liczbą porównać z B1. Wyniki (kolumna C) przez kopiuj/wklej specjalnie/wartości skopiować do jeszcze jednej i usunąć pomocnicze... http://obrazki.elektroda.net/98_12837945... Jeśli nie występuje coś w rodzaju 1/2 (A5 na rysunku) to powinno być OK.

Excel - jak ponumerować wszystkie pozycje od nowa po usunięciu?

Value = ostWrs - 1 Ponieważ numeracja zależy od wiersza dlaczego nie używać formuły? ark.Cells(ostWrs + 1, 1).Formula = "=row()-1"

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

[Excel VBA] Excel VBA – błąd Variable not defined przy ComboBoxprefix3, jak poprawić kod?

Jest przypisanie, jest wyszukiwanie wolnego wiersza, brakuje tylko instrukcji warunkowej. Napisz najpierw samą instrukcję, następnie podstaw wyszukiwanie i przypisanie. Przeanalizuj: [syntax=vb]If usfdiplomaden.ComboBoxprefix3.Value = "Frau" Then MsgBox "Kobieta, czyli ""in""" 'sprawdzimy czy dobrze. Później linię usuniemy 'wyszukanie1 'przypisanie1...

[excel] funkcja dopisująca znak w komórce

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ść...

Excel - Jak zrobić makro do wstawiania wierszy, ale z warunkami

Moja propozycja: jedna para przycisków +/- i przypisane do nich makr: [syntax=vb]Sub wstaw() Rows(ActiveCell.Row + 1).Insert shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove Cells(ActiveCell.Offset(1, 0).Row, "H").FormulaR1C1 = "=R[-1]C" End Sub[/syntax] i [syntax=vb]Sub usuń() Rows(ActiveCell.Row).Delete shift:=xlUp End Sub[/syntax] Przed przyciśnięciem...

excel 2007 - jak sortować grupami, sumami częściowymi?

Tak się nie da. Usuń sumy częściowej. Dodaj kolumnę pomocniczą z funkcją suma.jeżeli() w której warunek będzie "odbiciem" "warunku" dla sumy częściowej i według tej kolumny posortuj dane (jako pierwszy klucz). Dopiero wtedy wstaw ponownie sumy częściowe.

Excel - Jak usunąć wcześniejsze duplikaty, zachowując ostatnie wartości?

[syntax=vb] Sub DelDupl() With Sheets(1).Range("A:B") r = 2 While .Cells(r, 1) <> Empty If Application.CountIf(.Columns(1), .Cells(r, 1)) > 1 Then .Rows(r).Delete shift:=xlUp r = r - 1 End If r = r + 1 Wend End With End Sub [/syntax] jeszcze nie jest dobre?

[Excel] Jak usunąć słowo ULGA z komórek w Excelu?

To Kolega ma to w Excelu czy w Accessie? Zwykłę Ctrl+H (aka: ZAMIEŃ) wyrazu ULGA na pusty ciąg nie wystarczy (jedynie w zaawansowanych opcjach zamiany trzba odznaczyć ptaszka przy "Dopasuj do całej zawartości komórki")??

VBA/Excel - Formularz wprowadzania danych do bazy

Witam, jak stworzyć okienko za pomocą VBA w którym dodam lub usunę dane do stworzonej już bazy ? Dodatkowo żeby można było rozwinąć możliwe w okienku i wybrać już z istniejących. Wprowadzić datę oraz ilość. :D :D :D Zupełne początki, tak od początku, z początkowym pączątkiem ? 828912

VBA Excel usuń wiersz jeśli spełnia warunek -komórka jest w bazie innego arkusza

Dopisałem informowanie w MsgBox o numerach identyfikatorów usuniętych wierszy: [syntax=vb] Sub Mania() Dim ws As Long, wDel As Long Dim usuniete As String ws = 1 usuniete = "" With Sheets("Arkusz1") Do While .Cells(ws, 1) <> "" On Error Resume Next wDel = Sheets("Arkusz2").Columns(5).Find(what:=... 1), lookat:=xlWhole).Row If Err = 0 Then...

Excel - VBA do wyciągnięcia z komórki określonego ciągu znaków / cyfr

Jak poniżej. Założenie, że zwraca pierwszy 26znakowy ciąg cyfr, po usunięciu spacji z tekstu. [syntax=vbscript]Function ZwrocIban(Szukaj_Komorka As Range) Dim dlugosctekstu, pozycja As Long Dim t, ciag, maska, iban As String Dim i As Long 'usuwamy spacje z tekstu t = Szukaj_Komorka t = Replace(t, " ", "") maska = "CCCCCCCCCCCCCCCCCCCCCCCCCC" dlugosctekstu...

EXCEL VBA - Klawisz USUŃ blokowanie zakresu do usunięcia

Chodzi o makro "Usun2"? Wprowadź warunek, Np[syntax=vb]Sub Usun2() Dim knyps As Boolean knyps = False For i = 1 To Shapes.Count If Shapes(i).FormControlType = 1 Then a = Shapes(i).Top If Shapes(i).Top > 150 And Shapes(i).Top < 200 Then 'a kto tu namieszał?! nazwa2 = nazwa1 nazwa1 = Shapes(i).Name 'jesli znajdzie ramkę knyps = True 'zmieniamy wartość...

[VBA, Excel] wyszukanie pierwszej wolnej komórki w kolumnie

Są różne sposoby na znajdowanie ostatniego pustego wiersza, mój ulubiony jest taki: widoczną komórkę w kolumnie B wypełnioną tekstem, idąc od ostatniego wiersza w górę. Liczba 1048576 to ostatni wiersz excela 2007, dla kompatybilności z 2003 należało by użyć 65536. Przed wykonaniem sprawdzania poleceniem ShowAllData próbuje się zdjąć kryteria autofiltra...

[EXCEL,VBA] Jak poprawnie sortować dane z MySQL w Excel VBA?

Wszystko mi działa, ale to sortowanie niestety nie. Wg mnie wygląda to w sposób następujący: napisałeś w zeszycie: " Mam cztery nogi. " - i skarżysz się na forum że wciąż masz tylko dwie. Z tego co pokazałeś to może być tylko dwie opcji: • zapytanie ma się nijak do tego co wyświetlasz. • dostajesz posortowane, tylko że ustawiłeś niewłaściwe...

Excel - jak filtrować komórki z dwoma wyrazami w dużej bazie danych?

adamas_nt Dzięki wielkie!!! Naprawdę fajne urządzonko mi wysłałeś :D Mało co rozumiem w tych formułach:D Miałbym ostatnią prośbę do Ciebie, bo w obecnej formie to nie działa mi na mojej bazie danych bo wszystko mam z dużych liter, mógłbyś usunąć z tego sprawdzanie wielkich liter na początku wyrazów? Próbuje sam to zrobić i nie wychodzi mi z lekka ....

Excel - lista nazw bez duplikatów

Jeżeli to operacja jednorazowa to: w excelu 2003 i niżej : Zaznacz kolumnę z danymi. Menu Dane - Filtr ... - Filtr zaawansowany. Zaznaczasz kopiuj w inne miejsce. Okienko z warunkiem zostawiasz puste. W okienku celu ("Kopiuj do:") zaznacz pierwszą komórkę gdzie ma być wklejona lista. zaznacz "Tylko unikatowe rekordy" i wciśnij ok. w excelu 2007 i wyżej...

[VBA][Excel] - Kopiowanie danych z komórki do innego arkusza

chciałbym żeby w raz z usunięciem danych w komórce, również usuwał się wiersz tabeli W przedstawionym rozwiązaniu usunięcie indeksu powoduje "wyczyszczenie" całego wiersza :cunning: (jakkolwiek do tego celu wykorzystano odpowiednie formuły w tym arkuszu :D ) - nie wiem jak duże (ile pozycji ?) oferty przygotowujesz dla Waszych klientów , jeśli więcej...

[excel] Jak edytować zaznaczony wiersz w ListBox na UserForm w Excelu?

Tu dodałem jeszcze usuwanie wiersza z pewnymi zabezpieczeniami edit: Teraz mi przyszło że zamiast przycisku edytuj kod z pod tego przycisku można umieścić na podwójnym kliknieciu w listbox (na danym wierszu) wtedy dane się zczytają do okienek edycyjnych. Podmieniłem załącznik

Excel - jak posortować arkusze według różnicy między F10 a G10 za pomocą makra?

chyba się nie da tego zrobić, ale ja nie potrafię, myślałem jeszcze aby poleceniem VBA usunąć arkusze gdzie występuje #VALUE! ma ktoś na to jakąś metodę?

[VBA Excel] - Uruchamianie makra przy zmianie komórki

Przenoszę opcje do komórki I1, I2, I3, I4... w 'dzieleniu': Rows("2:2").Clear - usunie I2, bedzie od J2 wprawo

Excel [VBA] porównanie list i skopiowanie komórek z jednej listy do drugiej

Pomysł Macieja Goneta chyba najekonomiczniejszy i do rękodzieła i do automatyki - połączyć dwie listy, wysortować, usunąć duplikaty, skopiować wynik na dwa obszary i mamy dwie listy. [syntax=vba]Option Explicit Sub ListaA_ListaB() Dim wB&, k% k% = 3 Application.ScreenUpdating = False wB = Range("F3", Range("F" & Rows.Count).End(xlUp)).Rows.Count Range("A"...

Excel - jak usunąć zdublowane wiersze, pozostawiając tylko oryginały?

Witam, potrzebował bym małej pomocy. Otóż mam tabele tak jak poniżej. W tabeli mam wiersze które się dublują. Niestety nie dublują się one w kolumnach tylko w wierszach co utrudnia sprawę. http://obrazki.elektroda.pl/8507180000_1... Czy ktoś by mógł podpowiedzieć jak usunąć zdublowane wpisy pozostawiając tylko oryginał czyszcząc tylko...

[Excel 2016] Jak przypisać hiperłącza do wierszy zdefiniowanych w kol. E?

Witam, z pomocą filmów na YouTube w Excelu 2016 w kolumnie D4-D26 zrobiłem listę plików z hiperłączem, które znajdują się w lokalizacji wskazanej w komórce D2. Z kolei w kolumnie E mam wpisane "z ręki" te same nazwy plików ale w innych wierszach. Niestety lista plików układa się alfabetycznie a ja potrzebuję, żeby hiperłącze było w kolumnie F ale w...

VBA Excel - Automatyzacja kopiowania wierszy z zbaza1 do baaza po numerze

W Twoim pliku XLS dodałem poniższy kod i przycisk w arkuszu "form2", który uruchamia ten kod. Pozdrawiam - McVik

EXCEL - Power Query - pobieranie danych z plików w folderze

tylko wtedy, przy ponownym odświeżeniu, wiersze dla "starych" plików się usuną, bo już ich nie będzie w pliku źródłowym. Chyba, że jest jakaś opcja, by pozostawić stare dane i tylko pobrać nowe. Niestety nie umiem znaleźć takiej opcji...

Excel - automatyczna zamiana nazw ulic na poprawne z polskimi znakami

No czy ja wiem czy tak sporo? Każda ulica ma polskie znaki? Zapewne nie. Zamień wszystko rozprawi się dość szybko z tym. Zmiana na małe litery z pierwszą dużą to już Excel i funkcja Z.WIELKIEJ.LITERY Mógłbyś próbować z porównywaniem długości wyrazu lub porównywaniem wartości tekstu (różnica polskich znaków) i stosować zamiany w tym celu. Usuń kolumnę...

Jak usunąć wiersze zawierające określony tekst w Excel VBA?

Spróbuj coś takiego: [syntax=vbnet]Application.ScreenUpdating = False For i = 100 To 1 Step -1 If Cells(i, "B").Value Like "*auto*" Then Rows(i).EntireRow.Delete End If Next i Application.ScreenUpdating = True[/syntax]

VBA Excel - Jak usunąć wiersz na podstawie wartości w kolumnie B?

Co tu tłumaczyć wrs = Columns(2).Find(what:=Ra... lookat:=xlWhole).Row Rows(wrs).Delete 'Rows(wrs).ClearContents 'w zależności od sensu słowa "wykasować" i wszystko jasne... Gdyby nie znalazł, warto ten fakt zakomunikować. Np On Error Resume Next wrs = Columns(2).Find(what:=Ra...

Excel: Porównanie cen i dostępności produktów w 3 cennikach z różnych lat

Jak stworze tabele to mam kolumnę sumującą mi ceny z 3 arkuszy, której nie potrzebuje Sumę możesz usunąć. Prawym klawiszem na tej kolumnie -> Usuń "suma z cena". Teraz jak chce wpisac funkcje jeżeli() to jak zaznaczam pola do funkcji to zamiast prostego np.=JEŻELI(B5=C5;0;1)+JEŻELI(C5=D5;0;1) mi wychodzi coś takiego: ... Dlatego ja wpisałem ten warunek...

EXCEL VBA - CommandButton oraz OptionButton - klawisz usuń - nie działa usuwanie

W przykładowym arkuszu: 1. Usuń "Przycisk 339" (jest wysoki na 1pkt.) Najprościej zaznacz widoczny przycisk i przesuwaj się tabulatorem. 2. Podmień makro, tu dobrze kombinujesz :) (porównaj sobie z tym co jest. Przyda się na przyszłość), ale trzeba szukać 4 elementów. [syntax=vb]Sub Usun2() Dim knyps As Boolean knyps = False For i = 1 To Shapes.Count...

Excel - stworzenie bazy materiałowej lub inny program

Tu masz programy magazynowe. http://dobreprogramy.pl/index.php?dz=1&t... Spokojnie coś wybierzesz. Możesz także to zrobić w Excelu lub jeszcze lepiej w OpenOffice, ponieważ jest darmowy. Zrobienie takiego arkusza w Excelu czy OpenOffice to przysłowiowa "bułka z masłem". Dla przykładu robisz pionowe kolumny, które odpowidają poszczególnym materiałom....

Excel - usuwanie lub pomijanie wierszy z ujemną komórką

A może istnieje jeszcze jakiś prostszy sposób na podświetlenie wierszy z ujemną komórką w celu ich ewidentnego usunięcia, coby sobie życia nie utrudniać? A przy okazji chętnie dowiedziałbym się, w jaki sposób zrobić, aby pola ujemne miały inny (np. czerwony) kolor tła?

[Excell] Jak ustabilizować format daty w Listbox UserForm?

problemem jest to ze data wyswietlana w listbox jest w amerykanskim formacie Bez obrazy, ale stwierdzam, że "leń patentowany" jesteś ... :-) ... "Rozwiązanie" masz pod nosem i sam się w pewnym sensie nim posługiwałeś. Właściwość " List " ... dlaczego nie sprawdziłeś składni tej właściwości ? " object.List(row, column) " Gdybyś zerknął w pomoc podręczną,...

excel - kopiowanie wierszy i usuwanie diplikatów do arkusza

Usuń duplikaty ani tabela przestawna tu się nie przyda bo dochodzi warunek że usuń gdy puste ale nie gdy puste w Re_3 Stworzyłem w sumie proste makro (ono tylko tak wygląda) Pierwsza część kodu przepisuje wszystkie linie mające to samo zlecenie. Później następuje sortowanie. Następnie warunek sprawdza czy (w moim przypadku coś1) się powtarza jeżeli...

Excel - Usuwanie duplikatów w każdej kolumnie oddzielnie

Jeżeli używasz Excela >=2007 to możesz użyć narzędzia "usuń duplikaty" [syntax=vb]Sub zz() Dim lLstRw& Dim iLstCol% Dim rRng As Range With Application .ScreenUpdating = False End With iLstCol = Cells(1, Columns.Count).End(xlToLeft).Column For i = 1 To iLstCol lLstRw = Cells(Rows.Count, i).End(xlUp).Row Set rRng = Range(Cells(1, i), Cells(lLstRw, i))...

Excel – jak wylosować 500 unikalnych uczestników z bazy 10 000 osób?

Tak się wtrącę... Ta pętla powoduje to, że nie ma powtórzeń wylosowanych liczb. Najlepiej wypróbować obie wersje i po otrzymaniu wyników wybrać Dane>Usuń duplikaty. Duplikaty pojawią się także przy kopiowaniu funkcji LOS(). Tyle ode mnie :)

EXCEL - Znikające dane z komórek, a uwzględnione w sumach

Ten opis bez załączonego pliku jest bardzo niejasny. Nie wiadomo, co to znaczy że dane zniknęły, skoro jednak dalej jest gdzieś ich podsumowanie. Jako co? Stała, czy wynik formuły? W ogóle nie wiadomo, czy w pliku są tylko formuły, czy również makra. Koniecznie musi być załącznik, w którym występuje problem. Jeśli są tam dane wrażliwe, trzeba je usunąć....

[VBA Excel] Automatyzacja makra do przetwarzania plików tekstowych w pętli

Tak na szybko... Bez obsługi błędów, gładzenia kodu itp. Sub czytajpliki() Dim linia, sciezka, fs As Object, f, f2, k 'Application.ScreenUpdating = False sciezka = "C:\Documents and Settings\admin\Desktop\test\" Set fs = CreateObject("Scripting.FileSys... Set f = fs.GetFolder(sciezka).Files For...

Excel - Jak usunąć focus z TextBox po wykonaniu makra?

mam okno UserForm w którym jest tylko jedna kontrolka (...) TextBox zaczyna wykonywanie funkcji po kliknięciu na niego W takim razie dlaczego TextBox? Intuicyjnym rozwiązaniem jest Command Button. Tekst, jeżeli występuje, możesz przypisać do Caption. Jeśli to istotne, wygląd sformatować tak, żeby przypominał TextBox.

VBA Excel - Numerowanie RRRR/0000 - rok/liczba na formularzu jak wykonać?

Numerowanie mam zrobione, działa fajnie Noo, mnie się to numerowanie specjalnie nie podoba, ale skoro jesteś zadowolony, pozostawiam ;) Co do sposobu przechowania zmiennej w której zapisano "rok" jako warunek kontynuacji numeracji, to w wątku podane zostały już te miejsca. Uważam, że najodpowiedniejszym jest sam arkusz Excela. Jeśli istnieje możliwość...

Excel 2003 jak sortować dane w kolumnie w sposób naturalny ?

Pięknie dziękuję bardzo za odpowiedź. Być może niedokładnie opisałem swój problem z sortowaniem. Otóż mam bazę danych (nazw plików) do której co jakiś czas dodaję kilkanaście tysięcy nazw plików. Nazwa pliku to ok. max 60 znaków. W nazwie występują znaki liczbowe, tekstowe i interpunkcyjne. Chciałbym, aby sortowanie odbywało się w sposób identyczny...

Usunięcie powtarzających się wyrazów w dwóch plikach txt

Cóż, moje rozwiązanie może być trochę pracochłonne. Ale tylko trochę. ;) Wystarczy otworzyć te pliki w Excelu, znaleźć i usunąć duplikaty i zapisać z powrotem jako ".txt". Warunkiem jest nie przekroczenie zakresu wierszy. Chyba, że działa się bezpośrednio na plikach ".txt".

Dodawanie pozycji do bazy przez Userform jaka pętla VBA excel?

Witam, mam taki problem. Udało mi się jakoś napisać makro dzięki któremu dodaję nową pozycję do bazy (jak w załączniku). Wszystko działa dobrze jak dodaję jedną pozycję, jeśli chcę dodać kolejną pozycję pojawia się błąd i program się wyłącza. Domyślam się, że musi tu być jakaś pętla. Dodawanie pozycji do bazy odbywa się klikając na przycisk "Wstaw dane...

Excel: Jak automatycznie uzupełniać tabelę danymi z formularza bez VBA?

Witam, potrzebuję pomocy, aby dane z formularza uzupełniał automatycznie dane w tabeli zgodnie z kolumnami.... Niestety nie mogę w tym znaleźć pomocy... W mailu jest załącznik z poglądowymi danymi jakbym to chciała mieć.... Zależy mi też, aby po uzupełnieniu pierwszej pozycji, kolejne dane pojawiały się poniżej, w celu nie usunięcia danych z powyższego...

Excel VBA Samoistna zmiana formatu daty po dodaniu wiersza do tabeli

Witam. Po raz kolejny zwracam się do Was z problemem, tym razem z bardziej kosmetycznym, który bardzo mnie irytuje. Poprzez procedurę w VBA: Set addedRow = tbl_DoPowolania.ListRows.Add With addedRow .Range(2) = ComboBox1.Text .Range(3) = Format(TswPesel, "00000000000") .Range(4) = Format(ComboBox2.Value, "yyyy-mm-dd") .Range(5) = Format(ComboBox3.Value,...

Excel VBA: Jak stworzyć raport sprzedaży z filtrowaniem kategorii produktów?

:arrow: marcinj12 Spróbuj teraz usunąć wiersze z arkusza "LODÓWKI", zakładając że są już nieaktualne... Zamiast kopiowania można filtrować, powiększenia zdjęć można dodać jako tło komentarzy, dołożyć sortowania, obliczenia, etc. W załączniku moja "wizja" takiego arkusza-bazy.

Excel - Scalenie i usunięcie tekstu z dwóch kolumn, filtracja i wklejanie specjalne wartości

[syntax=vbscript]Sub Scalaj() Kryterium = InputBox("Podaj kryterium filtra: ", "Filtr") Sheets("Arkusz1").Select ow = Cells(Rows.Count, "A").End(xlUp).Row Range("A1:B" & ow).Select Selection.AutoFilter ActiveSheet.Range("A1:B" & ow).AutoFilter Field:=1, Criteria1:=Kryterium y = 1 For x = 2 To ow If Not Rows(x).Hidden Then Sheets("Arkusz2").Cells(y,...

VBA Excel Multipage - Błąd przy inicjalizacji wielu ListBoxów na stronach

...ListView, który jest inną kontrolką niż ListBox (ma inne właściwości i inaczej się do niego ładuje dane). Ten sposób ListView2.ListItems = "'BAAN 3'!G8:K97" ładowania danych NIE JEST poprawny dla ListView, zapomnij o nim. To działa tylko z ListBox'em. USUŃ z formy wszystkie ListBoxy które tam miałeś... Zamiast nich wstaw i skonfiguruj...

Jak usunąć z Comboboxu wybraną uprzednio nazwę? VBA i Excel.

Po wybraniu wartości w pierwszym CB, [syntax=vbnet] Combo 2. Items. Clear For i = 0 to lista. Count -1 lista z której ładujesz combo If lista. Item (i) <>Combo1. Selecteditem. Value then Combo 2. Item. Add(lista. Item(i)) End if Next [/syntax] To zdarzenie wywołaj przy combobox 1. Selecteditemchange

MAKRO EXCEL Usunięcie wiersza, zawierającego wartość z konkretnej komórki

Cześć, jestem początkujący i nie do końca mogę znaleźć pomoc w sieci. Moim zadaniem jest wykonanie makra, które ma na celu znalezienie w konkretnej kolumnie wartość wprowadzoną do określonej komórki. Czyli np. Wartość z komórki A1, znajdź w kolumnie B. Następnie usuń ten wiersz. Z góry dziękuję za pomoc. Pozdrawaiam Piotrek

[vba-excel] Jak dopisać dane do kolejnego wiersza w Excel VBA?

Bo "coś" masz w wierszu 3 i 4, być może śmieci z poprzednich prób. Jak je usuniesz to powinno śmigać. Swoją drogą, niepotrzebnie 7x ustalasz ostatni wiersz, wystarczy to zrobić raz na początku, a potem wykorzystać: [syntax=vb]Private Sub CommandButton1_Click() wiersz = Range("A" & Rows.Count).End(xlUp).Row + 1 Range("A" & wiersz).Value = marka Range("B"...

VBA Excel - Usuwanie wiersza jeśli jest w nim dane słowo, łączenie kilku makr

Sprawdzasz ostatni wiersz w arkuszu. np tak: ostatni = Cells(ActiveSheet.Rows.Count, 1).End(xlUp).Row Robisz pętle FOR od numeru wiersza nagłówka np 3 do ostatniego wiersza arkusza, czyli np tak: FOR x=3 to ostatni ... NEXT x w środku pętli warunek IF że jak komórka kolumny P równa jest "Delete" to ją usunąć, czyli np tak: IF cells(x, 16) = "DELETE"...

Magazyn w excel-u usuwanie zablokowanych komórek z makra

Witam Swojego czasu udało mi się napisać taki mały program w Excel-u mianowicie drukuje się kod kreskowy okleja materiał i skanuje do bazy ta z kolei sprawdza czy taki kod już nie jest w bazie po czym blokuje dany kod i podlicza stany oraz metry kwadratowe. Z czym sobie nie potrafię dać radę : 1 Potrzebuję by program zapisywał tak jak teraz za każdym...

Excel: Automatyczne dodawanie ilości produktów po skanowaniu kodu EAN-13

Chyba jednak się nie zrozumieliśmy... Załączam zrobiony na szybko załącznik ilustrujący ideę. Zależy mi na pominięciu okienka wyszukaj/zamień. Bo w tej chwili żeby powyższy sposób zadziałał muszę na dzień dobry wywołać okno wyszukiwania czyli ctrl+f, Nigdzie nie pisałem o tym okienku. Nie musisz go wywoływać. Wyszukujesz za pomocą funkcji wyszukaj.pionowo....

[VBA, Excel] Jak dynamicznie odczytać wartości Checkbox'ów w VBA Excel?

Tak właśnie o coś takiego chodziło. Form_AktCen.Controls(nazwy_zmiennych... wiedziałem że musi być jakaś możliwość, tylko nie mogę jej znaleźć. Z tym drugim to właśnie chodzi o to aby usunąć cały arkusz, i potem skopiować z innego pliku arkusz o takiej samej nazwie. Dużo łatwiej to zrealizować niż wyszukiwać w arkuszu z wieloma wierszami...

Excel-przenoszenie wyszukanych umów do poszczególnych arkuszy

Zacznij od początku jeszcze raz bo coś za dużo usunąłeś z kodu (nie mam jak ci podesłać bo w pracy mam 2010 i rozwala mi plik) między tymi linjami kodu wprowadź warunek If IsNumeric(fragment2) Then fragment2 = "" kod = fragment1 & fragment2 Czyli ma wyglądać tak: If IsNumeric(fragment2) Then fragment2 = "" If...

Prosta wskazówka dla nowicjusza - Usuwanie wierszy excel

Jeśli piszesz, że jesteś laikiem w Excelu, to odpowiedź opisowa niewiele Ci pomoże, bo nie będziesz umiał jej zastosować. Potrzebny jest przykład, a ten można napisać gdy są przykładowe dane. Przygotuj przykładowy plik, w którym w arkuszu bazy jest kilkadziesiąt pozycji, w tym kilka/kilkanaście do usunięcia, a w innym arkuszu lista kategorii do usunięcia....

Jak ręcznie usunąć historię w Explorer, Outlook, Word i Excel?

Witam, pierwszy raz piszę na forum... Mam taki problem; Potrzebuję całkowicie usunąć historię przegladarki Explorer i nie wiem czy zostanie ona całkowicie usunięta po skorzystaniu z opcji Explorera (chodzi mi o to czy coś nie zostanie np. w rejestrze) Drugie pytanie dotyczy Outlooka, mianowicie, chcę całkowicie usunać wszystkie wiadomości wysłane, odebrane...

Excel - Implementacja wyszukiwania w każdej kolumnie za pomocą textboxa

Mam jeszcze jedno pytanie czy da się do makra które wklejam poniżej a służy do usuwania nieodfiltowanych wierszy, dodać opcje żeby usuwane wraz z nieodfiltrowanymi wierszami były też znajdujące się w tych komórkach grafiki? W każdej z tych grafik mam zaznaczoną opcję: "przenoś i zmieniaj rozmiar wraz z komórkami" ale nic to nie daje i grafiki, pomimo...

Visual Basic - Excel, wklejanie text boxa do komórek

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...

Excel - Usuwanie tekstu za określonym słowem w linijce

Witam, mam następujący problem. Mam bazę w której potrzebuję usunąć wszystko po określonym słowie w każdej linijce. Nie mogę sobie poradzić ani nie mogę znaleźć formuły która by mi to wszystko usunęła. Ponieważ wpisów jest ponad 1500 usunięcie tego ręcznie sprawiłoby duży problem. Oto jak to wygląda: 'nazwa firmy' , ' e-mail firmy' , '0' , 'data dodania...

Excel – jak odzyskać usunięte zdjęcie po zapisaniu pliku bez obrazu?

Witam. Jest to mój pierwszy temat, spowodowany nagłym wypadkiem przy pracy, więc przepraszam jeśli coś robię nie tak. Chciałbym się Was poradzić, czy jest możliwość odzyskania zawartości excela? Jak wygląda problem? Otóż w dokumencie excela, miałem pewien bardzo ważny dokument (zdjęcie), wklejone tak, by po prostu było pod ręką. Przez przypadek, jak...

Excel Power Query - Jak dodać edytowalną kolumnę niestandardową?

Cześć, proszę o pomoc. Zrobiłem arkusz w excelu, który pobiera dane z trzech innych źródeł tj. z innych skoroszytów (osobnych plików excela). Trzy źródła połączyłem za pomocą Power Query, włączyłem sortowanie wg daty, dzięki temu w jednym arkuszu mam połączone 3 źródła posortowane wg daty. Niestety muszę dodać nową kolumnę, która będzie edytowana ręcznie,...

Automatyczne kopiowanie danych z jednego pliku .xlsx do wielu arkuszy innego pliku

Witam serdecznie. Mam problem nie byle jaki. Otóż wysłałem pewnej grupie osób wiadomość na maile, która miała zawierać plik z danymi. Niestety podczas wysyłania Excel wybrał sobie inny plik, którego nie powinienem wysyłać. Moje pytanie jest takie, czy to się da teraz jeszcze naprawić? Mam taką koncepcję, żeby teraz do wszystkich tych osób wysłać drugą...

Excel - Powolne działanie, uruchamianie jako administrator

Hejo. Parę miesięcy temu po aktualizacji systemu oraz pakietu MS 365 (office) i synchronizacji go z moim onedrive'em powstał problem powolnego działania excela. Działał prze okrutnie wolno i zawieszał się przy większych plikach, np. CSV z 60-cioma tysiącami wierszy. Wyszukałem gdzieś informacji, że nie działa to poprawnie, bo loguję się z konta firmowego...

[Excel] Wyszukiwanie jednej wartosci w kilku plikach

Zmienilem troche koncpecjie i teraz dane z kilku plików wrzucam do jednego. Chciałbym wyszukiwać kilka wartości jednocześnie i usunąć cały wiersz jeżeli w komórce znajduje sie ta wartość. tych wartości na razie jest okolo 25 tysiecy, także przeszukiwanie dlugo trwa. Co byście zmienili? [syntax=vb] Sub kasowanie() Dim i, k Application.ScreenUpdating...

Excel - Jak usunąć zdublowane wiersze w arkuszu z 40,000 rekordów?

najszybciej poprzez akcces albo poprzez query w excelu ----- przed chwila sprawdziłem query nie za bardzo czai co się chce zrobić :) ale można to zrobić za pomocą filtru. przed chwila sprawdziłem - o dziwo działa :) menu dane - filtr i filtr zaawansowane. tam zaznaczasz liste w miejscu. wskazujesz kolumne w której sa duble. "haczysz" tylko unikatowe...

- EXCEL - wyszukanie i usunięcie wartości z danego zbioru

Temat brzmi trochę dziwnie, ale nie wiedziałem jak opisać swój problem. Tutaj konkretnie: Mam bazę około 5000 adresów mailowych w pliku XLSX (nazwijmy ją zbiorem A). Teraz dostałem listę około 1000 adresów mailowych (nazwijmy ją zbiorem B), które muszę usunąć z bazy. Czyli muszę uzyskać zbiór C = A - B. Problem może być banalny, ale nigdy tego nie robiłem...

Jak usunąć makro z arkusza skopiowanego do nowego pliku Excel?

Witam Mamy pytanie odnoście usuwania makra przez inne makro. Od początku. Mam poniższy kod który oczywiście działa popranie i robi dokładnie to co ma robić, czyli: kod na początku filtruje i tworzy pewną ankietę w arkuszu. Następnie arkusz z ankietą zostaje skopiowany i wklejona do nowego pliku Excel, następnie zapisany pod konkretną nazwą we wskazanym...

VBA Excel - Usuwanie danych w arkuszu za pomocą ListBox

Witam, Przygotowuje narzędzie dzięki któremu druga osoba będzie mogła w prosty sposób dodać albo usunąć dane z arkusza. Dodawanie jest proste, gorzej z usuwaniem Stworzyłem UserForm a w nim TextBox1 gdzie użytkownik wpisuje wartość, którą chce usunąć. Po wpisaniu tej wartości w ListBox1 wyświetla się ta wartość lub sugeruje odpowiedź. Przykład: Użytkownik...

Excel – jak usunąć milion pustych wierszy po przypadkowym rozszerzeniu formuły?

Można usuwać puste wiersze na dwa sposoby. Pierwszy: 1. Zaznacz cały rejestr razem z wierszem nagłówka ( jak to szybko zrobić patrz PS ) i z menu Dane wybierz polecenie Filtr/ Autofiltr . 2. Rozwiń jedną z list i wybierz pozycję Puste . Widoczne będą tylko puste wiersze. 3. Zaznacz całe wiersze, które chcesz usunąć, kliknij jeden z nich prawym przyciskiem...

Excel - jak powiązać komórki z dwóch arkuszy za pomocą wartości wyzwalacza?

ten problem jest rozwiązany, ale mam jeszcze jedno pytanie. Jak scalić komórki zachowując przy tym tekst z tych wszystkich scalonych komórek w jednej ? Excel domyślnie, przy scalaniu komórek, zachowuje jedynie wartość z lewej górnej komórki, a zawartość pozostałych komórek zostaje usunięta. Aby scalić komórki i zachować tekst z wszystkich scalanych...

VBA: Tabelka Excel jako treść maila, pętle, adresaci, utrzymanie stopki

Cześć, Przeszukałem forum, ale nie znalazłem tego czego szukam. W skrócie: 1. Mam tabelkę z kolumnami .to, .cc, .bcc, .subject, .body 2. Każda linia to inny adresat i inna treść (treść uzależniona od wyniku) Potrzeba: Treść wiadomości jest w komórce od F2 do X - może być 10 adresatów, ale może być i 15000 (w zależności od akcji) Napisałam kod, działa,...

Excel - Makro kopiowania A3:G30 i czyszczenia B3:B30 w Arkusz

Kolego. A co ja Ci wysłałem? [syntax=vb] Sub Przenies() Dim OstW As Long, OstWA As Long Sheets("Arkusz").Select OstWA = Cells(ActiveSheet.Rows.Count, "B").End(xlUp).Row Range(Cells(3, 2), Cells(OstWA, 7)).Select Selection.Copy Sheets("Arkusz3").Select OstW = Cells(ActiveSheet.Rows.Count, "A").End(xlUp).Row Cells(OstW, 1).Select Selection.PasteSpecial...

Excel - Excel 2013, blokowanie powtarzających się wartości.

Ten opis jest w dalszym ciągu nieprecyzyjny. 1) Kopiuje Pan kolumny E, F, G, H, I. Czy w tym momencie ma być sprawdzana unikatowość trójki kolumn E,F,G oraz osobno H? Dane są skopiowane. Procedura sprawdza poprawność. Jak ma zareagować w razie stwierdzenia, że jest duplikat w kolumnach E-G lub H? Rozumiem, że ma wyświetlić komunikat i co dalej? Usunąć...

Excel 2003: Konwersja tekstu na liczby ujemne w makro VBA

1)Prawie super tylko nie wiem dlaczego nie bierze pod uwagę ostatniego wiersza bez względu na liczbe w danym arkuszu?? 2)Jeszcze mam jedno pytanko w sprawie kasowania.Chciałbym usunąć wiersze zawierające konkretny tekst próbowałem użyć formuły do usuwania pustych wierszy ale nie wiedzieć czemy po wstawieniu konkretnego słowa nie działa próbowałem też...

Excel - Excel, wyszukiwanie wielu wartości po jednym parametrze

Cześć, Mam problem, mianowicie mam dwie kolumny w pliku. W jednej są dane a w drugiej dane do przypisania. Dane do przypisania mają takie same wartości, skorzystałem z makra które pozwala przypisać dane w jednej komórce jednak usuwa duplikaty. Nie jestem w stanie wyłapać w którym miejscu jest kod odpowiedzialny za usunięcie duplikatów. Może ktoś pomóc?...

Excel VBA: Jak usuwać wiersze na podstawie listy wartości z innego arkusza?

Cześć, Potrzebują pomocy z następującą sytuacją. Mianowicie mam raport w Excelu, z którego usuwam codziennie niepotrzebne dane. Używam do tego następującego kodu, który duplikuje tyle razy ile potrzebuję różnych rzeczy do usunięcia: [syntax=vbscript] Last = Cells(Rows.Count, "A").End(xlUp).Row For i = Last To 1 Step -1 If Cells(i, "F").Value Like "ABC"...

Nie działa otwieranie plików .XLS przez podwójne kliknięcie.

Problem dotyczy Excel Starter 2010 pracującym pod Windows 7 64bit. Po dwukrotnym kliknięciu na plik .xls uruchamia się Excel i wyskakuje komunikat: "wystąpiły problemy z przesłaniem polecenia do programu". Excel zostaje uruchomiony, ale nie ma w nim otwartego żadnego pliku. Można otwierać pliki z poziomu aplikacji Excel, jednak nie jest to rozwiązaniem...

Jak wyzerować dane w ukrytym wierszu bez naruszania formuł w Excel VBA?

wyświetla mi się błąd "compile error, end if without block if" [syntax=vbscript] Sub Procedura5() For i = 53 To 29 Step -1 If Rows(i).Hidden = False Then Rows(i).Hidden = True For k = 2 To 104 Step 2 Rows(i).Cells(k).ClearContents Exit Sub End If Next i[/syntax] domyślam się , że nie może być 2x For w jednej procedurze. Ale jak inaczej to połączyć ,...

VBA - optymalizacja kodu - skrócenie kodu, aby makro działało szybciej

Prośba o skrócenie kodu tak aby makro działało szybciej oraz działało również w excel 2010 Podaję jeden z kodów oraz plik [syntax=vbscript]Sub Zestawienie() Dim lastRow As Long Sheets("USUNIĘCIE ZAGROŻEŃ").Select Application.Run "Hide_DeleteRows" Sheets("ZESTAWIENIE").Select j = 3 For Each c In Worksheets("zestawienie").Range("aa1:aa1... If c = "1"...

[VBA][Excel] Wstawianie wierszy w dynamicznie zmieniających się miejscach

Dziękuję za szybką i trafną odpowiedź. Działa jak należy... prawie, bo po wklepaniu całego kodu do oryginalnego pliku faktycznie wstawia tabelkę, ale zaraz po tym wywala errora o błędnym typie danych. "Run-time error '13': Type mismatch" w linijce: nazwa = "program" & Mid(Cells(wrs, 2).Offset(-5, 0).Value, 8, 3) + 1 Edit #1 Problem rozwiązany przez...

EXCEL VBA - Przypisanie MsgBox w BeforeSave do wielu skoroszytów

1100 szt plików w 8 minut - oczywiście z poprawionym o usuniecie InfTemplate makrem - rewelacja. No i zauważyłeś że samo usunięcie IfoTemplaka nic nie dało dopiero to super Na razie nie zamykam jeszcze tematu bo (jak to ja) szykowałem się do "ręcznej obróbki każdego skoroszytu tzn. wstawienia przycisków w kilku miejscach "dla wygody" użytkownika z przypisanym...

Jak usunąć powtarzające się wiersze w Excelu z 7500 rekordów?

akmes skąd przyszło ci do głowy że czyję sie urażony to poprostu wymiana poglądów i nic wiecej, każdy wyraził swoje. A przecież w gruncie rzeczy chodziło o pomoc koledze maciorkowi więc temat trzeba wyjaśnić jak najdokładniej bo nie wiadomo (nie obrażając kolegi maciorka ) jak badzo zaawansowany jest założyciel postu i czy dalej sobie da radę. A co...

Excel sortownie tytułów z powtarzającymi się wartościmi

Siema Na pierwszy ogień wziąłem makro zmieniające numery arkuszy wyszło mi coś takiego Private Sub Worksheet_Activate() 'Proc. wykonywana przy zmianie arkusza (Activate) Numery_Tygodni End Sub Private Sub Numery_Tygodni() Dim Nazwa_1 As Integer Dim Nazwa_2 As Integer Nazwa_1 = Sheets(1).Range("a1&quo...

C# odczyt z plików exel i zapis do comboboxa oraz textboxa

Pierwszy problem - to czy próbowałeś usunąć cały katalog obj z folderu z projektem (zrób przedtem kopię całego projektu na wszelki wypadek)? Spróbuj też usunąć katalogi Debug i Release, oczywiście przy zamkniętym projekcie, a potem otworzyć projekt .sln i przebudować go (Build->Rebuild Solution). Miałem kiedyś podobny problem, jak pracowałem nad jednym...

Excel- Kwestionariusz pracownika. Rozszerzenie możliwości pliku

Co do cmbTemat to wszystko działa tak jak trzeba. Jak dasz od 5 to jest od 5. Oczywiście zadziała dopiero jak wciśniesz dodaj. Przy aktywacji okna tego nie widać bo nie ta procedura za to odpowiada. Ale jak uruchomisz procedurę cmdDodaj2_Click (w w oknie temat) wszystko działą tak jak powinno. Co do numerowania tyle powinno wystarczyć (wykasowałem dubel...

Przenoszenie wierszy między arkuszami w Excelu po spełnieniu warunku

Chcę uzyskać przeniesienie całych wierszy z Arkusza1 do Arkusza2 jeśli zostanie spełniony określony warunek. Jeśli w kolumnie stan pojawi się wartość "Zakończony" to całe wiersze mają być przeniesione do Arkusza2, natomiast w Arkuszu1 wykasowane. W załączniku plik Excel Cześć! Rozumiem, że chcesz, aby wiersze z Arkusza1, które spełniają określony warunek...

Excel VBA - Zapis zaznaczonego wiersza w innym arkuszu, w pierwszej wolnej pozyc

Korzystając z ciekawostki kolegi PRL chciałbym przestawić rozwiązanie mojego problemu z kilku postów wyżej. Chodzi o to, że po usunięciu pozycji dwuklikiem móc cofnąć operację usunięcia wiersza. Makro poniżej sprawia, że po podwójnym kliknięciu w arkuszu "szablon" w pierwszej kolumnie w danym wierszu wiersz ten zostanie najpierw skopiowany do arkusza...

VBA Makro - Usuwanie kolumn po dacie starszej niż dziś

Witam Wszystkich Serdecznie, Jest to mój pierwszy post na elektroda więc proszę o wyrozumiałość. Opis sytuacji: 1. Pracuje na excelu i tworzę DashBoarda związnego z urlopami. 2. W danym excelu jest wyświetlana lista osób oraz kto ile ma urlopów; 3. Wyświetlany excel zaciąga dane z innego pliku za pomocą Query; 4. Tabela Query wyświetla wszystkie daty...

Excel VBA: Pętla przestaje działać po dodaniu dodatkowego kodu

(at)clubs Masz rację, jak usuwam linijkę w kodzie z dodatkowym "findem" to pętla działa poprawnie. Poprawiłem trochę kod i praktycznie został mi tylko jeden "find" ale bez niego nie wiem jak to zrobić inaczej aby znaleźć w drugim arkuszu nazwisko wybranego pracownika. A bez tego cały projekt do piachu.... Miałem wstawić plik, ale niestety z braku czasu...

Jak zamknąć pliki Excel w makro bez pytań o zapis i schowek?

:arrow: Smutny_k 1. Na przyszłość: załóż nowy temat z odnośnikiem do starego (jak dasz "pomógł" pomagierom?) 2. Popatrz na taką pętlę (ścieżka domyślna dokumentów użytkownika) i zamiast msgbox podstaw swoją procedurę. Sub pliki_xls() katalog = Application.DefaultFilePath & "\" 'katalog = "c:\xxx\" 'usuń pierwszą linię...

Excel - Makro kasujące komórki z podaną wartością

Witam. Szukam makra, do excela, które będzie przeszukiwało cały wiersz numer 1, w celu znalezienia wartości np.: MSISDN oraz KOD SPRZEDAWCY I kiedy znajdzie taki wpis - usunie całą kolumnę "MSISDN" oraz "KOD SPRZEDAWCY" wraz z wartościami i danymi, które znajdują się poniżej tej komórki. Dodam, że tych niepotrzebnych wartości jest około 11, a sama oryginalna...

Excel/VBA - Combobox sortowanie i autouzupełnianie

Można tak: [syntax=vb]Sub AddItem(ByVal sItem As String, ByRef cmbBox As ComboBox) ' adds item retaining alphabetic order Dim l As Long For l = 0 To cmbBox.ListCount - 1 Select Case StrComp(cmbBox.list(l), sItem, vbTextCompare) Case 0: Exit Sub ' already in the combobox Case 1 cmbBox.AddItem sItem, l Exit Sub End Select Next l cmbBox.AddItem sItem End...

Excel: Jak stworzyć formułę do kategoryzacji czasu [+/- 8 min]?

Takie makro u mnie sobie poradziło: [syntax=vbnet]Sub Makro1() Const maxDiff = 8 * 60 ' 8 minut Const diffOK = "OK" Dim dy As Integer Range("A2").Select While ActiveCell.Value <> "" 'znajdx jedynke If ActiveCell.Offset(0, 1).Value = 1 Then ActiveCell.Offset(0, 2).Value = diffOK 'spacer w górę dy = -1 Do While IsDate(ActiveCell.Offset(dy, 0)) If...

VBA import dużego pliku TXT z polskimi znakami – jak wczytać całość do Excela?

Witam Chciałem zaimportować plik txt do xls. Wykonałem z funkcji: wczytywania linii po linii [syntax=vbscript] Open plik For Input As #TempFileNum Do While Not EOF(TempFileNum) Line Input #TempFileNum, LineData txt = LineData Loop Close #TempFileNum [/syntax] problem polega na tym, że wczytując polskie wyrazy takie jak MĄŻ zmienia mi na M^Ż Próbowałem...

VBA/Excel - Makro usuwa wszystkie wiersze zamiast wybranych, jak naprawić?

Popatrz, jak działa ta pętla np. dla pierwszego "i": jeżeli Twoja wartość będzie na końcu zakresu "y", to najpierw wiersz "i" usuniesz 119x, a dopiero na końcu przerwiesz pętlę... Bez sensu, prawda? Zamiast tego możesz wprowadzić następującą poprawkę: [syntax=vb]Private Sub CommandButton1_Click() Dim zakres As Variant, i As Integer, y As Variant, wier...

[Excel][VBA] Błąd Unspecified error przy usuwaniu z ListBox2

Cześć, Piszę do Was z kolejnym problemem. Mianowicie, jest command but. do usuwania pozycji z listboxa 2 po uprzednim wrzuceniu do niego pozycji z listbox 1. Zaznaczam konkretne pozycje do usunięcia, klikam knefel i wyskakuje błąd (Unspecified error) i zaznacza .Remove item i Zamawianie, gdyż tak nazywa się cały userform. Arkusz Eksport z którego ma...

VBA Excel: Makro do wyszukiwania i porównywania wartości dołek w kolumnach

Można po przeróbkach wykorzystać makro z Sub dir_pliki() katalog = Application.DefaultFilePath & "" 'katalog = "c:xxx" 'usuń pierwszą linię i wstaw po swojemu. musi być "" na końcu. plik = Dir(katalog & "*.xls") 'tu podstaw "*.mst" Do While plik <> "" If Right(plik,...

Excel: Jak automatycznie generować i wypełniać arkusze według wzorca?

Następnie chciałem usunąć pierwszy wiersz w pierwszym arkuszu żeby powstał kolejny wydruk z danymi z drugiego wiersza.niestety w tym momencie rozsypują się odwołania. Najprostszym rozwiązaniem Twojego problemu jest: 1. zaznaczyć wszystkie komórki powyżej tej którą chcesz wykasować 2. użyć kombinacji klawiszy Ctrl+C 3. ustawić się w pierwszej komórce...