Jeśli tylko ukryć wartości, to najprościej "zabielić" czcionkę za pomocą formatowania warunkowego. Jeśli wynik formuły, to warunek podobny do numerowania wyżej. Jeśli zablokować przed edycją, to jedynie makro w procedurze zdarzeniowej.
dla H2 mam wpisaną wartość 0001, H3 - 0002, H4 - 0003 itd do H161 mam wartość 0160 i teraz po włączeniu makra żeby w wierszu H2 było 0161, H3 - 0162, H4 - 0163 itd do H161 - wartość 320. i po następnym włączeniu makra dalsze numerowanie. czyli H2 - 0321, H3 - 0322 itd itd
Excel wyświetlał MsgBox To się nazywa InputBox. W załączniku numerowanie FV.
Witam, Szukałam przez dłuższy czas na forum makra mi potrzebnego ale nie znalazłam. Mam arkusz z danymi i w jednej z kolumn przypisuję kategorię B,C lub N . Jeżeli zostanie nadana kategoria B to chciałabym, żeby obok w kolumnie został nadany numer. Tylko że numeracja ma iść według kolejności uzupełniania wiersza, a nie po kolei. (pokazane w załączonym...
Witam, Mam problem jak zmienić formułę w kolumnie H ( w załączeniu przykład ), aby numeracja która się pojawia była na stałe przypisana dla danego wiersza. Czyli jeżeli jakiś wiersz ma liczbę 1 to żeby to było na stałe. tzn. teraz jak wpiszę słowo wykonawstwo w 3 wierszu to w kolumnie h żeby pojawiła się cyfra 3 a nie jak obecnie 2 ( obecnie przelicza...
Witam Mam do was wielką prośbę dotyczącą makra. Posiadam Excel 2013 i 2016. Załóżmy że w komórce D1 mam tekst "Utworzenie sprawy"; Załóżmy że w komórce D14 mam tekst "Utworzenie sprawy Załóżmy że w komórce D41 mam tekst "Utworzenie sprawy" Załóżmy że w komórce D65 mam tekst "Utworzenie sprawy" W komórce d1 od tej komórki makro zaczyna pracę. Jeśli 1...
Niestety nie można zarejestrować w makro "inna komórka", VBA nie zrozumie takie. W post #2 PRL podal Ci link Dodano po 3 Być może jednak wiersze w arkuszu są równomiernie, na przykład co 40 wierszy umieścić numery?(w m6, m46, m86 itd.) Dodano po 19 No tota M6, przy prawej krawędzi, lub na ilu kolumny w lewo? Numer na każdej stronie powinno być 5 wierszy...
No trochę źle wyjaśniłam o co mi chodzi Wiec Arkusz1 to wzór, tak bym chciała, aby wyglądały wszystkie tabele, ale to rozwiązanie sprawia, ze kopiuje się znacznie więcej wierszy niż jest to potrzebne w danejtabeli (po 1700 tyle ile jest w tabeli źródłowej (tabela źródłowo, może być bez obramowani a i nagłówków, bo i tak dane będę importowane...
W załączniku.
Ciekawa kombinacja :) Trochę nad tym pomyślałem ale wyszło (choć dziwie się że excel nie zgłasza odwołań cyklicznych). Zapewne można to uprościć ale już nie mam czasu. Nie przeraź się :) W c2 wpisz: =JEŻELI(E2="";MAX($C$1:C1)+1;JEŻELI(E2>0...
Sprawdz poniższy kod. Powinno działać ale pisze z pamięci. [syntax=vb]Sub Wstawianie_wierszy() Dim i As Long, OstWrs As Long, k As Long OstWrs = Cells(Rows.Count, 3).End(xlUp).Row 'ile wierszy Application.ScreenUpdating = False For i = OstWrs To 2 Step -1 If Cells(i, 3) <> Cells(i - 1, 3) Then Rows(i).Insert Cells(i, 1) = "zrobione" Cells(i, 3)...
Chodzi o to, by podczas np. edytowania bazy danych, dane wynikowe były uzupełniane na bieżąco . Właśnie z tego powodu proponuje ci funkcje excelowskie a nie makro. To co ci przedstawiłem to pomysł. Wzbij się ponad chmury i spójrz pod innym kątem :). Nie daj się ograniczeniom i spójrz świeżym okiem :) . Bazy (ani dobrze przygotowanych kolumn pomocy)...
Co do numerowania wierszy spróbuj takiego makra: Sub num() Dim w As Integer Dim i As Integer Dim v As Integer Dim k As Integer v = 1 k = 30 'liczba wierszy do ponumerowania For i = 1 To k Step 3 'step liczba powtórzeń For w = i To k ActiveCell.Range(Cells(w, 1), Cells(w, 1)).Value = v 'numeracja od aktywnej komórki Next...
1. Klikam przycisk "Dodaj wiersz" 2. Makro dodaje jeden wiersz nad wierszem sumy zostawiając formatowania komórek. W tym przypadku numeruje z automatu kolejny wiersz w pierwszej kolumnie a drugi pozostawia pusty Uruchom sobie makro które jest w pliku to zobaczysz. Problem mam że przy wstawieniu tego makro i przypisaniu w nim zakresu "Tabela2" i tak...
To ode mnie jeszcze taka propozycja funkcji (założyłem, że pozycje "X" są numerowane od 1, a nie odczytywane z arkusza): [syntax=vbscript]Function ZbierzX2(rZakres As Range) As String Dim wynik, i As Long ReDim wynik(1 To rZakres.Count) For i = 1 To rZakres.Count wynik(i) = IIf(rZakres(i).Value = "X", i, "-") Next i ZbierzX2 = Join(Filter(wynik, "-",...
Załącz jakiś plik przykładowy przede wszystkim. Zamiast od razu dokładnie napisać o co chodzi dałeś przykład na 5 wierszy, a teraz piszesz, że Ci makro wolno działa. To trzeba sprawdzić w którym momencie zwalnia, nie sądzę, żeby powodem było kasowanie w kolumnie B. Zresztą z tego wszystkiego można zrezygnować. Musi być precyzyjny opis, co może być,...
Nie do końca łapię co chcesz zrobić. Makro musi mieć zdefiniowane zakresy i/lub warunki, jeśli ma coś zrobić, Np jeśli w wierszu wystąpi pusta komórka w kol B, to usuń wiersz, usuń n wierszy, usuń wiersze do następnego zawierającego COŚ itp. Napisz ciut więcej lub najlepiej wrzuć przykład (plik Excela jako załącznik).
Witam, serdecznie poszukuje pomocy odnośnie wykonanie Makra, które by czytało dane z tabeli, wstawiało dokładnie jedna dana w dokładnie jedno miejsce oraz drukowało tak przygotowany arkusz oraz numerowało strony od 1 . Chodzi o to by Makro wzięło z tabeli z pierwszego wiersza 3 dane, z każdej kolumny inna wstawiło do następnego arkusza oraz wydrukowało...
Problemów ciąg dalszy.Mianowicie dziś potrzeba zaszła wstawienia nowego wiersza miedzy wiersze już wypełnione w tabeli i powstał problem. Próbuję i Makrem wstawiać nowy wiersz i za pomocą PP i nic.Wiersz owszem się wstawia ale w pierwszych trzech kolumnach nie wstawia mi użytych tam formuł.W kolumnie L,N,O,P formuły wstawiane są normalnie w nowym wierszu.Co...
Witam, funkcja LICZ.JEŻELI w przypadku wykorzystania adresowania bezwzględnego, rozciąganego na pozostały zakres niestety nie daje rady. Excel wyrzuca błąd o braku możliwości wykonania operacji z powodu zbyt małych zasobów pamięci. Sprawdziłem to na milion sposobów, nie działa. Efektywna praca z wykorzystaniem funkcji LICZ.JEŻELI kończy się na 50 tysiącach...
Witam. Mój problem wygląda następująco: Dostaje plik excela w którym są dane z kilku plików pdf. Dane wyglądają następująco: Nagłówek - kilka linijek Dane - tabela numerowana od 1 do różnie czasem do 100 czasem ponad 1000 pozycji. Stopka - kilka linijek Nagłówek itd. Chodzi mi o takie makro które sprawdzi które wiersze mają w kolumnie A liczbę, natomiast...
Szanowni Panowie, miałbym jednak jeszcze prośbę. Opisany przeze mnie sposób z usunięciem makra nie sprawdza się w pełni. Przy importowaniu danych z katalogu X przy użyciu makra cbrman'a i przy usuwaniu duplikatu przy użyciu mojego makra wszystko działa (dodam, że stworzyłem kolejne marko, które numeruje od nowa poszczególne wiersze). Gdy do tego samego...
Cześć Odświeżę ten temat i jednocześnie rozszerzę o informacje. W arkuszu znajduje się kliku stron (do druku), na których są różne informacje. Każda ze stron ma być numerowana (z założenia pierwsza zawsze- na stałe będzie mieć 1, a druga - 2) 1, 2 ,3, itd. Jaką formułę zastosować (najlepiej excelową), aby wybrane strony do druku były numerowane w kolejności,...
To prawda, że nie przemyślałem tego do końca. Sory, za to ale niestety olśniło mnie dopiero teraz. I zapewniam cię że jesteś THE BEST. Dodano po 26 Coś jeszcze jest nie tak z tą tabelą. Jak wykasowałem kol. P-Q w wierszach 4-7 w arkuszu "kontrole" to wyskoczył mi taki komunikat "Run-time error'13': Type mismatch". Klikam w debug i wskazuje mi ten wiersz...
Witam, Mam plik Excela służący jako magazyn. W każdy arkuszu są zapisywane ruchy magazynowe dla każdego produktu w formie tabeli Excela. -w każdym arkuszu jest po jednej tabeli -wszystkie tabele mają dokładnie ten sam układ nagłówków (np. Towar, Cena, Ilość, Jednostka, Suma, Nr FV itp.) ale oczywiście różną ilość wierszy -chcę wstawić pomiędzy nagłówki...
Witam wszystkich forumowiczów Jestem początkującym użytkownikiem vba i natrafiłem na problem, przez który nie mogę ruszyć dalej: Stworzyłem Userforma, który ma za zadanie przenosić wartości z textboxów do kolejnych pustych komórek. Makro działa dobrze, jednak mam problem z numeracją wiersza w pierwszej kolumnie w tej samej linii, w której wprowadzane...
Dzięki, o to chodziło... niestety napotkałem kolejny duży problem. Nie wiem czy to wina Excela 2003,ale okazuje się że w tak przygotowanym arkuszu nie są aktualizowane łącza. W zasadzie miało to działać tak: Wiersze z danymi są zaciągane z zewnętrznych plików, numerowanych od 1 wzwyż, stąd konieczna była zmiana nazw. W przypadku braku pliku excel wyświetla...
Cześć mam napisane takie makro: [syntax=vbnet] Sub Usun_Etap() Dim rob As String rob = Selection.Address If Left(Range("A" & Range(rob).Row), 4) = "Etap" And Right(Range("A" & Range(rob).Row), 6) <> "razem:" And Left(Range("B" & Range(rob).Row - 1), 4) <> "STAN" Then Call Usun_Wiersz Do Until (Range("A" & Selection.Row) Like...
Cześć, Jestem początkujący w VBA, ale porwałem się, by przygotować skoroszyt obsługujący raporty kasowe i druk KP w szkole muzycznej. W załączonym pliku nie wiem jak napisać taki skrytp: W arkuszu "dane" wpisuję kwotę, którą za dany miesiąc wpłacił uczeń np. w komórce J8, i pozostawiam tę komórkę zaznaczoną. Uruchamiam makro, które przykleja do odpowiednich...
...W pliku który mi przesłałeś nie wiem czemu ale nie ma żadnych przycisków do makr ... Bo i być nie powinno ... w zamyśle miało być menu " KOSZTORYS " i takie w tych " Dodatkach " widać - w teorii, jak się je kliknie, powinno pokazać coś takiego jak poniżej na drugim obrazku - wygląd w starym excelu: 838683 838684 ... Zauważyłem, że: 1. jak dodaje...
Dzień dobry, Dziękuję za wyjaśnienie w kwestii sumy liczb nieujemnych. Tak jak myślałem, chodzi o to, żeby co najmniej jedna wartość była niezerowa, więc jeśli liczby są nieujemne, właściwym kryterium jest suma. Formuły z ostatniego postu znowu nie rozumiem, bo w tej wersji, którą Pan załączył w komórkach B166 i C166 nie ma żadnych liczb. Ale zostawmy...
powinien pozostać tylko jeden wiersz z zsumowanymi danymi liczbowymi i tym numerem. A jeśli będzie więcej tych samych numerow? np. 1.1.15.202 , 2.3.11.204 Dlaczego nie zrobić tabelę przestawną?
Witam.Potrzebuję zmienić funkcje tego makro aby sprawdzało 6 pierwszych znaków numerów w kolumnie i nie usuwało podobnych(teraz nie kasuje tylko identycznych .Czy ma ktoś pomysł jak to zrobić? Sub wyszukaj_numery() ' ' wyszukaj_numery Makro ' ' Otworz plik z lista numerow Workbooks.Open Filename:="C:\Users\lista numerow.xls" ' Policz niepuste wiersze...
ldir31, high((at)xlat) ld x,(at)wiersz loop: ld r30,x lpmr30,z ld x+,r30 or r30,r30 brneloop Na atmelku cały kod może wyglądać tak. I co powiesz o "lpm", czy nie działa dokładnie jak xlat ;) Podobnie, ale nie dokładnie, tablice muszą zaczynać się pod określonym adresem (podzielnym bez reszty przez 256), a w xlat jest dowolność. I tak trzeba...
Właściwie potrzebuję takie proste makro, gdzie częściowo już sobie wymóżdżyłem jak poniżej: Dodano po 5 "E" ponieważ data, akuratnie znajduje się w tej kolumnie, "w" to wiersz (zaczynamy numeracje od drugiego) Pewnie wasze oczy :shocked!: :shocked!: widzą więcej niż tu napisałem :flasingsmile:
Cześć, potrzebuje napisać makro VBA w Excelu które: - będzie otwierać wszystkie pliki *.xlsx w katalogu w którym znajduje się uruchamiany plik skoroszytu (ew. będzie można wskazać kilkanaście plików w oknie wyboru) - z każdego pliku zostanie skopiowany zakres $$ i doklejony do arkusza "zaimportowane" w pliku w którym jest makro - po zaimportowaniu wszystkich...
Witam Jestem niestety początkującym użytkownikiem Excela Szukam makra w VBA które pomoże mi skopiować ostatni wiersz razem z formułami które są w wybranych kolumnach i arkuszach. Stworzyłem arkusz w którym używam kolumn A-S, mam 24 wiersze, chciałbym aby w momencie wypełnienia ostatniej kolumny J w wierszu 24 doszło do skopiowania i powielenia do wiersza...
numerowanie wierszy numerowanie wierszy kolumnie numerowanie wierszy excel
katalog rosyjski tyrystor głośniki creative t3300 wzmacniacz kablówka
układ 5218a fotowoltaika samodzielna instalacja
Przerywanie silnika na niskim gazie w Oplu Corsa C Dopisanie kluczyka do BMW X3 E83 EWS 4.3