Spróbuj takiego makra: [syntax=vbscript]Sub Powielanie() Dim ile As Long, w As Long w = 1 Do With Cells(w, 2) ile = .Value .ClearContents .Offset(1, -1).Resize(ile - 1, 2).Insert xlShiftDown .Offset(0, -1).Resize(ile, 2).FillDown w = w + ile End With Loop Until Cells(w, 2) = vbNullString End Sub[/syntax] Makro działa w arkuszu aktywnym zgodnie z przedstawionymi...
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...
Witaj Odpal to makro [syntax=vb] Sub popraw() Dim bs As Range, r As Long Set bs = Sheets(1).Range("A:C").Cells r = 2 While bs(r, 1) <> Empty If (bs(r, 1) = bs(r + 1, 1)) And (Month(bs(r + 1, 2)) - Month(bs(r, 2)) > 1) Then bs.Rows(r).Copy bs.Rows(r + 1).Insert Application.CutCopyMode = False bs(r + 1, 2) = DateSerial(Year(bs(r, 1)), Month(bs(r,...
Spróbuj z kopiowaniem w pętli. Przykład w załączniku. Edit: Zacznij od Range.Clear (po With), przeoczenie...
Zazwyczaj funkcja powinna zwrócić wartośc Spójrz w pomocy VBA przykład funkcji(Help - Writing a Function Procedure) Twoja funkcja nie zwraca żadnej wartości.
Witaj [syntax=vb] Sub InsSubtot() Dim bs As Range Set bs = ThisWorkbook.Sheets(1).Cells Dim r&, rp& ow = bs(Rows.Count, 8).End(xlUp).Row r = 2: rp = 2 While bs(r, 8) <> Empty r = r + 1 If bs(r, 8) <> bs(r - 1, 8) Then bs.Rows(r).Insert bs(r, 5) = "SUMA" bs(r, 6) = Application.Sum(Range(bs(rp, 6), bs(r - 1, 6))) bs(r, 5).Resize(1,...
Zdaje się, że dla każdego powiatu musisz mieć osobne procedury dla przycisków. W przykładzie makro "orientuje się" po nazwie miasta wpisanej w komórce zakrytej przyciskiem.
zdecydowanie początkujący Ale pomoc podręczna mimo wszystko jest dostępna ... :-) A z tym poniżej, jak działa ? [syntax=vba]Option Explicit Private Sub Workbook_Open() Dim ark As Worksheet For Each ark In ThisWorkbook.Worksheets(Array("Inne", "Beton, pompy", "Stal", "Elementy murowe i zaprawy", "Kruszywa", "Szalunki", "Sprzęt", "Żurawie", "Kontenery",...
Ja po prostu nie wiem o co Ci chodzi.:)
Myślę, że najlepsze wyniki czy nie od końca, ale od początku [syntax=vb]Sub Wstawianie_wierszy() Dim i As Long, r As Long, c As Long Application.ScreenUpdating = False i = 2 r = i While Cells(i, 11) <> Empty If Cells(i, 11) <> Cells(i + 1, 11) Then Rows(i + 1).Insert For c = 5 To 7 Cells(i + 1, c + 3) = Application.WorksheetFunction.Sum(Range(...
W takim razie załącz plik bez kodu, żeby można było dodać kod. P.S. Dlaczego kolumna A jest pusta? Skoro tak ma być, to prosimy o przykładowy plik...
https://obrazki.elektroda.pl/4586766500_... Widzę, że się udało. W załączniku przykład tabeli Excela. Jeśli tabela ma wiersz podsumowania, to wstawianie nowych wierszy odbywa się tabulatorem w ostatniej kolumnie tabeli. Można też wstawiać wiersze w środku tabeli z menu podręcznego (PPM) lub ze wstążki. Filtry z tabeli można usunąć...
w przykładzie zeszyt3 [syntax=vb]Sub Wstawianie_wierszy() Dim i As Long, OstWrs As Long OstWrs = Cells(Rows.Count, 1).End(xlUp).Row 'ile wierszy Application.ScreenUpdating = False For i = OstWrs To 2 Step -1 If Cells(i, 1) <> Cells(i - 1, 1) Then Rows(i).Insert Next i Application.ScreenUpdating = True End Sub[/syntax] A tu kod z nazwą - ale nie...
Zobacz tak: [syntax=vbscript]Sub Kopiuj_MG() Dim x As Long, n As Long Application.ScreenUpdating = False Sheets("Arkusz1").Select x = 2 Do While Range("A" & x).Value <> vbNullString If Cells(x, "C") > 1 Then Range("A" & x & ":C" & x).Copy n = Range("C" & x).Value Range("A" & x & ":C" & x + n - 2).Insert xlShiftDown...
Witam [syntax=vbscript]Sub zamianki() Dim kom As Excel.Range Application.ScreenUpdating = False With Sheets("L-ki") For Each kom In .Range("c3:c70") If kom.Value <> "" Then Sheets("R-ki").Cells(kom.Row, "E") = Range("C" & kom.Row).Value End If Next kom End With Application.ScreenUpdating = True End Sub[/syntax]
to sobie zobacz: [url=https://www.youtube.com/watch?v=ash...
Tak to jest, jak się zmienia koncepcja w trakcie pisania kodu.:) [syntax=vbscript]Sub Sciezki() Sheets("Archiwum").Select q = 3 nw = Sheets("Sciezki").Cells(Rows.Count, "A").End(xlUp).Row + 1 While Cells(q, "T") <> "" a = Split(Cells(q, "T"), ";") If UBound(a) > 0 Then For y = 0 To UBound(a) Range("A" & q & ":T" & q).Copy Sheets("Sciezki").Range("a"...
Coś źle wpisujesz. Przy wstawianiu wiersza powyżej formuły, zakresy zmieniają się...
To zrób tak: 1. Posortuj obie listy po nazwisku (trzymajmy się tego przykładu). 2. Przebiegasz pętlą po 1 liście aż do napotkania różnicy i wtedy: 3. Wstawiasz brakujący wiersz w odpowiedniej (warunek większe lub mniejsze - obie listy są posortowane) liście. Musi zadziałać. Nie mam czasu myśleć nad przykładem - mam spotkanie.
Dzień dobry, Mój problem jest następujący Mam arkusz "A", gdzie z jednej zakładki importuję przy pomocy IMPORTRANGE do arkusza "B" zakres A2:E. W arkuszu B w kolumnie F przypisuję wartości i te wartości wpisywane są ręcznie i nie ma w tej kolumnie żadnej formuły. Problem zaczyna się gdy w arkuszu "A" musze wstawić wiersz. W tej sytuacji w arkuszu "B"...
Jak dodajesz wiersze do tabeli, to zawartość wierszy pod spodem przesuwa się w dół, ale wysokości wierszy pozostają bez zmiany (nie przesuwają się). Jest tak dlatego, że poza obrębem tabeli (w innych kolumnach) może być inna zawartość wymagająca innej wysokości wierszy. Żeby przesunąć wszystko w dół wraz z wysokościami wierszy trzeba wstawiać całe wiersze....
Witajcie, przychodzę z kwestią zawiłą w moim mniemaniu, znalazłem rozwiązania poszczególnych etapów zadania, stworzyłem formuły, kopiuję je i mam czego potrzebuję, jednak nie potrafię połączyć tego w makro a wykonywanie pojedynczych czynności x 1000 jest pracochłonne o istnieje ryzyko błędu. Gdyby była to kwestia jednorazowa to nie poruszał bym w ogóle...
Pętla, podstawianie (replace), porównywanie długości ciągów (len), rozbijanie ciągów (split), podstawianie, porównywanie, rozbijanie, itd. W zależności, czy warunek spełniony wstawianie wiersza, dodanie wartości, mnożenie *10, lub przepisanie. Mnóstwo kombinacji, ale do zrobienia.
Wstawiasz wiersz w środku formuły i po kłopocie.
Nie wiem jakie w ogóle planujesz operacje w tym pliku. W kolumnie A masz wpisaną numerację, więc nie brałem pod uwagę wstawiania/usuwania wierszy. W tej chwili zmieniłem to w ten sposób, że jeśli operacja dotyczy komórek całego wiersza lub więcej, to nie jest zapisywana do historii.
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,...
Witam, mam problem z makrem. Potrzebuję aby makro wyszukiwało mi w kolumnie zmianę liczb. Np. mam w kolumnie F liczby: 1 1 1 2 2 2 3 4 5 5 5 6 chcę aby makro przeszukiwało mi kolumnę i jeżeli jest zmiana cyfr wstawiało wiersz prze liczbą i tak by to wyglądało: 1 1 1 2 2 2 3 4 5 5 5 6 czy da się coś takiego zrobić??
Czy wiesz, że w "Arkusz2" prawdopodobnie w wyniku kopiowania, wklejania a następnie usuwania wierszy jest ponad 500 przycisków o nazwie "CommandButton1"? Kiedyś był już podobny temat poruszający ten problem. Kopiowanie i wstawianie wiersza z przyciskiem działa OK, ale usunięcie wierszy powoduje układanie się obiektów w stosik, z których widoczny jest...
Excel niestety kaleki jest w opcję "suma strony". Też próbowałem swego czasu z hPageBreacks.count i hPageBreacks(n).Location, ale ja swoje a Excel swoje... Sposobu nie znalazłem. Jeżeli zmuszony jestem do sumowania stron w przypadku długiej tabeli, to przełączam do widoku "Układ strony", wstawiam wiersz na dole strony i sumuję zakres. Na nst. stronie...
Obawiam się, że tego nie rozwiążesz tak jakbyś chciał. Chyba, że z pomocą VBA. Excel stosuje tu zwykły mechanizm modyfikacji adresów jak w przypadku formuł. Nie ma tu znaczenia, czy adresy są z dolarami czy bez. Dolary odgrywają rolę tylko przy kopiowaniu. Najprościej unikać wstawiania wierszy na górnej granicy obszaru. Gdy wstawiasz nowy wiersz w miejscu...
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...
Sorki, że milczałem do teraz, ale byłem "trochę" zajęty ;) W przykładzie wstawianie ramki poniżej tej, w której naciśnięto przycisk. Uwagi wymaga sposób wyliczania wartości zmiennych. W arkuszu ramka ma wysokość 4 wierszy, jest 1 wiersz nagłówkowy. Nr wierszy, gdzie nastąpi wstawianie nowych dla następnej ramki to: 6, 10, 14, itd Kluczowe jest wyliczenie...
Ten plik, który pokazałeś jako wzór ma zupełnie inną strukturę i raczej trudno go dopasować do Twojego nowego pliku. Szkoda, że nie ma w nim żadnych danych, żeby zweryfikować czy formuły kopiują się poprawnie. Poza tym nie wiem, czy tak jak w pliku wzorcowym istotne jest wstawianie wierszy, czy wystarczy samo kopiowanie. W pliku wzorcowym były podsumowania,...
Witam Chciałbym aby makro wstawiało wiersz. [syntax=vbscript] Range("B2").Select Selection.EntireRow.Insert [/syntax] ale to działa gdy jestem w danym arkuszu, a ja bym chciał coś takiego zrobić aby będąc w "Arkusz1" i na podstawie danych z tego arkusza stworzyć nową tabele w nowym arkuszu "Arkusz2" I to jakoś mi nie chce zadziałać (nie mogę składni...
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...
czy są w ogóle w excelowskim vba jakieś komendy służące do rysowania tabel? Nagraj makro wstawiania tabeli to się przekonasz :) W sumie to jedna, dwie linijki, gdzie zakres jest typu string, więc łatwo podstawić wartości ze zmiennych. Jeśli ilość kolumn i nagłówki są stałe można wyrysować tabelkę z jednym wierszem i wstawiać kolejne, wplatając polecenie...
W kolumnach L,N,O,P masz "normalne" formuły, które odwołują się tylko do danych z bieżącego wiersza. Takie formuły można kopiować bez ingerencji w inne formuły. Excel nie ma problemu z ich kopiowaniem. Jeśli chodzi o formuły z kolumn A i C, to one zawierają odwołania do innych wierszy i przy wstawianiu wierszy (a także usuwaniu) Excel nie wie, do czego...
w miejsca w których powinny być, czyli w miejscach w których pojawiają się w drugim arkuszu Jak makro ma to ocenić? Co z wierszami bez indeksu w A? Myślałam żeby znaleźć te wartości z prawda i ich indeks minus 1 wtedy indeks plus 1 wstawić pusty wiersz i wstawiać wiersze
Wstawiam nowe logi
Tak istnieje taka możliwość, datagridview.oncellcontentclick lub onclick lub onmouseclick, onmousedoubleclick, mouseup, jest kilka zdarzeń gdzie można by to wywołać. Np przy zdarzeniu oncellmouseclick, jeśli index kolumny =-1 i nacisniety przycisk myszy to prawy przycisk, to pokaż contextmenustrip z dwoma przyciskami, pierwszy wstawia wiersz z indexem...
licznik ustawiłem, co 3 wiersz wstawia mi pusty wiersz, tylko nie mam pojęcia jak te sumy zrobić. Jakie zapytanie żeby pobrał z dwóch poprzednich sumę.
Dalej jest to nieprecyzyjne, ale domyślam się, że chodzi o coś takiego (wersja dla polskiego Excela) =JEŻELI(ORAZ(A15=1;J15=1);&q... niż raz w tyg., kobiety";"") Formułę wstawiasz w wierszu 15 w wybranej kolumnie, gdzie ma pojawić się tekst, i powielasz w dół.
w tabeli znajdującej się w Arkuszu1 odnajdywany byłby wiersz zawierający "XYZ", a nastepnie wiersz ten byłby wstawiany do Arkusza2 w tych samych adresach komórek czasem wstawi w wiersz odpowiadający adresowi wiersza z źródłowego arkusza A więc w ten sam adres, czy do nowego wiersza? PS. Niestety funkcje się nie sprawdzą bo ja potrzebuje skopiować wartości,...
Racja, zapomniałem o tym napisać. Takie przypisanie [syntax=c]**pictab = pictabcreator(3, 4);[/syntax] to w zasadzie to samo co [syntax=c]pictab[0][0] = pictabcreator(3, 4);[/syntax] Przy okazji: usuwaj pierwszy i ostatni pusty wiersz kodu przy wstawianiu na forum.
Robisz pętlę od 1 do 1000, w pętli dwie zmienne N i M wskazujące aktualny numer wiersza dla kolumny A i kolumny B, bierzesz wartość z komórki której adres to kolumna A i wiersz N, wpisujesz ją do komórki, której adres to kolumna B wiersz M, zwiększasz N o 1, a M o 3 i tak do końca pętli. Wszystko w małym kodzie.
Co definiuję nie tak w powyższej pętli. [syntax=vbscript]Sub nazwiska() Dim i As Integer Dim j As Integer Dim ostWrs As Integer Dim Nazwisko As String ostWrs = Range("A65536").End(xlUp).Row For i = 79 To ostWrs Step 93 For j = 79 To ostWrs Step 1 Nazwisko = Range("C" & i).Value Range("CM" & j) = Nazwisko Next Next End Sub[/syntax] Zadaniem makra miało...
Oczywiście. Ten kod wstawia jedynie nowy wiersz.
nagralam makro ale nowy wiersz wstawia mi sie zawsze pod wierszem 29 a chcialbym aby kazdy nowy wstawial sie na koncu
Cześć, mam problem z utworzeniem makra do podanego przeze mnie pliku. Otóż znajdują się tam trzy arkusze: Dane, Dane(2), Do uzupełnienia. W arkuszu Do uzupełnienia potrzebowałbym rozwiązania, aby pobierając dane z arkusza Dane (2) w odpowiedni sposób wstawiać nowe wiersze, pomiędzy stare tak aby nie trzeba było szukać miejsc w arkuszu Do uzupełniania...
Nagraj makro usunięcia scalenia, wstawiania wiersza, ponownego scalenia i zapętlij...
próbuję i nie wychodzi If, For, Case itd nic same nie mówią, jak nie pokażesz nam swojego kodu.
Podpowiadam. Dim i As Long Const max = 20 ' w zależności od liczby wierszy 'lepiej ustalić liczbę wierszy szukając ostatniego Application.ScreenUpdating = False 'w przykładzie dane są od pierwszego wiersza For i = 1 To max * 2 Step 2 'wstawiany jest co drugi wiersz więc max * 2 ActiveSheet.Rows(i + 1).Insert 'wstawimy pod źródłowy 'tutaj przypisujesz...
Nie bardzo rozumiem co z tym "Znacznik" :( W każdym razie linia, w której znajduje się kursor: Ln = Selection.Range.Information(wdFirstChara...
Doczytałem jeszcze, że wszystko odbywa się w tym samym arkuszu. W takim przypadku musisz zagnieździć dwie pętle. Zewnętrzną Do...Until z inkrementacją wiersza, gdzie warunkiem będzie niepusta komórka i wewnętrzną For...Next również ze zwiększaniem indeksu wiersza. Taki szybki przykład "pisany na kolanie"[syntax=vb]wrs = 1 Do While Cells(wrs, 1) <>...
Aha, rozumiem... W takim razie musimy ustalić min. i max. godzinę dla każdej "grupy". Poniżej "dopiski" do istniejącego kodu. Najpierw kolejny błąd który znalazłem :) Dla grupy B pomija jeden dzień z zapisu, brakuje +1 we 2 miejscach we fragmencie: dwóch miejscach dostawmy 1 linijkę kodu: [syntax=vb]'przepisanie typu informacji With .Cells(wiersz, 1)...
(at)PRL już tłumaczę 1. W arkusz BAZA wklejam dane. 2. Uruchamiam makro 2.1 Makro ma zadanie sprawdzić kolejność liczb 2.2 Jeżeli znajdzie brakującą liczbę/liczby to wstawia w ten arkusz "BAZA" nowy wiersz/wiersze i w ten nowy wiersz/wiersze wstawia brakującą liczbę/liczby i zaznacza na kolor zielony 2.3 wstawione liczby przenosi do arkusza"brakujące"...
Cześć, Chciałbym się przywitać jako nowy użytkownik bo zapomniałem starego loginu i hasła :) Mam problem z tabelką. Otóż chcę w arkuszu zrobić kilka list rozwijanych. Chciałbym, aby po każdym dodaniu kategorii w liście, wstawiał się pod spodem nowy wiersz w tabelce. Wiem, że teraz mogę rozszerzyć tabelkę ale wtedy "zje" mi wiersze poniżej. Innym rozwiązaniem...
Twój opis niestety nie jest jednoznaczny. Tutaj duplikaty są grupowane po wartości z kolumny A, i dla każdego nowego wyrazu (z kol. A) wstawiany jest kolejny wiersz. Czy tak pogrupowane zestawy duplikatów, zamiast wstawiania do nowego wiersza, mają być kopiowane do kolejnej wolnej kolumny pierwszego wiersza? Załącz proszę przywołany plik z uzupełnionym...
Tak i nie, zależy co rozumiesz przez pojęcie nie po kolei ? Czy dla Ciebie: [syntax=div] 1 2 4 6 8 9 23 67 89 [/syntax] jest nie po kolei. Generalnie silnik bazy danych liczy ilość wstawionych wierszy i pamięta zawsze nr ostatniego rekordu i inkrementuje go przy każdej operacji wstawiania nowego rekordu. Zauważ, że jeżeli wstawiasz wiersz o id= 6 potem...
Chyba warunkowe wstawianie wierszy (komórek) byłoby najwygodniejszym rozwiązaniem.
Witam. Proszę o pomoc. Chciałbym się dowiedzieć czy jest taka możliwość, żeby przeszukiwać wiersze Excela i następnie w puste komórki za pomocą VB.net wstawiać wartości. Jeśli jest taka możliwość proszę powiedzieć jak to zrobić????
Dla 3-go wiersza, od argumentu WIERSZ() musiałbyś odjąć ilość wierszy nagłówkowych. Np WIERSZ(A3:A10)-2. Aby "uodpornić" formułę na wstawianie/usuwanie wierszy najprościej jest podstawić funkcję... WIERSZ Wtedy: WIERSZ(A1:A8)+1-WIERSZ() w pierwszym wierszu, zwraca to samo co: WIERSZ(A3:A10)+1-WIERSZ() w trzecim.
Witam Jak wspomnieli Koledzy wyzej, nie powinien Ci byc w ogole string tu potrzebny - ale faktycznie czasami moze to byc przydatne - mialem podobnie gdy robilem swoj edytor ;) Gdy tworzysz string, pomiedzy poszczegolne wiersze wstawiasz Chr(13) + Chr(10) albo prosciej #13 + #10 :) string_wynikowy := wiersz1 + #13#10 + wiersz2; Pozdrawiam :)
Przecież już dwa razy pisałem! Do ListBox1 od razu (przy jego wypełnieniu) wstawiaj wiersze już podzielone na Nazwę i Ścieżkę
Próbowałem już przenieść bazę do MS Access niestety nie pasowało w obrabianiu i wyświetlaniu danych :/ A raczej czasu zabrakło. Minusem był brak wstawiania wierszy w tabelę a często sprzęt jest np. przenoszony i wiersz z nim nie może znajdować się na końcu tabeli :(
Bardzo dziękuje za pomoc. A gdybym chciał by taki wiersz gdy wstawiamy pracownikowi datę zwolnienia nie tylko był ukryty ale przenosił sie do innego arkusza by mieć listę zwolnionych
w jaki sposób opisać wstawianie danych "sql'el" do bazy, ale tak zeby dane wstawiane były sprawdzane z danymi juz istniejacymi (chodzi o wiersze) i jesli wiersz z identycznymi danymi istnieje - now dany by nie były dopisywane Zamykam. - arnoldziq
Problem w tym że nie wszystkie komnórki są zczytane do głównego raportu. Przykładowo: wczytuje pytania 1,2,3, (4 pomija), 5, (6 pomija) itd. tabela przestawna zrobiona jest tylko z tego co wcześniej wczyta do zakładki. Dodano po 16 Prawdopodobnie znalazłem przyczynę: przy dodawaniu nowych pytań wstawiałem nowy wiersz. Tych wierszy właśnie nie widać....
Oki, tylko że jeśli postawisz kursor w danej tabeli, to masz już z autoamtu przygotowany pusty wiersz do wprowadzania danych, tak działa lista-tabela. 912568 1. Czy chodzi ci zatem o to, żeby prócz tego wiersza z gwiazdką, makro wstawiało dodatkowy pusty wiersz, jako "kolejny" (wtedy będą dwa puste, w tym jeden z gwiazdką) ? 2. Czy wystarczy może tylko,...
Cześć, nie znam języka Visual Basic, ale w związku z moją pracą na arkuszach exelowskich potrzebuję stworzyć makro, które automatycznie dodaje mi wiersz ze skopiowanymi niektórymi danymi z wiersza powyżej. Makro ma działać na tej zasadzie, aby po zmianie wartości na 1 w każdej komórce w kolumnie AG (na chwilę obecną ma zakres od 11 do 14, ale docelowo...
Ustaw zaznaczanie calego wiersza w DataGrid zamiast pojedynczych komórek. W jedną z kolumn wstawiaj klucz główny tabeli z pracownikami, dodaj np. przycisk Usuń i po jego wcisnieciu odczytaj ten identyfikator z zaznaczonego wiersza tabeli i wykonaj na bazie zapytanie DELETE FROM .... WHERE ..... = wartosc.
Jak wciskasz enter, to w tym miejscu wstawiany jest znak nowego akapitu. Można taki znak wyszukać i zamienić na coś innego. Trzeba w pomocy office poszukać jak reprezentowany jest znak nowego wiersza/akapitu. W openoffice w polu wyszukiwania wstawia się /n i można znaleźć akapity. W polu "zamień na" można wstawić spację. /t powinno oznaczać tabulator...
Musiałbym mieć tylko pustą kolumnę tak? Żeby 2x Klikać? Bo tam będę wstawiał dodatkowe wiersze. Nie jest to stała tabelka. Rosnąco numerami do góry.
ok czyli muszę jakby podać w tym obszarze kolejno te 487426048 potem 974850048 i następnie 1462274048 i do tego trzy obrazy ekranu. Ok jak wróce z pracy zrobie to i wkleje na forum , pozdrawiam Dodano po 5 kurde nie moge tego załaczyc bo jak robie kopie tych sektorow to ten plik ma wiecej niz 50mb ;/ nie wiem czy cos zle robie? w wiersz pierwszy sector...
Dzień dobry, Nie wiem czy o to Panu chodziło, ale rozwiązanie wydaje się dość proste. Po zastosowaniu formuł jak w przykładzie puste wiersze można zamaskować filtrem (tak chyba najprościej).
Podmieniłem makro zgodnie z sugestią, niestety działanie nadal jest niepoprawne - mimo "użytych" tylko 5 wierszy z zakresu H5:H14 w dalszym ciągu wstawia 5 wierszy z danymi a kolejne 5 wierszy pustych. Załączam przykładowe pliki
(at)robgold to pewnie podkradnę całe linki do tych banków, a swoje zostawię na kiedyś tam. Zawsze mnie irytowało jak miałem to posprzątać, więc dzięki, że mnie wyręczyłeś. Pytanie, czy zostawiłeś wszystkie działające stacje? Ogólnie chciałem odstrzelić wszystko poniżej 128kb/s? Dobra robota! edit. w bankach od nr 10 do 16 musiałem skasować jedną spację...
Function zapas(tydz, wiersz) Application.Volatile 'Excel 2k7 'Application.Volatile = True 'Excel 2k 'trochę tu latania po arkuszu :) 'szukam wiersza zawierającego tekst wt = Cells.Find(what:="Dni robocze", lookat:=xlWhole).Row 'określam pierwszą kolumnę z wielkością produkcji / zółta tabelka zKol = tydz - Range("C5")...
Nie jest potrzebne makro. Wystarczyłaby funkcja SUMA.WARUNKÓW, gdyby nazwy z listy "typ_aktywności" były zgodne z nagłówkami tabeli (wiersz Nr2 arkusza "Rozliczenie tygodniowe"). Chodzi o Np "spotkania" / "spotkanie" etc.
Temat jest bardzo popularny, poszukaj na google pod hasłem C# datatable export csv , znajdziesz gotowe przykłady. Skoro dane masz już pobrane do tabeli, to nie lepiej eksportować tabelę? Zwykły zapis do pliku tekstowego + dwie zagnieżdżone pętle: foreach po wierszach tabeli, a dla każdego wiersza pętla foreach po kolejnych komórkach, a w odpowiednich...
makro które będzie na podstawie porównania wiersza i kolumny wstawiało znak " "X" Makro VBA można wykorzystać do automatyzacji wielokrotnie powtarzanych czynności w aplikacjach Office :idea: Nie przedstawiłeś kolego żadnych plików, ani żadnych informacji, które wskazywały by, że w Twoim przypadku istnieje jakakolwiek możliwość zastosowania kodu VBA...
Są jeszcze funkcje INDEKS, PODAJ POZYCJĘ i kilka innych, które dałoby się wykorzystać. Oczywiście wiąże się to z liczeniem wystąpień, kolumną pomocniczą i dodatkowym arkuszem wynikowym. Jeśli kolega ma na myśli zautomatyzowanie czynności, to zagnieżdżone pętle z licznikiem wstawianych wierszy, porównywaniem, przypisywaniem, etc. Kilka przykładów podobnych,...
Witaj. Czy przemyślałeś do końca temat? W jaki sposób są te liczby cyklicznie zmieniane? Ręcznie, czy są one generowane innym makrem, albo funkcją na podstawie formuł? W jaki sposób chcesz uruchamiać makro? Ręcznie dla całego arkusza? Ręcznie dla jednej komórki? Automatycznie po zmianie wpisu w komórce? Jeśli będziesz wykonywał dla całego arkusza, to...
Warunek w procedurze już jest, więc wystarczy zamiast Exit Sub dopisać wstawianie wiersza (nagraj rejestratorem) oraz z lekka skorygować resztę. Przyjmij zasadę "Od procedur są moduły i koniec", stąd moja uwaga o kropkach w argumentach Range ;) W kodzie arkusza zapisuje się procedury zdarzeniowe i makra kontrolek umieszczonych w arkuszu, lub jeszcze...
Dzięki, działa super. Jakie wprowadzić zmiany, żeby dane wejściowe będą analizowane od 4 wiersza kolumny B w jednym arkuszu i wstawiane od 6 wiersza kolumny C innego arkusza?
Cześć wszystkim forumowiczom, Potrzebuję makra/innego rozwiązania w Excelu. Chciałbym, żeby w momencie wstawiania nowego wiersza do tabeli: 1) aktualizowała się l. p. 2) aby formuły w pozostałych wierszach (również formuły na polach ukrytych) zmieniały się kolejno "obejmując" inne komórki. Najłatwiej byłoby mi to pokazać np. na Teams poprzez udostępnienie...
Witam mam problemik z Excelem. Mam np dane w kolumnie A w kolejnych wierszach np 1,1,2,3,3,3,4,5,5,5 czy jest jakas formuła która z automatu porównała by te dane i przed każdą zmianą danych wstawila pusty wiersz aby pozniej wygladalo to tak 1,1 pusty wiersz, 2 p[usty wiersz 3,3,3, pusty wiersz 4 i tak dalej? Z gory dzieki za pomoc
Naprzemienne kolory zrealizujesz formatowaniem warunkowym. Formuła: =MOD(WIERSZ();2)=1 Co rozumiesz pod pojęciem A po kolejnym użyciu nie kopiowało nagłówka tabeli tylko wstawiało wyszukane rekordy Z nagłówkiem nie ma problemu, wystarczy sprawdzić czy jest i kopiować warunkowo (gdy nie ma). Natomiast nic nie wiadomo co to za "wyszukane rekordy".
Tutaj masz tablicę n*n, następuje przejście po każdym elemencie, czyli złożoność kwadratowa O(N^2). BTW. Tamto wypisywanie na ekran można by robić jednocześnie przy wstawianiu elementów do tablicy (za if-else-if).
Błąd wynikł z niezgodności użycia elementów tablic z ich wcześniejszą deklaracją. Na początku tablice zostały zadeklarowane jako tablice z jednym wierszem; np Int16 tabX[1][6]; więc kompilator przygotował dla tych tablic określoną pamięć, a w potem w programie wywołuje się drugi wiersz tablicy tabX [1] [j], gdyż jak wiadomo elementy tablicy zaczynają...
Witam serdecznie. Uprzejmie proszę o pomoc w stworzeniu Makra (funkcji ?) importującego wybrane dane z innego arkusza Excel. Mam Plik_A.xlsm z tabelą, którą chcę wypełnić wybranymi danymi z Plik_B.xls. Chodzi konkretnie o import danych z kolumny Imię i Nazwisko Pacjenta, Adres Pacjenta i PESEL Pacjenta. Plik_B jest generowany automatycznie z programu...
To wstaw proszę Cię tą formułę co napisałeś do excela w wierszu np. 1, i sprawdź jej zachowanie wstawiając wiersz przed wierszem 9.
Witam. To nie działa. Przy wstawianiu nowego wiersza znikł jeden obrazek... Wszystkie wstawiane poprzez wstaw obraz z pliku i zakotwiczone do komórki. Zauważyłem też że można je przeciągnąć poza komórkę a nie powinno sie tego dać rady zrobić. Ok nie znikł schował się pod innym... ten program to jakaś masakra. Zmienia mi też polskie znaki na krzaczki...
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...
Czy da się to zrobić bez zamieniania obszaru na tabelę Excela? Da się, ale jest z tym więcej zachodu, a za chwilę będziesz znowu coś zmieniać i znowu będziesz pytać. Jaki masz problem z tabelą Excela? Ona jest bardzo elastyczna, jak dopisujesz wiersze, to formuły się automatycznie kopiują, można ją dowolnie formatować, nawet tak, że prawie jej nie...
Dzień dobry, Jaka kompletna świeżynka w VBA i proszę o pomoc. Próbuję napisać makro, które będzie wstawiało pusty wiersz, jeśli w kolumnie E znajdzie pełną komórkę. Ten pusty wiersz ma wstawić pod wierszem, w którym znajduje się ta pełna komórka. Napisałam coś takiego: [syntax=vbscript] Sub Wstawianie_Wiersza() Dim BL As Range Dim xCell As Range Set...
Powyżej zostało to opisane, tak jak na screenie usuwamy czerwoną - wpierw i później wstawiamy zielone https://obrazki.elektroda.pl/8533726400_...
Witam! Proszę forumowiczów o pomoc. Jak przerobić następujące makro znajdujące się w załączonym pliku tak, żeby: 1) Przycisk [Dodaj] umieszczał w tabeli poniżej określoną w komórce M6 liczbę wierszy o treści wpisanej tak jak w komórkach B6:K6 2) Obecnie przy dodawaniu wpisów w kolumnach C oraz F makro wstawia puste pola, a ma wstawiać dane z wiersza...
Zakładam, że w każdym wierszu będą dwie kontrolki zależne. W Excelu 365 na karcie Wstawianie znajduje się pole do wstawiania tych kontrolek. [syntax=text]Wstawianie > Kontrolki > Pole wyboru[/syntax] Aby wstawić kontrolkę należy zaznaczyć komórkę (lub komórki) i kliknąć przycisk. Standardowo kontrolka jest powiązana z komórką, a w tej komórce...
20 par 'Date' i 'Price' dla różnych akcji) Trza było tak od razu :) :arrow: Marek003 Spróbowałem po Twojemu. Swoją drogą: dlaczego obrabianie pojedynczej kolumny trwa sekundę a tej samej kolumny, tym samym makrem z zapisanymi 39 innymi kolumnami trwa siedem razy dłużej? Być może jest to problem z jakimś obszarem pamięci lub http://obrazki.elektroda.net/25_12784384...
wstawiać wiersz excel wstawiać puste wiersz excel makro wstawiać wiersz
eminence odwrotka citroen uszkodzi radio żywica zalać
Sterownik Curtis błąd 1/3 - silnik kręci w jedną stronę Demontaż głośników tylnych w Peugeot 307 CC - instrukcja krok po kroku