Czyli wstawianie arkusza opanowane. Teraz mamy wpisywać *jakieś* dane w jakiś sposób. Można założyć, że linia po linii (ale to założenie wynikające tylko z kontekstu wcześniejszych postów). W jaki sposób działa teraz wpisywanie do jednej linii? Makro, które już Kolega posiada zaczyna wpisywać od komórki, która jest aktualnie zaznaczona i wypełnia ileś...
Podobne rozwiązanie wraz z implementacją w Kolegi arkuszu. Do mojej funkcji jako parametry trzeba przekazać zakres ignorowanych i datę, po której chcemy wygenerować kolejny dzień roboczy (czyli pon-sob i spoza listy).
Cześć, Chciałbym w pliku excela osiągnąć taki efekt, że puste wiersze są automatycznie ukrywane, ale jednocześnie odkrywa się po kolei każdy kolejny wiersz gdy w jednej z komórek w wierszu wyżej (nad nim) pojawi się cokolwiek. Chodzi o to, że użytkownik pliku ma wiele wierszy do wypełnienia, ale nie zawsze musi wypełnić je wszystkie. Na końcu tabeli...
Problem w tym, że jeśli dam aby pomijał tekst "po terminie" to będzie pomijał wszystkie teksty... Chodzi o to, że pomimo tego, że komórka jest pusta to arkusz pustą komórkę traktuje jako datę jeśli cała kolumna jest tak sformatowana. .. Wiec sprawdzaj 2 warunki w forumule np.: ORAZ(E20<DZIŚ();E20<&g... albo kolejny...
Hmmm... Kilka uwag na początek: Po pierwsze primo: jeżeli chcesz uniezależnić program od nazw arkuszy, wystarczy zamiast: kolejnym wierszu.
Jeżeli excel ma "oznaczać" kody i jesteś nieograniczony w wersjach to jednak bym zastosował nie literową wersję oznaczeń ale zwykłą liczbową (kolejna liczba kolejny wariant). Więc idąc za trafną za propozycją kolegi adamas_nt : ={JEŻELI(CZY.BŁĄD(WYSZUKAJ....
Kopiowanie formuł jest właściwością tabeli i w zasadzie sposób odwoływania się nie powinien tu mieć znaczenia. Mnie jednak po przekształceniu zwykłego zakresu w tabelę, to od razu nie zadziałało, dlatego zmieniłem sposób odwołania. Można też raz skopiować formułę, a potem powinno już działać automatycznie. Jeśli po wpisaniu czegoś do kolumny C chcemy...
" Voodoo4 " - podałem Ci drugi sposób (uniwersalny) który oblicza ilość godzin niezależnie czy masz zmianę od 23:00 - 7:00 czy 7:00 - 15:00 wystarczy podać godziny od do i masz wynik ile godzin pracowałeś. Formuła ta wymaga tylko podania dodatkowo daty, bo jak wiesz zaczynając pracę powiedzmy: 23:00 podajesz inną datę niż po północy bo jakby nie było...
Dzień dobry, Excel nie jest dobrym narzędziem do przetwarzania tak dużej liczby danych w sposób złożony. Próbowałem zmodyfikować te formuły, tak aby możliwe było wielokrotne szukanie tych samych danych, ale to rozwiązanie jest mało efektywne, bo działa na wszystkie rekordy, a nie tylko te zwielokrotnione. Poza tym nie wiem ile może być tych powtórzeń....
powiedz mi dlaczego elektrodowicze po początkowym kodzie, który zawiera drobny problem, postępując widocznie na oślep każdy kolejny pomysł idą tylko gorzej? Miałeś kwerendę z parametrami (dobrze!), przeszedłeś na koszmarne sklejanie stringów (niebezpieczne, działanie nieokreślone) Co do szczegółów, wystarczy jeden wiersz z błędem (wyjątkiem) a cała...
A może wrzucę przykładowy arkusz, to może będzie prościej. Link dobry, ale dotyczy on kolumny, a mnie by interesowało, żeby dopisywał kolejny wiersz z wartością o 1 większą niż poprzedni.. Podałem Ci "wędkę" ale widzę, że Ty chyba oczekujesz na gotowe :) Owszem da się, tylko trzeba przykład podany w linku przerobić na swoje potrzeby. Nie jest to trudne.
Ten skrypt nie kopiuje dokładnie - nadpisuje ostatni wiersz, bo nie przesuwasz zmiennej NextRow na kolejny wiersz. Kod po poprawkach: [syntax=vbscript]Private Sub CommandButton1_Click() Dim FolderName As String, fileName As String Dim NextRow As Long Dim ws As Worksheet Application.ScreenUpdating = False FilesToOpen = Application.GetOpenFilename _ (filefilter:="Microsoft...
Problem polega na tym że zwraca wszystkie wystąpienia, ale w jednym wierszu oddzielone ; . Prośba o pomoc w przekształceniu makra tak abym mógł decydować które wystąpienie wyszukiwanej wartości ma zwracać. Dodaj do funkcji kolejny argument.
apollinaris , dałeś taki przykład, że trudno się zorientować jakiego wyniku oczekujesz. Czy czas w kol. C będzie zawsze taki sam tzn. 10:45, czy będzie zmienny i kolory mają być dopasowane proporcjonalnie? Jeśli zmienny to adres używany w formule musi zawierać nr wiersza bez znaku $. I zawsze piszemy formułę dla pierwszej komórki zakresu formatowania....
Cześć. Być może da się bardziej elegancko, ale na szybkiego przychodzi mi coś takiego na myśl (załącznik). Krótkie wyjaśnienie: Kolumna A - liczby, z których wyciągam średnią. Metoda pierwsza: w kolumnie pomocniczej (C) mam liczby od 1 do 20, to jest kolejny numer grupy. W D1 mam ilość elementów przypadających na grupę. Wtedy pierwsza komórka (B1) może...
Może trochę off-topic ale zastanów się czy faktycznie potrzebujesz specjalnego programu? Ja do wystawiania ok. 30 faktur miesięcznie od 10 lat używam Excel i Word. W Excelu przygotowuję tabelę z fakturami o potem korespondencją seryjną drukuję faktury, na A4 oryginał i kopię, wystarczy rozciąć. U mnie to się sprawdza, bo drukuję co miesiąc stały zestaw...
Tu do formatowania bym się nie czepiał. Jest powiedzmy ok (choć można było prościej) Ewentualnie zmienił bym warunek pojawiania się napisu "Blokada otwarta"/"Blokada zamknięta" co by z jednej strony "ustawiało" kolorki ale ... niestety nie zmieniała by się literka w kolumnie G I tu by mógł powstać kolejny wyjątek bo rozumiem że np. nagle znów byś chciał...
Witaj. Jak domyślam się, samo przeniesienie odpowiednich pytań i odpowiedzi do drugiego arkusza nie jest problemem, większym problemem jest pozbycie się pustych linii z najprostszego możliwego rozwiązania. Do tematu można podejść na dwa sposoby, za pomocą makr, albo za pomocą odpowiednich formuł. W przypadku bardziej skomplikowanego problemu makra pewnie...
Wiesz co, za daleko to poszło tu pojawiają się jeszcze inne błędy. Musze to przemyśleć od początku. edit ----------------------------------------... Trzeba było tak zrobić od początku - nie było by tylu problemów. Skróciłem formułę ale dodałem "zamianę" danych co jest logiczne: Jeżeli godzina końca jest mniejsza od godziny początku to znaczy, że godzina...
Np. przy inicjalizacji okienka/arkusza (bo nie napisałeś gdzie sią umieszczone boxy) wyłącz cztery checkboxy pozostawiając pierwszy. wersja dla okienka: "end sub" dla klikniecia checkboxa kod włączający kolejny checkbox. [syntax=vb]Private Sub CheckBox1_Click() For i = 60 To 64 If Columns(i).EntireColumn.Hidden = True = True Then Columns(i).EntireColumn.Hidden...
Kolejny post z cyklu proszę o pomoc. Za mało robię w vba bo okazuje się że raz na rok potrzebuje i mi wszystko co sie naumiem ucieka i zapominam VBA Excel tym razem potrzebny jest kod, który wyszuka numery zleceń w jednym arkuszu, który ma przypisaną listę rzeczy, potrzebnych do realizacji tych zleceń i porówna ją z tym co jest obecnie w magazynach-...
Można do przycisku przypisać Np takie makro Option Explicit Sub cmdWstaw() Dim pozycja As Integer, numer As Integer Dim kom As Range pozycja = Sheets("Arkusz1").Rang... + 1 If pozycja = 77 Then MsgBox "Osiągnięto koniec zakresu w zestawieniu..." Exit Sub End If For Each...
Może tak...
coś takiego ci chodziło [syntax=vb]Sub Makro1() Range("I1:I10").FormulaR1C1 = "=RC[-8]" Range("K1:K10").FormulaR1C1 = "=RC[-8]" End Sub[/syntax]
No i tym sposobem, który opisałem dostaniesz to co potrzebujesz, chyba, że nie rozumiem co chcesz osiągnąć. U mnie jest taki efekt: https://obrazki.elektroda.pl/1615665200_...
[syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$2" Then Application.ScreenUpdating = False nw = Sheets("Baza").Cells(Rows.Count, "A").End(xlUp).Row + 1 Range("A2:C2").Copy Sheets("Baza").Cells(nw, 1).PasteSpecial xlPasteValues Range("A2").Select Application.CutCopyMode = False Application.ScreenUpdating =...
Witaj [syntax=vb] Dim Sh As Worksheet Dim intName As Integer Dim shName As String Dim strNazwa As String ActiveWorkbook.Sheets("Template").Copy After:=ActiveWorkbook.Sheets("Template") strNazwa = "projekt" ' tutaj ustawiamy jak ma wyglądać początek nazwy arkusza intName = 0 For Each Sh In ActiveWorkbook.Worksheets shName = Sh.Name If Left(shName, Len(strNazwa))...
W momencie dodania kodu do zmiany w Tabelach pętla zazwyczaj działa tylko raz. Patrząc na drugi kod to tak może być, że działa tylko raz bo używasz kilka 'faindów' w tym samym czasie, gdy wywołujesz kolejny 'faind' findnext jest resetowany przez co "c" dostajesz nothing i wychodzi z pętli.
Eksperymenty związane z EKG Od dawna uważałem za interesujące rozważania o własnych systemach EKG. Szczególnie interesują mnie rozwiązania niedrogie i łatwe w konfiguracji. W tym artykule przedstawiono kilka sposobów wykorzystania tej techniki. Ale najpierw coś podstawowego: Ze względu na bezpośredni kontakt elektrod EKG z ciałem, wszystkie elementy...
Witam, Chciałbym stworzyć funkcję, która będzie nadawała kolejny numer informacji dla danego projektu. Dla lepszego zrozumienia moich potrzeb w załączeniu wklejam przykładową tablę. Moje założenia są takie. Nr projektu w kol. D jest wybierany z listy rozwijanej która czerpie dane z kol. T (w kol. T znajdują się indywidualne nr projektów, które nie powtarzają...
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,...
Poprawki, które zastosowałeś są właściwe. Powinno to działać. Nie wiem, dlaczego nie działa. Czy komórki A1:A30 są wypełnione wartościami? Czy zastosowanie funkcji MIN Excela do tych komórek daje inny wynik niż kod VBA? W razie wątpliwości trzeba testować kod krokowo naciskając klawisz F8 (przy otwartym oknie edytora kodu VBA) i sprawdzać co się dzieje....
Witam. Czy istnieje formuła która pozwala na wyświetlenie w komórce który jest kolejny dzień roku? Nie chodzi mi o datę tylko to by 31 grudnia komórka wyświetlała liczbę 365.
Dziękuję za pomoc w rozwiązaniu problemu. Kolejny krok w nauce excela.
Zwracanie kolejnych wartości https://exceliadam.pl/excel/zwracanie-ko...
Witam, wiem że był podobny temat, jednak tamten mi nie pomógł a ciężko znaleźć jakiekolwiek informacje w internecie. Od kilku dni męczę się z tym kodem, chciałbym aby po kliknięciu przycisku dodawał się nowy arkusz z nazwą pierwszego + kolejny numer po prawej stronie według kolejności, mam makro tworzące kolejny arkusz, lecz pusty oraz mam makro kopiujące...
[syntax=vb]Sub Schemat() ow = Cells(Rows.Count, "A").End(xlUp).Row For x = 1 To ow Cells(x, 2) = Cells(x + 1, 1) + Cells(x, 1) Next End Sub [/syntax]
[syntax=vb]wiersz = 6 Sheets(1).Activate While Cells(wiersz, 1) <> "" Cells(wiersz, 2).Copy Sheets(Cells(wiersz, 1).Text).Range("C8") wiersz = wiersz + 1 Wend [/syntax]
https://obrazki.elektroda.pl/4620800600_... Dane wyjściowe do testów OCR u góry powinny być po prawej do takiej tabeli. Może jeszcze prościej, wyobraź sobie tysiące tych karteczek, jak tutaj, zawierających indeksy, dane źródłowe, linki jak kartka z kalendarza z ostatnich np. 4 lat https://en.wikipedia.org/wiki/Zettelkast... Kartki...
Przetestuj [syntax=vb]Option Explicit Sub Import_TXT_FSO_SPLIT() Dim oFSO As Object 'File System Object Dim oFld As Object 'Obiekt Folder Dim oFls As Object 'Obiekt Plik Dim oTemp As Object Dim iRw As Integer: iRw = 1 'wiersz do którego wpisywane są dane Dim sItem As String 'katalog z plikami Dim sExt As String 'rozszerzenie pliku Dim fl As Object Dim...
Moje pytania: 1. W jaki sposób opisać warunek w którym pętla będzie działać aż do znalezienia pustej komórki w kolumnie B? 2. W jaki sposób stworzyć zapis w którym komórka B1 i C1 z Arkusza1 będzie zastępowana kolejnymi komórkami z kolumny B i C z Arkusza2 i zapisywana? 3. W jaki sposób opisać kolejne komórki (A1+i)? Nie mogę znaleźć odpowiedniego...
Witam, Zielony z makro szukam pomocy :-) Uprościłem pytanie, poszukuję makra które uruchamiałoby się automatycznie po wprowadzeniu zmiany w arkuszu dane C3, makro powinno zapamiętać i zapisać poprzednią wartość C3 do arkusza zestawienie C5, przy kolejnym wpisie do C3 w danych, kolejny zapis w C6 w arkuszu zestawienie itd. Mógłby ktoś pomóc w stworzeniu...
Nie rozumem o co chodzi z tym leczeniem kanałowym i co to ma do dolnej kolumny... Ogólnie ciekawy pomysł... dolna kolumna... Biorąc kod marcimix wyszło takie coś: [syntax=vb]Type iCell Row As Integer Col As Integer End Type Sub ColorNext() Dim C As iCell Dim r As Range Dim tmp As Range Dim step As Integer C.Row = Excel.ActiveCell.Row C.Col = Excel.ActiveCell.Column...
Witam ponownie. Niestety nikt z forumowiczów nic mi nie podesłał z wyjątkiem kindlara. Czy nikt nie ma jakiegoś "gotowca" ?? Pomóżcie proszę, bo zbliża się kolejny weekend gdzie muszę ustawić obsadę na produkcji i jestem w czarnej murzyńskiej ...... Help !!! Pozdrawiam
[syntax=vb]Range("A" & Range("A" & Rows.Count).End(xlUp).Row + 1).Value = ...[/syntax]
Przepraszam za pomylenie kontrolek oto przykład z Combobox-ami
Pierwsze przydzielenie może polegać na skopiowaniu wszystkich dostępnych pracowników, którzy zostali wpisani. Ta liczba będzie się różnić i ona właśnie jest jakby do "żonglowania". Następnie excel może weryfikować te listę po kolei, czyli: - Zielony jako pierwszy na liście przypisany do pierwszej godziny, w tym przypadku 19:15 - pokolei wpisani są kolejni...
Funkcja ADR.POŚR może służyć do odczytania danych z pliku otwartego w tej samej instancji Excela. W tym przypadku to się nie przyda. Bez VBA czy innych dodatkowych narzędzi nie da się tego zrobić w sposób trywialny. Istnieją sposoby "drogą okrężną". Najpierw trzeba przygotować teksty odwołań, potem zamienić formuły na wartości i wreszcie aktywować uzyskane...
Podepnę się pod ten temat. Poszukuję rozwiazania, aby excel podświetlał mi komórki z datą mniejszą od dzisiejszej o np. miesiąc. Próbowałem na różne sposoby, ale jeszcze mi się nie udało czegoś takiego ustawić. Chodzi o to, że ustawiam sobie jakąś datę przeglądu i aby na miesiąc wcześniej excel podświetlił mi tą datę na jakiś kolor (np. żółty), a w...
Sprawdź, czy o to chodziło.
kolejny kolumna excel excel cztery kolejny excel wypełnić kolejny komórka
ariston genus regulacja seicento czujnik automat nabijać
Fendt 720 - Sterownik nie uruchamia rozrusznika: Diagnostyka i rozwiązania Uszczelki do dyszy pary AEG EA150 i Zelmer Maestro - jakie wybrać?