makro usuwanie

excel makro - usuwanie symbolu + zmiana formatu komórki

Ciekawa sprawa... Przecinek jakby z innej bajki i nie chce się formatować komórka. Spróbuj w pętli: [syntax=vb]Sub Makro() Dim c As Range For Each c In ActiveSheet.UsedRange If Right(c, 1) = "*" Then c = Val(Left(c.Value, Len(c) - 1)) c.NumberFormat = "0.00" End If Next End Sub[/syntax]

Odfiltrowanie numerów faktur w VBA - Nr faktury:, Kwota VAT:, makro, usuwanie znaków

Przy czym dane muszą być dokładnie tak przygotowane jak podałeś wyżej, wystarczy gdzieś dodana spacja itp. i nie wyłapie numerów :) [syntax=vbscript]Sub elka() For i = Cells(Rows.Count, "I").End(xlUp).Row To 1 Step -1 b = InStr(Cells(i, 9), "Nr faktury:") + 12 c = InStr(Cells(i, 9), ", Kwota VAT:") - b Cells(i, 9) = Mid(Cells(i, 9), b, c) Next i End...

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

excel VBA makro - usuwanie wierszy, gdy data jest starsza od podanej

Niezadeklarowana zmienna obiektowa 'WB' Zadeklaruj (WB as workbook) i przypisz (set WB = thisWorkbook / set WB = Workbooks("JakiśInnyPlik.xlsx") Albo po prostu: For Each WS In thisWorkbook.Worksheets lub dla innego niż ThisWorkbook For Each WS In Workbooks("JakiśInnyPlik.xlsx").Workshee... Masz błąd w konstrukcji 'If': i = i -1 musi być wewnątrz bloku...

VBA makro do usuwania pustych wierszy we wszystkich arkuszach Excel

Witaj [syntax=vb]Sub usuwanie_pustych_wierszy() For Each sh In ThisWorkbook.Sheets For i = sh.Cells(65536, "A").End(xlUp).Row To 2 Step -1 If sh.Cells(i, "B").Value = "" Then sh.Rows(i).Delete shift:=xlUp End If Next Next End Sub[/syntax]

VBA - jak napisać makro do usuwania wierszy

Jesli dane jest w kolumnie 1, wtedy [syntax=vb]For r = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1 If (r Mod 3) <> 0 Then Rows(r).Delete Next [/syntax]

Excel - Makro do usuwania formatowań warunkowych ze wszystkich arkuszy

Spróbuj: [syntax=vbnet]Sub d() Application.ScreenUpdating = False For Each s In ThisWorkbook.Sheets s.Cells.FormatConditions.Delete Next s Application.ScreenUpdating = True End Sub[/syntax]

[VBA] Jak stworzyć makro do usuwania kolumn starszych niż data w A1?

[syntax=vbscript]Sub KolumnaData() Application.ScreenUpdating = False d = [A1] mz = Columns("MZ").Column For x = mz To 2 Step -1 a = Cells(2, x) If a <> "" And a < d Then Columns(x).Delete Next Application.ScreenUpdating = True End Sub [/syntax]

Jak zmodyfikować makro, by usuwało tekst z sąsiedniej komórki?

Chyba jakoś tak: Private Sub CommandButton1_Click() x = 3 While Worksheets("Przyrządy pomiarowe").Cells(x, 1).Value <> "" If Worksheets("Przyrządy pomiarowe").Cells(x, 1).Value = Worksheets("Kalibracja-Naprawy&... Then Worksheets("Przyrządy...

Jak poprawić makro do usuwania wierszy w Excelu w wielu arkuszach?

W każdy przebiegu pętli zanim zaczniesz zaznaczać wiersze. Inaczej skąd program ma wiedzieć, że chcesz zaznaczać w innym arkuszu?

EXCEL - Makro do usuwania przeterminowanych dat w kolumnie 'AI'

[syntax=vbscript]Sub Kasuj() Dim k As Variant For Each k In Sheets("Arkusz1").Range("TerminyGORNIK") If k <= Date Then Sheets("Arkusz1").Cells(k.Row, k.Column) = "" Next End Sub[/syntax]

Makro - Szukanie i usuwanie komórek o określonej wartości z komórki

Może tak: Sub del() Dim i As Integer For i = 100 To 3 Step -1 'ile wierszy będzie sprawdzanych If Range("B" & i).Value = Range("B2") Then Rows(i).Delete End If Next i End Sub

Jak zmodyfikować makro VBA do usuwania wierszy z zerami?

Spróbuj zamienić Rows(i).Hidden = True na Rows(i).Delete = True I przetestuj na kopii dokumentu... Powinno być: Rows(i).Delete Przy czym po usunięciu wiersza indeks 'i' nie powinien być zmieniany

VBA Excel - Makro do usuwania wierszy bez invoice w G i kwoty 5.00 w A

To wersja makro, które wrzuciłem dokładnie to robi. Po przemieleniu Twoich przykładowych danych pozostało dokładnie 100 wierszy, z czego zostały tylko wiersze z "invoice" w opisie a także wiersze z kwotą 5.00 niezależnie od reszty opisu.

Excel 2007 - optymalizacja formatowania warunkowego dla dużych arkuszy

W załączniku plik z przyciskiem wstawiania nowego wiersza. Natomiast gdybyś usuwał wiele wierszy z zaznaczenia pamiętaj, że pola wyboru z tych wierszy ułożą się w stosik jeden na drugim. I dlatego, podejrzewam, tyle ich się nazbierało. Można dorobić makro usuwania Np ostatniego wiersza, ale to ew. później. Wyłączam komputer, idzie nowa burza...

Excel - Makro, kopiowanie do CSV i usuwanie danych

A dlaczego nie dać szansy Excelowi, tylko go wyręczać? [syntax=vbscript]Sub Zapis_do_CSV() ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\baza test2.csv", _ FileFormat:= xlCSV, CreateBackup:=False, Local:=True End Sub[/syntax] Nie zwróciłem uwagi, że to ma być bez pierwszego wiersza, ale ten zawsze można usunąć później. Najważniejsze, żeby Excel...

Arkusz Google Makro usuwa lub ukrywa wiersz, w którym pole wyboru jest zaznaczone

Witam, Proszę o pomoc, Potrzebuję makro w Arkuszu Google które usuwa lub ukrywa wiersz, w którym pole wyboru jest zaznaczone. W wierszach mam pole wyboru, zaznaczam niektóre z nich i wciskam button, który ukrywa lub usuwa zaznaczone wiersze. Fajnie jakby wyskoczył komunikat "czy na pewno chcesz ukryć/usunąć zaznaczone wiersze" Tabela jest w załaczonym...

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

co zmienia na ekranie co 10s między Sheet 1 a Sheet 2 To zamiast migających światełek na choince? Jak już wspomniałem to będzie wyświetlane na dashboard. Na TV. Zamiast otwierać 2 pliki lub instalować 2 PC + 2TV wystarczy jeden, który się zmienia.

VBA/MAKRO/EXCELL - Wstawianie i usuwanie pustych wierszy w konkrentych miejscach

Wygląda mi to na jakieś "kombinowanie" i, znając życie, nie będzie to działało tak, jak chcesz - bo zaistnieją jakieś warunki, których teraz nie przewidzisz, ale tak na szybko można próbować takim makrem, jak w załączniku. Cała "sztuka" to dodawanie / usuwanie wierszy od końca, żeby zakres się w pętli nie przesuwał. Usuwanie zakłada, że usuwasz wiersze,...

Makro VBA do usuwania pustych komentarzy w kolumnie A bez usuwania komentarzy z wpisem

Np. takie makro: [syntax=vbscript]Public Sub PusteKomentarze() Dim i As Long Dim OstW As Long OstW = Range("A" & Rows.Count).End(xlUp).Row For i = 1 To OstW If Not (Range("A" & i).Comment Is Nothing) Then If Range("A" & i).Comment.Text = "" Then Range("A" & i).ClearComments End If End If Next i End Sub [/syntax]

Excel, makro, funkcja - kopiowanie i usuwanie znaków w komórce.

A nie możesz wyniki przenieść na drugi arkusz? Wtedy tylko zmieniasz formułę: =LEWY(Arkusz1!A1;2) =PRAWY(Arkusz1!A1;DŁ(Arkusz1!A1&... Czy musisz na tym samym arkuszu kategorycznie pozostać? EDIT: Zrobiłem specjalnie dla Ciebie makro ;) [syntax=vb]Sub Prostokąt1_Kliknięcie() koniec = Range("A1").End(xlDown).Row Application.ScreenUpdating...

VBA: Makro usuwa wartości z komórek AF54, AG54 przy kopiowaniu

Bez plików trudno się zorientować co Ty chcesz kopiować :cry: Proponuję jednak nagrać sobie makro przenoszenia (kopiowania) całego arkusza z pliku źródłowego do pliku docelowego :idea: , a potem przeprowadzić procedurę ukrywania lub usuwania niepotrzebnych danych w pliku docelowym :D

Makro usuwające wyznaczone komórki na podstawie wartości

[syntax=vb]Sub usunAE() Dim bs As Range, r&, i& Set bs = Range("A:E") r = bs(Rows.Count, 5).End(xlUp).Row For i = r To 1 Step -1 If bs(i, 5) = 0 Then bs.Rows(i).Delete Next End Sub [/syntax]

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

Zaproponuję taki kod: [syntax=vb]Sub Wytnij() Sheets("Arkusz1").Select For x = 1 To Sheets("Arkusz1").Cells(Rows.Count, "C").End(xlUp).Row jest = Application.CountIf(Sheets("Arkusz2").Ra... Cells(x, 3)) If jest > 0 Then Rows(x).Delete: x = x - 1 Next End Sub [/syntax] Pomyliłem się. Autor chce, żeby kasował, gdy nie znajdzie, a więc: [syntax=vb]Sub...

Word VBA kreator makro nie rejestruje opcji "Zaznacz w Dokumencie Głównym.

Dzięki, ale z twoim uzupełnieniem makro USUWA wszystkie zielone teksty które dokona zaznaczenia w całym dokumencie wszystkich wystąpień fontu z danym formatowaniem, by można było usunąć teksty z tym formatowaniem [syntax=vbscript]Sub Makro2() ' ' Makro2 Makro ' ' Selection.Find.ClearFormatting Selection.Find.Font.Color = 5287936 With Selection.Find...

Excel - Jak utworzyć makro do filtrowania i usuwania określonych wierszy?

To całkiem inne zagadnienie, wogóle nie związane z tematem i bardzo prościutkie [np. za pomocą wyszukaj.pionowo()] ale załóż własny temat. (bo jak między innymi podziękujesz za pomoc???)

Jak napisać makro w Excelu do usuwania ostatniej spacji w komórkach?

tekst=Trim(tekst)

Jak dostosować makro VBA, by nie usuwało dodanych arkuszy poza kolumną M?

To[syntax=vbscript]For Each Wks In ThisWorkbook.Sheets If Wks.Name <> "Źródło" Then Wks.Delete Next Wks[/syntax]wyrzuć

makra - Usuwanie danych komórek ze wszyskich arkuszy

[syntax=vb]Application.ScreenUpdating = False For Each ws In ThisWorkbook.Worksheets If ws.Name <> "Arkusz1" And ws.Name <> "Arkusz2" Then ws.Range("A5:C71").ClearContents End If Next ws Application.ScreenUpdating = True[/syntax]

[VBA Excel] - Jak poprawić makro usuwające kolumny i sortujące dane?

Zauważ, że arkusz niue nazywa się "mm.dd.yyyy" tylko ma konkretną datę jako nazwę więc lepiej w ten sposób: select.end ale tak też można. I druga rzecz. Ta funkcja też ma pewien błąd. Trzeba podać datę początku i datę końca. Nie wiem co chciałeś osiągnąć chyba że jakimś kodem którego akurat ja nie stosuje/nie znam. [syntax=vb] Range("H2").FormulaR1C1...

makra - Excel - import danych z wielu plików o tej samej nazwie z różnych katalo

1. 1. Nie kasuje komórek z zakresu Kod: br.Sheets(s).Range("39:56,97:100,141:144... To jest mój błĄd, miało być o 9 wierszy mniej, poniewaz kopie z a10 do a1 na sbiorczym t.j. range("30:47, 88:91, ... itd. teraz makro usuwa wiersze z dane, nie te z 'Note: 1. All tests (VT, PT, MT, UT, RT) were carried...

Makro do usuwania pierwszego wiersza dla odbiorcy w Excelu

Witam, Mam problem który może mi rozwiązać tylko makro, otrzymałem excel z danymi w którym mam w jednej kolumnie nazwy odbiorców w kolejnych dane sprzedażowe. Problem polega na tym że zawsze pierwszy wiersz dla danego odbiorcy jest sumą wszystkich pozostałych (taki wiersz sumujący sprzedaż dla danego klienta). Potrzebuje makro które automatycznie usunie...

Excel - Usuwanie odfiltrowanych wierszy wraz z grafiką za pomocą makra

Brak pliku do testowania!!! Jak coś Ci nie zadziała, poprawisz sobie sam. Dodałem makro RemoveShapes. Zobacz w moim załączniku.

[VBA Excel] - Makro usuwające wiersze bez słowa kod i kwoty 0,00

Dołącz przykladowy plik

VBA: Jak napisać makro usuwające zera wiodące z nazw faktur typu FK002301?

Na przykład w ten sposób: [syntax=vb]nr = "FK002301" ret = "" cut_flag = True For i = 1 To Len(nr) c = Mid(nr, i, 1) If Not IsNumeric(c) Then ret = ret & c Else If c > 0 Then cut_flag = False ret = ret & c End If If c = 0 And Not cut_flag Then ret = ret & c End If End If Next i MsgBox ret[/syntax]

Makro - Porównywanie danych zawartych w dwóch tabelach i usuwanie duplikatów

Jeśli będziesz miała otwarte oba pliki (tylko :!: ) to w świeżym pliku możesz wykorzystać makro typu :spoko: : [syntax=vbscript]Option Explicit Sub duplikatclear() Dim ws As Worksheet Dim ww As Worksheet Dim i, lrs, lrw As Integer Dim db As Range Set ws = ThisWorkbook.Sheets(1) Set ww = Workbooks(2).Sheets(1) lrs = ws.Cells(Rows.Count, 6).End(xlUp).Row...

Automatyczne usuwanie arkusza z nazwą z danej komórki

Ale makro działa , a co to ten 'CommandBoxa'?

Makro do zbierania danych z dziennego raportowania w jednym pliku zbiorczym

Na przykład, wersja prosta Nie należy ręcznie usuwać dane. To makro zrobi sam po zmianie daty w komórce B1

VBA - makra - usuwanie pustych wierszy - runtime error 13

hej, makro, którego używam: działa poprawnie, ale tylko dla arkusza danego. Chodzi mi o makro, które będzie usuwać wszystkie wiersze w całym skoroszycie. makro umieść w module a nie w arkuszu

Makro do Excela: zapisywanie pliku do nowego katalogu i usuwanie starego

Spróbuj tak: [code][syntax=vbscript] Sub ZapiszIUsuń() Dim Plik As String Plik = ThisWorkbook.FullName ThisWorkbook.SaveAs Filename:="C:\NowaŚcieżkaDoPliku\" & ThisWorkbook.Name Kill Plik End Sub [/syntax] W cudzysłowie trzeba podać ścieżkę docelową andie

[VBA Excel] Makro do usuwania wierszy bez bio w kolumnie K

Potrzebuję czegoś cgyba podobnego, ale jednak nie mogę dopasować... Potrzebuję makro, które usunie mi wszystkie wiersze nie zawierające w kolumnie K słowa "bio" ... Pomożecie? W tej kolumnie są ciągi znaków i super jakby makro szukało tylko słowa "bio", a nie np. " bio grafia" czy "przedsię bio rstwo" Wydzieliłem jako nowy temat z https://www.elektroda.pl/rtvforum/topic3...

[VBA Excel] Makro do usuwania powtarzających się nagłówków w arkuszu

Witam serdecznie Na początku zaznaczam, że jestem na początku swojej drogi z makrami w Ecxcel'u. Potrzebuje napisać makro, które które automatycznie usunie z całego arkusza rekordy z opisem kolumn w środku pliku, tzn pozostawi nagłówek na początku, ale tylko jeden. Załóżmy dla bezpieczeństwa, że liczba rekordów pomiędzy nagłówkami nie jest stała. Dlatego...

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

Zbliżone działanie do pożądanego :D tj. przenoszenie danych z katalogu do oferty przy pomocy dwukliku (makro działa pojedynczymi wierszami - oczekując na wpis ilości do oferty :ok: patrz na zrzut ) 978389 Drugie makro w "ofercie" usuwa wybrane wpisy (wybrany indeks :!: ,a przy okazji ilość :D ) 978391

makro do Worda usuwające wiersz ze wskazanym wyrazem

... :-) ... Piszesz o jednej tabeli, albo o jakiejś pojedynczo-domyślnej, a w dokumencie procedury, który podsyłasz jest tych tabel aż 58, co łatwo sprawdzić, wpisując w oknie Immediate edytora vba: 903088

Jak przyspieszyć działanie makra VBA usuwającego i dodającego wiersze?

Powinno być ScreenUpdating, a nie DisplayAlerts. Poza tym niepotrzebne są te selekcje. Wystarczy: [syntax=text]Rows(281).Delete Shift:=xlUp 'usuwa 281 wiersz [/syntax]

Makro VBA usuwające określone kolumny w arkuszu na podstawie wartości

[syntax=vb]Sub zz() Dim iLstCl% Application.ScreenUpdating = False iLstCl = Cells(4, Columns.Count).End(xlToLeft).Column For i = iLstCl To 3 Step -1 If Cells(4, i).Value = 1 Or Cells(4, i).Value = 2 Then 'zamiast powyższego warunku przy takim nazewnictwie kolumn można dać poniższy warunek: 'If IsNumeric(Cells(4, i).Value) = True Then Columns(i).EntireColumn.Delete...

Jak sumować zduplikowane pozycje w kolumnie? Potrzebna funkcja w VBA.

Witam wszystkich, potrzebuję pomocy w dorobieniu jednej funkcji w kodzie VBA. W załączonym pliku jest tabela, w której znajdują się produkty, ale są one zduplikowane. Za pomocą makro usuwam zduplikowane pozycje, zapisując je w tabeli obok. Potrzebuję pomocy, aby dołożyć tam opcję sumowania pozycji zduplikowanych w kolumnie ENABLED. Poniżej przykład:...

Jak stworzyć makro w Wordzie do dzielenia tekstu na 512 znaków i usuwania polskich znaków?

Witam, w codziennej pracy wysyłam wiadomości, które nie mogą przekraczać 512 znaków (jest to ograniczenie wewnętrzne w firmie), bardzo często korzystam z gotowych szablonów w WORD, ale czasami, to literę utnie, to coś się rozjedzie i wiadomość zmienia swój sens. Czy w Wordzie da się stworzyć makro które podzieli tekst na części po 512 znaków ? Jeżeli...

[VBA] Excel - Makro do dodawania/usuwania 0 i 0111- w kolumnach

Dziękuję za odpowiedz. Dobrze kolega zrozumiał. Jak jest zero to odejmnij. Jak nie ma zera to dodaj zero. Tak sama z druga wartością. Juz tlumacze sens. Codziennie dostaje raporty w których występują wartości z zerem lub bez zera. Żeby makro moglo uzupełnić dane(wartości duplikujące) to musze miec dane jednakowe. Jak nie mam jednakowych danych to musze...

VBA Excel - Poprawa makra do usuwania wierszy według warunków w kolumnach

Witaj Łatwiej zrobić nowy niż szukać błędów: Dodano po 3 Specjalnie w tym przykładzie może być łatwiej [syntax=vb] Sub Usun() Dim r&: r = 2 While Cells(r, 1) <> Empty If Cells(r, 1) = "X" Then Cells(r, 1).Delete Shift:=xlToLeft End If If Cells(r, 2) = "Linia" And Val(Left(Cells(r, 3), 3)) >= 1 Then r = r + 1 Else Rows(r).EntireRow.Delete...

Modyfikacja makra aby nie usuwało formuł przy tworzeniu nowego arkusza

Podmień kod makra na poniższy i potestuj [syntax=vbscript] Sub nastepny() Application.ScreenUpdating = False ActiveSheet.Copy after:=ActiveSheet With ActiveSheet num = Mid(.Name, 3, 2) .Range("g4") = "z T-" & num num = Format(Val(num + 1), "00") .Name = "T-" & num ow = .Cells(Rows.Count, 1).End(xlUp).Row .Range("l2") = .Range("l2").Value + 7...

Makro VBA do usuwania komórek na podstawie wyniku formuły 'Porównaj'

Na początek drobna sugestia. Ubieraj swój kod w znaczniki Code . Łatwiej się czyta. Wracając do problemu. Sub EX_LP() Dim x, y As String Range("G2").Select Selection.AutoFill Destination:=Range("G2:... For Each x In ActiveSheet.Range("G2:G250&... If IsNumeric(ActiveCell)...

Visual Basic - kopiowanie oraz wyświetlanie danych

Poprawiłem makro o usuwanie wszystkich obiektów rysunkowych i o wklejanie komórek z ich formatem. Kod programu wpisany jest w ThisWorkbook w VBAProject.

VBA - Początki z Userform - Dodawanie/usuwanie do/z listobox

zależy mi żeby makro zawierało listę funduszy (kodów), które można powiększać o kolejne nowe lub odejmować niepotrzebne. Makro będzie miało za zadanie usuwać wszystkie fundusze/kody inne niż na liście. Czy ja dobrze rozumiem kolego "m4xon", że oczekujesz żeby na forum ktoś sporządził Ci listę funduszy unijnych ? :D A na poważnie to gdybyś zamiast pustego...

Excel - Jak wkleić dane do scalonych komórek o różnej liczbie?

Generalnie na przyszłość, unikaj scaleń, bo z nimi dużo kłopotów. Ewentualnie stosuj scalenia na samym końcu, jak wszystkie dane i formuły są już w arkuszu. Tymczasem napisałem Ci makro, które usuwa scalenia z obszaru formuł, wstawia formuły do wszystkich komórek, a na końcu przywraca scalenia kopiując je z kolumny 'lp' z tabelki po lewej stronie. W...

Jak zrobić makro usuwające kolumnę, gdy ta posiada określony nagłówek?

Makro działa bez zarzutu. Dziękuję za pomoc. Temat do zamknięcia.

Excel - Makro do zliczania i usuwania duplikatów indeksów produktów

Witajcie. Jest taka sprawa. Mam nowy arkusz do ktorego kopiuja się indeksy produktów z takiego prostego konfiguratora ktory stworzylem. Indeksy kopiuja sie do kolumny A, i niektóre się powtarzają. Jak napisa makro które zliczy i wyswietli nr indeksu + obok ile razy się powtorzyl, kasujac wszystkie powtorzenia. I tak dla wszystkich indeksow - lista +...

Proste makro, VBA, wypełnianie komórki obok aktualnym czasem

Tak, tylko domyślnie chodzi o to, żeby osoba wypełniająca to nie miała możliwości ingerowania w zmiany, np. usuwać funkcje. Musi być makro.

VBA Excel - Makro do zapisywania arkuszy jako PDF w odpowiednich folderach

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.

EXCEL - dodawanie wiersza w tabelach - VBA makro

Mała przeróbka makr: 912681 Wiersze można dodawać ze ściśle określonego zakresu, który sam sobie ustalasz ("If ilewrs > 10 Then Exit Sub"). Usuwanie wierszy tylko pojedynczo, od ostatniego, aby zachować porządek.

Jak zmodyfikować makro w Excelu, by wracało do poprzedniego arkusza?

Dzień dobry, Proszę o pomoc w zmodyfikowaniu makra. W arkuszu Dane w zakresie F10:F500 wpisywane są ręcznie dane, które wykorzystywane są w innych arkuszach pliku. Do kasowania wpisanych danych jest używane proste makro jak niżej: Sheets("Dane").Select Range("F10:F500").... Selection.ClearContents Range("F10").Select...

[EXCEL] Makro VBA do usuwania formuł z drugiej kolumny na podstawie tekstu w pierwszej kolumnie

Wynik w formacie programu Excel?

Excel/VBA - Jak porównać dwa arkusze i zaznaczyć różnice?

Dziekuję bardzo za odpowiedź i W sumie to masz rację. Brakowało mi obiektywnego spojrzenia na ten cały bałagan. A gdyby to makro usuwało identyczne wiersze( wystepujące w obu arkuszach) z arkusza forecast, a zmiany ilości w danych datach zaznaczało na jakis kolor? a druga opcja- a gdyby wszystkie zmiany w odniesieniu do arkusza 2. kopiowało do trzeciego...

VBA/Excel - usuwanie wierszy w pliku na podstawie danych w innym pliku

Wrzuć to makro, uzupełnimy...

Excel - makro usuwające frazy bez zmiany liczb na daty

Witam, Szukam makra, do excela, które będzie przeszukiwało daną kolumnę i usuwało podane frazy z komórek np. faktura vat. Znalazłem coś takiego: Proszę pamiętać o używaniu znaczników code . Proszę poprawić błędy w poście. - arnoldziq

Tworzenie nowego pliku Excel z makrem VBA: kopiowanie, usuwanie i przenoszenie komórek

Nagraj makro jak to robisz, następnie je dostosuj do swoich potrzeb.

Makro w Excelu nie zaciąga danych z komórek odnoszących się do innego arkusza

Ale co Ci nie jeździ, bo nie bardzo rozumiem. Ten kod początkowo kopiuje wszystko, a te wiersze z zerami są usuwane dopiero później, kolejną częścią kodu. Ja nic w logice Twojego kodu nie zmieniałem.

[EXCEL] - Kopiowanie danych z arkusza wg. klucza - updated

Dostosowałem makro z w/w tematu. Nie testowałem zbytnio, ani nie testowałem istniejących procedur. Ale na zakończenie usuwana jest zawartość arkusza "TEMP", dlaczego?

Tworzenie makra - masowy import tabel z plików .html do jednego arkusza .xlsx

Przepraszam za opóźnienie w odpowiedzi. Niezmiernie dziękuje za pomoc. (at)cbrman - Twoje marko działa, ale u mnie niestety pobiera również nagłówki. Ale poradziłem sobie z problemem, zarejestrowałem makro, w którym usuwam duplikaty. Później połączyłem Twoje makro z moim, rejestrując trzecie makro, które uruchamiało je po kolei.

Excel - Zamiana wartości na 0 w zależności od wartości w innych komórkach

Spróbuj na początku Twojego makra do usuwania danych wyłączyć zdarzenia arkusza [syntax=vbscript]Application.EnableEvent... = False[/syntax] a na końcu makra ponownie je włączyć [syntax=vbscript]Application.EnableEvent... = True[/syntax]

Jak usunąć wiele kolumn po nazwach nagłówków w VBA?

Cześć, potrzebuję stworzyć makro które będzie usuwało kolumny po nazwie nagłówka. Liczba kolumn w arkuszu może się zmieniać ale nazwy kolumn będą te same. Dodaję przykładowy plik w którym chciałbym usunąć kolumny o nazwie "warunek" i "licznik". Myślałem o takim kodzie ale może można zrobić coś prostszego? Nie za bardzo też wiem jak poprawnie tym sposobem...

Makra VBA w Excelu: usuwanie i zliczanie komórek z określonymi parametrami

No, ale skądś się ta lista w kol.A wzięła. Jeśli jest wynikiem działania makra, być może łatwiej/szybciej byłoby to makro zmodyfikować (uzupełnić w podprocedury)...

Excel - Jak dodać dzień i zmodyfikować ewidencję pracy pracowników?

Dodałem jeszcze możliwość ukrywania kolumn z niepotrzebnymi dniami w miesiącu, aktualizację dni miesiąca na pasku jak również zmiana koloru na szary dni sobota i niedziela. UWAGA!, nie zmieniaj (nie dodawaj nie usuwaj żadnych kolumn i wierszy) bo to spowoduje że makro będzie niepoprawnie działać

Excel stworzenie makra do kopiowania komórek miedzy arkuszami i usuwania

[syntax=vbscript]Sub Makro() Sheets("Arkusz1").Select a = Application.Match("W", Range("A1:A" & Cells(Rows.Count, "A").End(xlUp).Row), 0) nw = Sheets("Arkusz2").Cells(Rows.Count, "A").End(xlUp).Row + 1 If Not IsError(a) Then Sheets("Arkusz2").Range("A" & nw) = Range("B" & a) Rows(a).Delete End If End Sub [/syntax]

MS Word 2013 - Usuwanie osieroconych styli z dokumentu technicznego projektu

A więc z 1588 styli zrobiło się tylko 1300. Za sprawą tak napisanego makra: [syntax=vbscript] Sub UsunStyleXl() ' ' UsunStyleXl Makro Dim oStyle As Style, nazwaStylu As String For Each oStyle In ActiveDocument.Styles If Not oStyle.BuiltIn Then nazwaStylu = oStyle.NameLocal nazwaStylu = Left(nazwaStylu, 2) If nazwaStylu = "xl" Then oStyle.Delete End...

Usuwanie Trojana:Win32/Wacatac.H!ml po instalacji dodatku do gry Roblox

Przeczytales to co napisalem? Czy calkowicie zignorowales i nadal piszesz to samo? Co to sa okienka "popins"? Popup? Przeciez pisales, ze wlaczaja sie aplikacje. > Masz klawiature gameingowa i masz ustawione jakies makro pod 2? Jezeli tak to przywroc klawiature do ustawien domyslnych lub zmien to w aplikacji do klawiatury. Mozesz usunac to co wykryl...

usuwanie wykresu VBA, pobranie nazw wykresów znajdujących się w arkuszu

Przy odświeżaniu pliku potrzebuję aby wykres ten został usunięty. W jego miejsce makro tworzy nowy w oparciu o aktualne dane. Jeśli wykres jest tego samego typu i nie zmienia się układ danych, tylko dochodzą nowe, to po co usuwać wykres ? Wystarczy "rozszerzyć" zakres danych dla wykresu już istniejącego ... ? : / ?

EXCEL VBA - nie mogę usunąć CheckBox'ów z arkusza klawiszem Usuń

Witam, w arkuszu mam ramkę, którą za pomocą klawisza Dodaj kopiuję poniżej. Dodatkowo stworzyłam klawisz Usuń gdyby ktoś wstawił go pomyłkowo. Problem polega na tym, że w tabeli mam checkboxy i przy usunięciu nie wiem jak wpisać makro, żeby je usuwał. Próbowałam makro nagrać, ale niestety każdy checkbox ma inną nazwę. Przeczytałam na forum, że powinnam...

EXCEL - VBA Usuwanie komórek w Arkuszu2 jeśli komórka w Arkuszu1 jest pusta

Szczytem wygody dla pomagających byłoby, gdybyś załączył arkusz z przykładem zawierającym to makro

Wykonywanie makro w Word z podstawianiem kolejnych wyrazów z utworzonej listy

Kolega lanzul pomógł mi rozwiązać problem z usuwaniem wiersza tabeli, w którym jest konkretny wyraz. https://www.elektroda.pl/rtvforum/viewto... Tych wyrazów jest znacznie więcej, dla których potrzebuję usuwać te wiersze. Dlatego potrzebuję zbudować pętlę, która będzie brać kolejne wyrazy z jakiejś listy i będzie wykonywać to...

VBA - Jak zatrzymać makro odliczające czas przed usunięciem pliku?

Witam Próbuje stworzyć makro dla "zapominalskich". Przejdźmy do sedna. Po wciśnięciu OK w msgboxie makro odlicza np. 30 sekund po czym usuwa otwarty plik. Ale jeśli wcześniej włączę makro usuwające plik to plik zostanie natychmiast usunięty. Czyli makro odliczające czas musiałoby zostać wyłączone by kolejne mogło zostać włączone. Udało mi się na znalezionych...

Excel VBA - blokowanie edycji komórek po wpisaniu hasła w okienku dialogowym

Do tego nie jest potrzebna znajomość VBA. Excel ma funkcję blokowania komórek - zaznaczamy komórki do zablokowania, blokujemy i włączamy ochronę arkusza. W momencie włączenia ochrony Excel zapyta o hasło. Trzeba sobie włączyć widoczność paska narzędzi "ochrona" Tak zgadzam się z tobą ale problem polega na tym że mam makro co usuwa filtry i nie działa.ono...

Excel VBA – makro kopiujące arkusz „xyz” do nowego pliku o nazwie z B3 z formatowaniem

Po pierwsze: z którym fragmentem nagranego kodu masz problem? Po drugie: Nagraj makro kopiowania całego arkusza do nowego pliku ze zmianą jego (pliku) nazwy. Masz 100% gwarancji zachowania formatowania. Jeśli w arkuszu jest nadmiar danych można dopisać usuwanie. Jeśli jesteś początkujący, to nagrywarka jest podstawą. Przykład: To jest nagrane makro...

VBA - Excel do Word: Kopiowanie Tekstu jako Nagłówki (A1:A10 - Nagłówek_1, A5 - Nagłówek_2)

Prot, znowu proszę o pomoc :please: Formatowanie nagłówków działa doskonale :idea: Zabrałem się do numerowania i formatowania tych tabel i wykresów. W zakresie formatowania stylów pozwoliłem sobie skorzystać z Twoich doświadczeń i to mi działa ok. Ale ma problem z kolejnym numerowaniem tabel. Napisałem taki kod: [syntax=vbscript]Sub Change_Tabel() Dim...

Makro porównywujące i wklejąjące określone wartości

To jeszcze wymaga doprecyzowania. Co jeżeli w kolumnie F jest pusto a w E coś jest, albo odwrotnie? Może chodzi ci o usuwanie całych wierszy? Niezależnie od odpowiedzi użyj metody Delete. W pierwszym przypadku z obiektu Range z odpowiednią do potrzeb wartością Shift, w drugim Rows. Obiekt powinien wskazywać właściwy element do usunięcia. Zalecane jest...

MS Excel – automatyczna numeracja pozycyjna bez makr po usunięciu komórek

Witam, Mam problem z zadaniem na liczbę pozycyjną. Po usunięciu zawartości komórki ciąg zostaje przeliczony i następuje nadanie nowej numeracji. Naszym zadaniem jest taka modyfikacja formuły, aby pusta komórka znikała (czyli pozostałe komórki były podnoszone o jedną pozycję w górę). W internecie jest kilka rozwiązań, ale jest w nich wykorzystane makro,...

VBA - usuwanie zdublowanych wierszy, optymalizacja makra

Wyłącz odświeżanie ekranu przed pętlą (Application.Screenupdating=false) a za pętlą włącz ponownie (=true)

VBA - Błąd przy duplikowaniu arkusza: przyciski bez makr

Witam, Napotkałem dzisiaj dzwiny błąd i nie mam pojęcia jak go wyeliminować. W moim arkuszu mam 3 pzyciski do których podpiete są makra. Dzisiaj potrzebowałem zobić makro które duplikuje mi aktywny arkusz w tym samym skoroszycie i zmienia jego nazwe. Napisane makro w pełni mnie zadowala i spełnia oczekiwania, ale jest jeden problem gdy uruchamiam makro...

VBA: Jak zamknąć plik używając nazwy z komórki w Excel?

Jakoś dziwnie to robisz ten 'plik główny.xls' w nim jest to makro? [syntax=vbscript]Sub usuwanie() Dim plik As Workbook Set plik = Workbooks(Sheets("dane").Range("W4").Val... plik.Close End Sub[/syntax]

Access - Błąd w makrze przy usuwaniu danych z HotelPobyt (Dolní Marklovice, 262)

ale wywala błąd Jaki ?

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

Witam ponownie i znowu wracam do tematu. Jeżeli chodzi o temat usuwania wszystkich makr przez makro to wszystko zostało już wyjaśnione. Ale w trakcie pracy zauważyłem że po wygenerowaniu nowego pliku i usunięciu wszystkich makr i ewentualnym wklejeniu nowych zauważyłem że zostają w nim jeszcze w menadżerze nazw zakresy których też bym chciał się pozbyć...

VBA EXCEL - Porównaj kmórki w dwóch skoroszytach

Specjalnie pobrałem dla pewności przykłady z postu #3 Problem w tym, że r = Cells(Rows.Count, 1).End(xlUp).Row wykazuje "1" i nie uruchamia pętli. Jeżeli zmienię na r = 10 to wtedy k za każdym razem jest "0" i nic nie usuwa. Makro uruchamiam z "Zmienny" Mam office 2010

Kod VBA wyszukanie powtarzalnej sekwencji i jej usunięcie

Witam Forumowiczów, mam problem z napisaniem makro, które może usuwać powtarzalne sekwencje w trzech kolumnach i jednocześnie zostawiając tę jedną sekwencję unikatową. Np. wygląda to tak, kolumny ABC i poziomo wiersze. Jeden raz się powtarza sekwencja 123, którą należy usunąć. 123 456 789 123 147 258 369 Proszę o pomoc.

VBA - usuwanie wierszy z błędami #ARG! w kolumnie B

Próbowałem w ten sposób to obejść, ale zawsze mam DEBUG na drugiej linii makra. Chyba, że zmienię błąd w komórkach na dowolne litery, cyfry itp. Wówczas makro działa jak powinno.

Makro - kopiu/wklej 2 arg. - potrzebe makro uwzględniajace 2 argumenty

Jeden indeks = jeden typ produktu. Tutaj jest błąd, na szybko kilka rzeczy usuwałem i nie zauważyłem.

Kod VBA - Dodawanie danych do tabeli z walidacją pól i obsługą komunikatów

Dzięki za poprawną formę kodu. Oczywiście na początku u mnie nie zadziałał, ale doszedłem w końcu w czym jest problem. Wraz z uruchomieniem makro, przed kopią danych do innego skoroszytu, były usuwane wszystkie odstępy przy użyciu Trim, co skutkowało tym że dane przyjmowały postać tekstu. Teraz zostało mi dostosować swoje makro pod Twój kod z pętlą.

Excel - Jak użyć makra do kopiowania danych do arkuszy według imion?

Czy te arkusze z imionami masz już stworzone, czy chcesz je tworzyć dynamicznie? Zakładając, że było by to makro - czy ma ono każdorazowo usuwać wszystkie istniejące arkusze z imionami i je odtwarzać ponownie?

Usuwanie całego wiersza w Excelu za pomocą przycisku.

Witam forumowiczów, pozwolę się podpiąć pod ten temat, żeby nie zakładać nowego a jest powiązany z obecnym. Proszę o pomoc/wskazówki w stworzeniu makra, które będzie usuwało określoną ilość wierszy zawierającą konkretne dane. Mianowicie : - w kolumnie C mam kody produktu - w kolumnie J, datę produkcji - w kolumnie K, godzinę produkcji W innej tabeli...

VBA usuwanie wierszy, w których w danej komórce znajduje się fragement tekstu

Cześć, Zrobiłem makro, które ma usuwać wiersze, jeśli w komórce F występuje fragment tekstu, np 'AAA' lub 'BBB'. Makro działa, ale jeśli dwie komórki w wierszach pod rząd są takie same to makro je omija. Zastosowałem funkcję 'offset', ale to nie pomogło. Ma ktoś jakiś pomysł jak to naprawić? Sub usuwanie_wierszy() Range("A1").Activate wiersz = 2 Do...

Aktualizacja makra po dodaniu nowych kolumn: przesunięcie wyniku, makro wyszukaj pionowo

W załączonym pliku możesz dodawać i usuwać kolumny (wyłączając kolumny 'czynnik1' i 'czynnik2'), a makro będzie poprawnie liczyć.

Jak stworzyć makro w Excelu czyścące komórki tylko w dni robocze?

Namotałeś. [syntax=vbscript]Sub CzyscDane2() d = Weekday(Date) If d = vbSaturday Or d = vbSunday Or Swieto(Date) Then MsgBox ("Mamy weekend! Dane usuną się tylko w dzień roboczy") Exit Sub End If i = MsgBox("Czy na pewno chcesz usunąć dane z tej tabeli? " & _ "Pamiętaj, że stracisz je bezpowrotnie!!!" _ , vbOKCancel + vbExclamation + vbDefaultButton2,...